home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / shared.dir / 02003_Script_2003 < prev    next >
Text File  |  1995-11-13  |  583b  |  18 lines
  1. on pushButton
  2.   puppetSound "BUTTON08"
  3.   UPDATESTAGE
  4.   put item 1 of the name of cast the castNum of sprite clickOn() into cName
  5.   repeat while stilldown()
  6.     if rollover(clickOn()) then
  7.       set the castNum of sprite clickOn() = the number of cast (cName & ",DW")
  8.     else
  9.       set the castNum of sprite clickon() = the Number of cast (cName & ",Up")
  10.     end if
  11.     updatestage
  12.   end repeat
  13. --  set the castNum of sprite clickon() = the Number of cast (cName & ",UP")
  14. --  updatestage 
  15.   if rollover(clickon()) then return TRUE
  16.   return FALSE
  17.   puppetSound 0
  18. end