home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / karu_gin.dir / 00369_Script_369 < prev    next >
Text File  |  1995-11-13  |  507b  |  27 lines

  1. on mouseDown
  2.   puppetSound "BUTTON08"
  3.   updatestage
  4.   if objectP(CPUwindow) then
  5.     --    set the visible of Window"CPU"  to TRUE
  6.     tell window "CPU"
  7.       continue
  8.     end tell
  9.     tell window "KYOTEN"
  10.       pause
  11.     end tell
  12.     
  13.     forget window "KYOTEN"
  14.   else
  15.     tell the stage
  16.       continue
  17.     end tell
  18.     tell window "KYOTEN"
  19.       pause
  20.     end tell
  21.     forget window "KYOTEN"
  22.   end if
  23.   puppetsprite 47,FALSE
  24.   puppetsprite 44,TRUE
  25.   play done
  26.   PuppetSound 0
  27. end