Поделиться через

Метод Wait

  • Статья

[Агент Майкрософт не рекомендуется использовать в Windows 7 и может быть недоступен в последующих версиях Windows.]

Описание

Заставляет очередь анимации для указанного символа ожидать завершения указанного запроса анимации.

Синтаксис

агент**. Символы ("CharacterID"). Ожидание**Запрос

Часть Описание
Запрос Объект Request , указывающий определенную анимацию.

 

Комментарии

Используйте этот метод только при поддержке нескольких (одновременных) символов и попытке последовательности взаимодействия символов. (Для одного символа каждый запрос анимации воспроизводится последовательно после завершения предыдущего запроса.) Если у вас есть два символа и вы хотите, чтобы запрос анимации символа ждал завершения анимации другого символа, задайте для метода Wait объект animation Request другого символа. Чтобы указать параметр запроса, необходимо создать переменную и назначить запрос анимации, который требуется прервать:

   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

Вы также можете оптимизировать код, просто вызвав wait напрямую с помощью определенного запроса анимации.

   Robby.Wait Genie.Play "GestureRight"

Это позволяет избежать явного объявления объекта Request .