home *** CD-ROM | disk | FTP | other *** search
/ PC Master 1997 July & August / PCM97.iso / UTIL.dxr / 00024_Back.ls < prev    next >
Encoding:
Text File  |  1998-06-23  |  310 b   |  14 lines
  1. on mouseDown
  2.   set btn to the clickOn
  3.   puppetSprite(btn, 1)
  4.   set the loc of sprite btn to the loc of sprite btn + 1
  5.   updateStage()
  6.   repeat while the stillDown
  7.     updateStage()
  8.   end repeat
  9.   set the loc of sprite btn to the loc of sprite btn - 1
  10.   updateStage()
  11.   puppetSprite(btn, 0)
  12.   go(1, "main")
  13. end
  14.