'Dim m As Map = CreateMap("n":1,"stop":"None","model": "text-davinci-003", "prompt": Text.Trim,"max_tokens":350,"temperature":0.2)
Dim m As Map = CreateMap("n":1,"stop":"None","model": "text-davinci-003", "session_id": "5d050000-4ce3-2184-8c55-eb7a59ee0000", "prompt": Text,"max_tokens":350,"temperature":0.2)
Dim js As JSONGenerator
js.Initialize(m)
Dim req As HttpJob
req.Initialize("",Me)
req.PostString("https://api.openai.com/v1/completions",js.ToString)
req.GetRequest.SetHeader("Authorization", GPT3_AUTH)
req.GetRequest.SetHeader("OpenAI-Organization", GPT3_ORG)
req.GetRequest.SetContentType("application/json")
Wait For (req) JobDone(req As HttpJob)