home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00106_DERECHA.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  278 b   |  14 lines
  1. on mouseDown
  2.   puppetSprite(23, 1)
  3.   repeat while the mouseDown
  4.     if rollOver(23) then
  5.       set the castNum of sprite 23 to 2103
  6.       updateStage()
  7.       next repeat
  8.     end if
  9.     set the castNum of sprite 23 to 106
  10.     updateStage()
  11.   end repeat
  12.   puppetSprite(23, 0)
  13. end
  14.