Método Wait

[O Microsoft Agent foi preterido a partir do Windows 7 e pode não estar disponível em versões subsequentes do Windows.]

Descrição

Faz com que a fila de animação do caractere especificado aguarde até que a solicitação de animação especificada seja concluída.

Sintaxe

agente**. Personagens ("CharacterID"). Aguarde**Solicitar

Peça	Descrição
Pedido	Um Request objeto especificando uma animação específica..

 

Comentários

Use esse método somente quando você oferecer suporte a vários caracteres (simultâneos) e estiver tentando sequenciar a interação de caracteres. (Para um único personagem, cada solicitação de animação é reproduzida sequencialmente - após a conclusão da solicitação anterior.) Se você tiver dois caracteres e quiser que a solicitação de animação de um personagem aguarde até que a animação do outro personagem seja concluída, defina o método Wait para a animação do outro personagem objeto Request. Para especificar o parâmetro request, você deve criar uma variável e atribuir a solicitação de animação que deseja interromper:

   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

Você também pode simplificar seu código chamando Wait diretamente, usando uma solicitação de animação específica.

   Robby.Wait Genie.Play "GestureRight"

Isso evita ter que declarar explicitamente um objetoRequest.