home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / karu_gin.dir / 00361_Script_361 < prev    next >
Text File  |  1995-11-13  |  517b  |  28 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 "CHIE_BOX"
  10.       pause
  11.     end tell
  12.     
  13.     forget window "CHIE_BOX"
  14.   else
  15.     tell the stage
  16.       continue
  17.     end tell
  18.     tell window "CHIE_BOX"
  19.       pause
  20.     end tell
  21.     forget window "CHIE_BOX"
  22.   end if
  23.   puppetsprite 45,FALSE
  24.   puppetsprite 44,TRUE
  25.   play done
  26.   PuppetSound 0
  27. end
  28.