home *** CD-ROM | disk | FTP | other *** search
/ Mac Ga Ichiban! 1997 December / macgaichiban199712.bin / MOVIES / PTM.DXR / 00096.ls < prev    next >
Encoding:
Text File  |  1997-11-13  |  659 b   |  22 lines
  1. on startMovie
  2.   set the visible of sprite 45 to 0
  3. end
  4.  
  5. on button
  6.   set cname to item 1 of the name of cast the castNum of sprite clickOn()
  7.   set the castNum of sprite clickOn() to the number of member (cname & ",on")
  8.   puppetSound("click")
  9.   updateStage()
  10.   repeat while the stillDown
  11.     if rollOver(clickOn()) then
  12.       set the castNum of sprite clickOn() to the number of member (cname & ",on")
  13.       updateStage()
  14.       next repeat
  15.     end if
  16.     set the castNum of sprite clickOn() to the number of member (cname & ",off")
  17.     updateStage()
  18.   end repeat
  19.   set the castNum of sprite clickOn() to the number of member (cname & ",off")
  20.   updateStage()
  21. end
  22.