home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / WeaponEarth.dxr / 00002_EarthBase.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  676 b   |  27 lines

  1. property spriteNum
  2. global gBaseRotation, gPause
  3.  
  4. on beginSprite me
  5.   sprite(me.spriteNum).rotation = 0
  6.   mouseLoc = point(580, 220)
  7. end
  8.  
  9. on exitFrame me
  10.   if gPause = 0 then
  11.     sprite(me.spriteNum).rotation = the mouseH - 290
  12.     gBaseRotation = sprite(me.spriteNum).rotation
  13.     if sprite(me.spriteNum).locH < 151 then
  14.       sprite(me.spriteNum).locH = 151
  15.     end if
  16.     if sprite(me.spriteNum).locH > 427 then
  17.       sprite(me.spriteNum).locH = 427
  18.     end if
  19.     if sprite(me.spriteNum).rotation > 60 then
  20.       sprite(me.spriteNum).rotation = 60
  21.     end if
  22.     if sprite(me.spriteNum).rotation < -60 then
  23.       sprite(me.spriteNum).rotation = -60
  24.     end if
  25.   end if
  26. end
  27.