Wait, méthode
[Microsoft Agent est déconseillé à partir de Windows 7 et peut ne pas être disponible dans les versions ultérieures de Windows.]
-
Descriptive
-
Fait en sorte que la file d’attente d’animation du caractère spécifié attende jusqu’à la fin de la demande d’animation spécifiée.
-
Stockéesyntaxe
-
*agent . Caractères («CharacterID»). * Demande d’attente
Partie Description Requête Objet de requête spécifiant une animation particulière.
Remarques
Utilisez cette méthode uniquement lorsque vous prenez en charge plusieurs caractères (simultanés) et que vous essayez de séquencer l’interaction des caractères. (Pour un caractère unique, chaque demande d’animation est lue de manière séquentielle, à l’issue de la requête précédente.) Si vous avez deux caractères et que vous souhaitez que la demande d’animation d’un caractère attende la fin de l’animation de l’autre caractère, définissez la méthode Wait sur l’objet de requête d’animation de l’autre caractère. Pour spécifier le paramètre de requête, vous devez créer une variable et assigner la demande d’animation que vous souhaitez interrompre :
Dim GenieRequest
Dim RobbyRequest
Dim Genie
Dim Robby
Sub window_Onload
Agent1.Characters.Load "Genie", "https://agent.microsoft.com/characters/v2/genie/genie.acf"
Agent1.Characters.Load "Robby", "https://agent.microsoft.com/characters/v2/robby/robby.acf"
Set Genie = Agent1.Characters("Genie")
Set Robby = Agent1.Characters("Robby")
Genie.Get "State", "Showing"
Robby.Get "State", "Showing"
Genie.Get "Animation", "Announce, AnnounceReturn, Pleased, _
PleasedReturn"
Robby.Get "Animation", "Confused, ConfusedReturn, Sad, SadReturn"
Set Genie = Agent1.Characters ("Genie")
Set Robby = Agent1.Characters ("Robby")
Genie.MoveTo 100,100
Genie.Show
Robby.MoveTo 250,100
Robby.Show
Genie.Play "Announce"
Set GenieRequest = Genie.Speak ("Why did the chicken cross the road?")
Robby.Wait GenieRequest
Robby.Play "Confused"
Set RobbyRequest = Robby.Speak ("I don't know. Why did the chicken _
cross the road?")
Genie.Wait RobbyRequest
Genie.Play "Pleased"
Set GenieRequest = Genie.Speak ("To get to the other side.")
Robby.Wait GenieRequest
Robby.Play "Sad"
Robby.Speak "I never should have asked."
End Sub
Vous pouvez également simplifier votre code en appelant simplement Wait directement, à l’aide d’une demande d’animation spécifique.
Robby.Wait Genie.Play "GestureRight"
Cela évite de devoir déclarer explicitement un objet de requête .