home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / dpokalv2.dir / 00624_Script_WinT < prev    next >
Text File  |  1995-11-10  |  967b  |  36 lines
  1. global Plus
  2.  
  3. on WinT1--∞a┼A∞▓±{α═┼I
  4. --  preLoadCast 10 + Plus, 12 + Plus
  5. --    preLoadCast 22 + Plus, 24 + Plus
  6.   sound playFile 2, "\S_REACT\WIN_T"
  7. --  if SoundBusy(2) then
  8. --    BikkuriT random(5), random(5)
  9. --  end if
  10.   repeat while SoundBusy(2)
  11. --    NikoT random(5), random(5)
  12.   end repeat
  13.   set the castNum of sprite 2 = 1 + Plus
  14. --  unLoadCast 10 + Plus, 12 + Plus
  15. --  unLoadCast 22 + Plus, 24 + Plus
  16. end
  17.  
  18. on WinT2--╔o╔b┼A╔o╔∞╔U╔C┼I
  19. --  preLoadCast 22 + Plus, 24 + Plus
  20.   sound playFile 2, "\S_REACT\WIN_T2"
  21.   repeat while SoundBusy(2)
  22. --    NikoT random(5), random(5)
  23.   end repeat
  24.   set the castNum of sprite 2 = 1 + Plus
  25. --  unLoadCast 22 + Plus, 24 + Plus
  26. end
  27.  
  28. on WinT3--╔╤╔b╔^╟╝╟«╟≡╟╖╟╚
  29. --  preLoadCast 13 + Plus, 15 + Plus
  30.   sound playFile 2, "\S_REACT\WIN_T3"
  31.   repeat while SoundBusy(2)
  32. --    KirakiraT random(5), random(5)
  33.   end repeat
  34.   set the castNum of sprite 2 = 1 + Plus
  35. --  unLoadCast 13 + Plus, 15 + Plus
  36. end