home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / WaterFight.dxr / 00007.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  360 b   |  14 lines
  1. on exitFrame me
  2.   randPoint = point(random(20) - 10, random(20) - 10)
  3.   moveClouds()
  4.   moveDrops()
  5.   set the loc of sprite 131 to point(290, 420) + point((the mouseH - 290) / 3, (the mouseV - 100) / 12)
  6.   go(the frame)
  7. end
  8.  
  9. on mouseDown
  10.   repeat with whichDrop = 1 to 10
  11.     addDrop(the mouseLoc + point(0, 50), -30, 0 - (random(175) / 10.0))
  12.   end repeat
  13. end
  14.