home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 July / CHIP_CD_1997_07_PL.iso / knowhow / internet / media / files / main.dir / 00030.ls < prev    next >
Encoding:
Text File  |  1997-03-24  |  212 b   |  14 lines

  1. on mouseDown
  2.   puppetSound("Mouse Down")
  3.   set the ink of sprite 12 to 4
  4.   repeat while the stillDown
  5.     updateStage()
  6.   end repeat
  7. end
  8.  
  9. on mouseUp
  10.   set the ink of sprite 12 to 0
  11.   updateStage()
  12.   go("co")
  13. end
  14.