Metode Tunggu

[Microsoft Agent tidak digunakan lagi pada Windows 7, dan mungkin tidak tersedia dalam versi Windows berikutnya.]

Deskripsi

Menyebabkan antrean animasi untuk karakter yang ditentukan menunggu hingga permintaan animasi yang ditentukan selesai.

Sintaks

agen**. Karakter ("CharacterID"). Tunggu**Permintaan

Bagian Deskripsi
Minta Objek Permintaan yang menentukan animasi tertentu..

 

Keterangan

Gunakan metode ini hanya ketika Anda mendukung beberapa karakter (bersamaan) dan mencoba mengurutkan interaksi karakter. (Untuk satu karakter, setiap permintaan animasi diputar secara berurutan--setelah permintaan sebelumnya selesai.) Jika Anda memiliki dua karakter dan Anda ingin permintaan animasi karakter menunggu hingga animasi karakter lain selesai, atur metode Tunggu ke objek Permintaan animasi karakter lainnya. Untuk menentukan parameter permintaan, Anda harus membuat variabel dan menetapkan permintaan animasi yang ingin Anda interupsi:

   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

Anda juga dapat menyederhanakan kode Anda hanya dengan memanggil Tunggu secara langsung, menggunakan permintaan animasi tertentu.

   Robby.Wait Genie.Play "GestureRight"

Ini menghindari harus secara eksplisit mendeklarasikan objek Permintaan .