home *** CD-ROM | disk | FTP | other *** search
/ Mac Ga Ichiban! 1997 May / macgaichiban199705.bin / MOVIES / CAMP.Dxr / 00121.ls < prev    next >
Encoding:
Text File  |  1997-03-12  |  602 b   |  18 lines
  1. on button
  2.   set cname to item 1 of the name of cast the castNum of sprite clickOn()
  3.   set the castNum of sprite clickOn() to the number of member (cname & ",on")
  4.   puppetSound("puo")
  5.   updateStage()
  6.   repeat while the stillDown
  7.     if rollOver(clickOn()) then
  8.       set the castNum of sprite clickOn() to the number of member (cname & ",on")
  9.       updateStage()
  10.       next repeat
  11.     end if
  12.     set the castNum of sprite clickOn() to the number of member (cname & ",off")
  13.     updateStage()
  14.   end repeat
  15.   set the castNum of sprite clickOn() to the number of member (cname & ",off")
  16.   updateStage()
  17. end
  18.