home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 1998 April / DPPCPRO0498.ISO / April / AutoCAD / ACLT / WNEW.DXR / 00021_DotRollOverScript.ls < prev    next >
Encoding:
Text File  |  1997-10-16  |  921 b   |  42 lines
  1. on startRollover
  2.   global thisdot
  3.   set thisdot to the rollOver
  4.   if (thisdot < 10) or (thisdot > 18) then
  5.     exit
  6.   end if
  7.   puppetSprite(thisdot, 1)
  8.   set the memberNum of sprite thisdot to member "onDot"
  9.   puppetTransition(3, 0, 128)
  10.   updateStage()
  11.   if the mouseDown then
  12.     mouseDown()
  13.   end if
  14. end
  15.  
  16. on endRollover
  17.   global thisdot
  18.   puppetSprite(thisdot, 0)
  19.   puppetTransition(3, 0, 128)
  20.   updateStage()
  21. end
  22.  
  23. on mouseDown
  24.   global gsubMenuList, thisdot
  25.   set the memberNum of sprite thisdot to member "pickDot"
  26.   puppetTransition(3, 0, 128)
  27.   updateStage()
  28.   repeat while the mouseDown
  29.     if not rollOver(thisdot) then
  30.       exit repeat
  31.     end if
  32.   end repeat
  33.   set the memberNum of sprite thisdot to member "selectDot"
  34.   puppetTransition(3, 0, 128)
  35.   updateStage()
  36.   if rollOver(thisdot) then
  37.     puppetSprite(thisdot, 0)
  38.     set SubSection to getAt(gsubMenuList, thisdot - 9)
  39.     go(SubSection)
  40.   end if
  41. end
  42.