home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Clips / SelectSoftPublishing-StockClips-MultimediaClips-WinMac.bin / pc / PROGRAM / 612BA.Dxr / Internal_2.ls < prev    next >
Encoding:
Text File  |  2006-01-01  |  727 b   |  30 lines
  1. on mouseUp
  2.   global gPageNum
  3. end
  4.  
  5. on mouseDown
  6.   set tButtonState to word 2 of the name of member the memberNum of sprite the clickOn of castLib the castLibNum of sprite the clickOn
  7.   case tButtonState of
  8.     "upState":
  9.       hMakeSound("CLICK.AIF", 1)
  10.       if hValidClick01() = 1 then
  11.         hButtonScripts(tButtonState)
  12.       end if
  13.     "rolloverState":
  14.       hMakeSound("CLICK.AIF", 1)
  15.       if hValidClick02() = 1 then
  16.         hButtonScripts(tButtonState)
  17.       end if
  18.   end case
  19. end
  20.  
  21. on hButtonScripts pButtonState
  22.   hChangeCursor("watch")
  23.   if pButtonState = "rolloverState" then
  24.     hUndoButtonRollover()
  25.   end if
  26.   set the visible of sprite 47 to 0
  27.   set tFrame to charToNum(gPageNum) - 64
  28.   go("frame" & tFrame)
  29. end
  30.