TsgcAIOpenAIChatBot, sesli döngünün tamamını tek bir bileşende toplar. Mikrofonu kaydeder, sesi Whisper ile metne döker, dökümü Chat Completions'a gönderir, isteğe bağlı olarak bir vektör deposundan gelen bağlamla zenginleştirir ve yanıtı sesli olarak okur.
OpenAI Whisper ve Chat Completions üzerinde sesli bir ön uç. Bir ses kaydediciyi, bir metin okuma bileşenini ve erişimle zenginleştirilmiş yanıtlar istiyorsanız bir embeddings bileşenini bağlayın, ardından Start'ı çağırın.
TsgcAIOpenAIChatBot
Uçtan uca sesli sohbet botu
Win32 ve Win64
sgcAI bağımsız bir üründür. Bu bileşen, üzerine kurulduğu sgcWebSockets Core çalışma zamanıyla birlikte sgcAI içinde gelir, bu nedenle satın alınacak bir temel lisans yoktur.
Bir forma bir kaydedici, bir metin okuma bileşeni ve sohbet botunu bırakın, API anahtarını ayarlayın ve Start'ı çağırın.
uses
sgcAI, sgcAI_OpenAI_Audio_ChatBot,
sgcAI_AudioRecorder_MCI, sgcAI_TextToSpeech_System;
var
oBot: TsgcAIOpenAIChatBot;
begin
oBot := TsgcAIOpenAIChatBot.Create(nil);
oBot.OpenAIOptions.ApiKey := 'sk-...';
oBot.AudioRecorder := sgcAudioRecorderMCI1;
oBot.TextToSpeech := sgcTextToSpeechSystem1;
oBot.ChatBotOptions.Transcription.Model := 'whisper-1';
oBot.ChatBotOptions.Transcription.Language := 'en';
oBot.ChatBotOptions.ChatCompletion.Model := 'gpt-4o';
oBot.OnTranscription := BotTranscription;
oBot.OnChatCompletion := BotChatCompletion;
oBot.Start; // Stop ends the session
// A turn can also be pushed from code, no microphone involved.
oBot.ChatAsUser('Summarise the last order in one line.');
end;
procedure TForm1.BotTranscription(Sender: TObject;
var Text: string; var Accept: Boolean);
begin
// Inspect or rewrite what Whisper heard, or drop the turn.
Accept := Trim(Text) <> '';
end;// includes: sgcAI.hpp, sgcAI_OpenAI_Audio_ChatBot.hpp
TsgcAIOpenAIChatBot *oBot = new TsgcAIOpenAIChatBot(NULL);
oBot->OpenAIOptions->ApiKey = "sk-...";
oBot->AudioRecorder = sgcAudioRecorderMCI1;
oBot->TextToSpeech = sgcTextToSpeechSystem1;
oBot->ChatBotOptions->ChatCompletion->Model = "gpt-4o";
oBot->OnChatCompletion = BotChatCompletion;
oBot->Start();
// Push a turn without speaking.
oBot->ChatAsUser("Summarise the last order in one line.");En sık başvurduğunuz üyeler.
AudioRecorder mikrofon girdisini sağlar, TextToSpeech yanıtı seslendirir ve Embeddings, model çağrılmadan önce isteğe bağlı olarak bir vektör deposundan getirilen bağlamı sağlar.
Transcription.Model ve Transcription.Language, Whisper çağrısını yapılandırır. ChatCompletion.Enabled ve ChatCompletion.Model ise yanıtı veren modeli yapılandırır.
Bileşenin yaptığı her çağrı için API anahtarı, uç nokta, HTTP, yeniden deneme ve günlük kaydı ayarları; Azure OpenAI varyantı dahil.
Start yakalamayı başlatır, Stop ise sonlandırır. Kaydedici otomatik moddayken bileşen, yanıtın oynatılması bittiğinde yakalamayı yeniden başlatır; böylece konuşma eller serbest şekilde sürer.
ChatAsUser bir kullanıcı mesajı ekler, ChatAsSystem bir sistem mesajı ekler ve isteğe bağlı olarak bunu seslendirebilir, GetEmbedding ise herhangi bir istem için bağlam arar.
OnTranscription, Whisper'ın duyduğunu modele ulaşmadan önce düzenlemenize ya da reddetmenize olanak tanır. OnChatCompletion, yanıtın rolünü ve içeriğini bildirir. OnAudioStart ve OnAudioStop yakalamayı izler.
Bu bileşenin kullandığı hizmetler ve protokoller için yetkili kaynaklar.
| Çevrimiçi yardımsgcAI bileşenleri için tam API referansı ve kullanım kılavuzu. | Aç | |
| Tüm sgcAI Bileşenleri15 bileşenin tamamının özellik matrisine göz atın. | Aç | |
| Ücretsiz Deneme Sürümünü İndirinKendi OpenAI anahtarınızla konuşan bir asistan oluşturun. | Aç | |
| FiyatlandırmaSingle, Team ve Site lisansları, tam kaynak kodu, temel ürün gerekmez. | Aç |