https://suriyal.com/install-amazon-linux-2-on-virtualbox/
https://docs.aws.amazon.com/AWSEC2/latest/UserGuide/ec2-lamp-amazon-linux-2.html
How to start Office for Windows applications in Office Safe Mode
Use one of these methods to start an Office application in Office Safe Mode on a Windows PC:
This method works for most Office versions on a Windows PC:
Find the shortcut icon for your Office application.
Press and hold the CTRL key and double-click the application shortcut.
Click Yes when a window appears asking if you want to start the application in Safe Mode.
Note: To stop Office Safe Mode, exit and restart your Office application. It will start in normal mode unless there's a problem opening the application.
This method works for most Office versions on a Windows PC:
Right-click the Start button (lower-left corner) in Windows, and click Run.
Alternatively, you can press the Windows logo key and the R key on your keyboard.
In the Run box, type one of these commands:
For Excel: Type excel /safe, and click OK.
For Outlook: Type outlook /safe, and click OK.
For Word: Type winword /safe, and click OK.
For PowerPoint: Type powerpnt /safe, and click OK.
For Publisher: Type mspub /safe, and click OK.
For Visio: Type visio /safe, and click OK.
- program fpopenai_6;
- {
- Demo on how to use openai in Freepascal
- Find out more at https://openai.com where you can also obtain a key.
- Put the key in a file called openai.key surrounded by single quotes.
- Enjoy, Thaddy de Koning, 26 december 2022
- }
- {$mode objfpc}{$ifdef mswindows}{$apptype console}{$endif}{$H+}
- uses classes,sysutils,fphttpclient,opensslsockets,fpJson,jsonparser;
- const
- model ='{"model": "text-davinci-003", "prompt": "%s","temperature": 0.7,"max_tokens": 3000,"top_p": 1, "frequency_penalty": 0, "presence_penalty": 0}';
- var
- d:TJsonData;
- s:string;
- begin
- writeln('What is your request?');
- readln(s);
- writeln;
- with TfpHttpClient.Create(nil) do
- Try
- AllowRedirect:= true;
- RequestHeaders.Add('Content-Type: application/json');
- // put your key with single quotes in a textfile called openai.key
- RequestHeaders.Add('Authorization: Bearer '+{$I openai.key});
- RequestBody:=TStringStream.Create(format(model,[s]));
- writeln('Please wait for the response, this can take some time:');
- try
- try
- d:=GetJson(Post('https://api.openai.com/v1/completions'));
- writeln(d.findpath('choices[0].text').AsString);
- except
- writeln('The engine was not able to answer your request ',ResponseStatusCode);
- end;
- finally
- d.free;
- end;
- finally
- RequestBody.Free;
- Free;
- end;
- end.
