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