Merge pull request #40 from ovistoica/main

Add support for Speech API

src/wkok/openai_clojure/api.clj

@@ -222,6 +222,23 @@
   ([params options]
    (core/response-for :create-translation params options)))
 
+(defn create-speech
+  "Creates audio from text.
+
+  Example:
+  ```
+  (create-speech {:model \"tts-1\"
+                  :input \"Hello! Nice to meet you!.\"
+                  :voice \"alloy\"
+                  :response_format \"mp3\"})
+  ```
+  Also see the [OpenAI documentation](https://platform.openai.com/docs/api-reference/audio/createSpeech)
+  "
+  ([params]
+   (create-speech params nil))
+  ([params options]
+   (core/response-for :create-speech params options)))
+
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Files

test/wkok/openai_clojure/api_test.clj

@@ -142,6 +142,11 @@
        (is (= :success
               (api/create-translation {:file  (io/file "path/to/file/german.m4a")
                                        :model "whisper-1"})))
+       (is (= :success
+              (api/create-speech {:model "tts-1"
+                                  :input "Hey there! Nice to meet you!"
+                                  :voice "alloy"
+                                  :response_format "mp3"})))
 
        (is (= :success
               (api/list-files)))