Make Characters Talk! MS Agent
It will make a character of your choice(many to download) talk.
AI
एआई सारांश: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
सोर्स कोड
Dim Genie As IAgentCtlCharacterEx
Const DATAPATH = "genie.acs"
Private Sub Form_Load()
Agent1.Characters.Load "Genie", DATAPATH
Set Genie = Agent1.Characters("Genie")
Genie.LanguageID = &H409
TextBox.Text = "Hello World!"
End Sub
Private Sub Button_Click()
Genie.Show
Genie.Speak TextBox.Text
Genie.Hide
End Sub
मूल टिप्पणियाँ (3)
Wayback Machine से पुनर्प्राप्त