home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00350_Script_UnLuckyT < prev    next >
Text File  |  1995-11-13  |  1KB  |  45 lines

  1. global Tsp,Hsp,Bsp
  2.  
  3. on UnLuckyT1--╟╗╟è╟╝╟«╟≡╟╖╟╚┼I
  4.   preLoadCast 16 + 400, 18 + 400
  5.   sound playFile 2, "\S_REACT\NG_T1"
  6.   put the timer into vTime
  7.   repeat while the timer < vTIME+105
  8.     IkariT random(5), random(5)
  9.   end repeat
  10.   set the castNum of sprite Tsp = 1 + 400
  11.   unLoadCast 16 + 400, 18 + 400
  12. end
  13.  
  14. on UnLuckyT2--╔K┼[╔∞
  15.   preLoadCast 34 + 400, 36 + 400
  16.   sound playFile 2, "\S_REACT\NG_T2"
  17.   put the timer into vTime
  18.   repeat while the timer < vTIME+130
  19.     Pokan2T random(5), random(5)
  20.   end repeat
  21.   set the castNum of sprite Tsp = 1 + 400
  22.   unLoadCast 34 + 400, 36 + 400
  23. end
  24.  
  25. on UnLuckyT3--╟¿╟┬╟╢┼[╟í
  26.   preLoadCast 31 + 400, 33 + 400
  27.   sound playFile 2, "\S_REACT\NG_T3"
  28.   put the timer into vTime
  29.   repeat while the timer < vTIME+130
  30.     PokanT random(5), random(5)
  31.   end repeat
  32.   set the castNum of sprite Tsp = 1 + 400
  33.   unLoadCast 31 + 400, 33 + 400
  34. end
  35.  
  36. on UnLuckyT4--╔─╔─┼[┼I
  37.   preLoadCast 25 + 400, 27 + 400
  38.   sound playFile 2, "\S_REACT\NG_T4"
  39.   put the timer into vTime
  40.   repeat while the timer < vTIME+130
  41.     TohohoT random(5), random(5)
  42.   end repeat
  43.   set the castNum of sprite Tsp = 1 + 400
  44.   unLoadCast 25 + 400, 27 + 400
  45. end