home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / karu_gin.dir / 00232_Script_232 < prev    next >
Text File  |  1995-11-13  |  512b  |  23 lines
  1. on exitFrame
  2.   global sName, gLEVEL, yominum, gToriSP, gToriSP2,CPUwindow
  3.   --  set the type of sprite gToriSP = 0
  4.   --  updateStage
  5.   tell CPUwindow
  6.     go to "noclick"
  7.     --    set the type of sprite gToriSP2 = 0
  8.     --    updateStage
  9.   end tell
  10.   
  11.   if gLEVEL < 2 then
  12.     puppetSprite 3, true
  13.     set the castNum of sprite 3 = (yomiNum + 100)
  14.     updateStage
  15.   else
  16.     nothing
  17.   end if
  18.   --  if gLEVEL = 1 then
  19.   --  sound playfile 3, "\S_SONG\U"&sName&"D2"
  20.   --  else nothing
  21.   
  22. end
  23.