﻿⍝ use a non-REST web service (OpenAI)
)clear
]load # /git/bb/openai/OpenAI.aplc
)ed OpenAI
OpenAI.APIKey←'YOUR-OPENAI-APIKEY-HERE'
c←OpenAI.Chat.Completion 'you are a poet' 'tell me about APL'
c.Run
c.Conversation
&'
&'
&'
i←OpenAI.Image.Create 'a bouvier des flandres riding a motorcycle'
i.size←'512x512'
i.n←3
i.Run
i.Show
&'
&'
&'
a←OpenAI.Audio.Transcription '/DYNA24/spanish.m4a'
a.Run
a.Show
&'
&'
&'
a←OpenAI.Audio.Translation '/DYNA24/spanish.m4a'
a.Run
a.Show
&'
&'
&'
⍝ back to PowerPoint...