home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / dpokalv2.dir / 00629_Script_LuckyB < prev    next >
Text File  |  1995-11-10  |  1KB  |  51 lines
  1. global Plus
  2.  
  3. on LuckyB1--╔Γ╔b╔L┼[╟≡╟╖┼I
  4.   preLoadCast 125 + Plus
  5.   sound playFile 2, "\S_REACT\OK_B1"
  6.   repeat while SoundBusy(2)
  7.     KirakiraB random(5), random(5)
  8.   end repeat
  9.   set the castNum of sprite 2 = 121 + Plus
  10.   unLoadCast 125 + Plus
  11. end
  12.  
  13. on LuckyB2--╔E╔b╔V╔╔╔V╔╔╔b╔V╔╔╔b┼I
  14.   preLoadCast 127 + Plus
  15.   sound playFile 2, "\S_REACT\OK_B2"
  16.   repeat while SoundBusy(2)
  17.     NikoB random(5), random(5)
  18.   end repeat
  19.   set the castNum of sprite 2 = 121 + Plus
  20.   unLoadCast 127 + Plus
  21. end
  22.  
  23. on LuckyB3--╟ó╟²╟µ╟┤╟≡╟╖┼I
  24.   preLoadCast 124 + Plus
  25.   sound playFile 2, "\S_REACT\OK_B3"
  26.   repeat while SoundBusy(2)
  27.     BikkuriB random(5), random(5)
  28.   end repeat
  29.   set the castNum of sprite 2 = 121 + Plus
  30.   unLoadCast 124 + Plus
  31. end 
  32.  
  33. on LuckyB4--╟½╟º╟≡╟╖┼I
  34.   preLoadCast 124 + Plus
  35.   sound playFile 2, "\S_REACT\OK_B4"
  36.   repeat while SoundBusy(2)
  37.     BikkuriB random(5), random(5)
  38.   end repeat
  39.   set the castNum of sprite 2 = 121 + Plus
  40.   unLoadCast 124 + Plus
  41. end  
  42.  
  43. on LuckyB5--╔i╔C╔X╟≡╟╖┼I
  44.   preLoadCast 127 + Plus
  45.   sound playFile 2, "\S_REACT\OK_B5"
  46.   repeat while SoundBusy(2)
  47.     NikoB random(5), random(5)
  48.   end repeat
  49.   set the castNum of sprite 2 = 121 + Plus
  50.   unLoadCast 127 + Plus
  51. end