home *** CD-ROM | disk | FTP | other *** search
/ DIGIZINE 1 / DIGIZINE.BIN / main / sony / mainmov.dir / 00087_Script_87 < prev    next >
Text File  |  1995-08-18  |  730b  |  24 lines

  1. --button hilite sound on/off
  2.  
  3. --on mouseDown
  4. --  set the castnum of sprite(the clickon) to (the castnum of sprite(the clickon) + 1)
  5. --  updatestage
  6. --  repeat while the stilldown
  7. --    nothing
  8. --  end repeat
  9. --  set the castnum of sprite(the clickon) to (the castnum of sprite(the clickon) - 1)
  10. --  updatestage
  11. --end
  12.  
  13. on mouseUp
  14.   put the castNum of sprite(the clickon) into X
  15.   if the name of cast X = "Speaker on" then
  16.     set the movierate of sprite(9) = 0
  17.     set the castnum of sprite(the clickon) to the number of cast "Speaker off"
  18.     updatestage
  19.   else
  20.     set the movierate of sprite(9) = 1
  21.     set the castnum of sprite(the clickon) to the number of cast "Speaker on"
  22.     updatestage
  23.   end if
  24. end