Wait-Methode

[Microsoft Agent ist ab Windows 7 veraltet und in nachfolgenden Versionen von Windows möglicherweise nicht verfügbar.]

Beschreibung

Bewirkt, dass die Animationswarteschlange für das angegebene Zeichen wartet, bis die angegebene Animationsanforderung abgeschlossen ist.

Syntax

agent**. Zeichen ("CharacterID"). Wait**Request

Teil	BESCHREIBUNG
Anforderung	Ein Request-Objekt , das eine bestimmte Animation angibt.

 

Bemerkungen

Verwenden Sie diese Methode nur, wenn Sie mehrere (gleichzeitige) Zeichen unterstützen und versuchen, die Interaktion von Zeichen zu sequenzieren. (Bei einem einzelnen Zeichen wird jede Animationsanforderung sequenziell wiedergegeben, nachdem die vorherige Anforderung abgeschlossen wurde.) Wenn Sie über zwei Zeichen verfügen und die Animationsanforderung eines Zeichens warten soll, bis die Animation des anderen Zeichens abgeschlossen ist, legen Sie die Wait-Methode auf das Animationsanforderungsobjekt des anderen Zeichens fest. Um den Anforderungsparameter anzugeben, müssen Sie eine Variable erstellen und die Animationsanforderung zuweisen, die Sie unterbrechen möchten:

   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

Sie können Ihren Code auch optimieren, indem Sie einfach direkt Wait aufrufen, indem Sie eine bestimmte Animationsanforderung verwenden.

   Robby.Wait Genie.Play "GestureRight"

Dadurch wird vermieden, dass ein Request-Objekt explizit deklariert werden muss.