home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00351_Script_UnLuckyH < prev    next >
Text File  |  1995-11-13  |  1KB  |  45 lines
  1. global Tsp,Hsp,Bsp
  2.  
  3. on UnLuckyH1--╟ó╟╖┼[╟╥
  4.   preLoadCast 65 + 400, 67 + 400
  5.   sound playFile 2, "\S_REACT\NG_H1"
  6.   put the timer into vTime
  7.   repeat while the timer < vTIME+90
  8.     TohohoH random(5), random(5)
  9.   end repeat
  10.   set the castNum of sprite Hsp = 41 + 400
  11.   unLoadCast 65 + 400, 67 + 400
  12. end
  13.  
  14. on UnLuckyH2--╟å╟┴╟┴
  15.   preLoadCast 50 + 400, 52 + 400
  16.   sound playFile 2, "\S_REACT\NG_H2"
  17.   put the timer into vTime
  18.   repeat while the timer < vTIME+80
  19.     BikkuriH random(5), random(5)
  20.   end repeat
  21.   set the castNum of sprite Hsp = 41 + 400
  22.   unLoadCast 50 + 400, 52 + 400
  23. end 
  24.  
  25. on UnLuckyH3--╟¬╟╥╟╗╟ⁿ┼[
  26.   preLoadCast 74 + 400, 76 + 400
  27.   sound playFile 2, "\S_REACT\NG_H3"
  28.   put the timer into vTime
  29.   repeat while the timer < vTIME+80
  30.     Pokan2H random(5), random(5)
  31.   end repeat
  32.   set the castNum of sprite Hsp = 41 + 400
  33.   unLoadCast 74 + 400, 76 + 400
  34. end 
  35.  
  36. on UnLuckyH4--╟¡╟½┼[╟ó┼I
  37.   preLoadCast 56 + 400, 58 + 400
  38.   sound playFile 2, "\S_REACT\NG_H4"
  39.   put the timer into vTime
  40.   repeat while the timer < vTIME+100
  41.     IkariH random(5), random(5)
  42.   end repeat
  43.   set the castNum of sprite Hsp = 41 + 400
  44.   unLoadCast 56 + 400, 58 + 400
  45. end