home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / SkyGunner.dxr / 00006_cloud3.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  393 b   |  20 lines

  1. property spriteNum, pWind
  2.  
  3. on beginSprite
  4.   pWind = sprite(spriteNum).locH
  5. end
  6.  
  7. on exitFrame
  8.   pWind = pWind - 0.20000000000000001
  9.   sprite(spriteNum).locH = integer(pWind)
  10.   if sprite(spriteNum).locH > 780 then
  11.     sprite(spriteNum).locH = -290
  12.     pWind = -290.0
  13.   else
  14.     if sprite(spriteNum).locH < -290 then
  15.       sprite(spriteNum).locH = 780
  16.       pWind = 780.0
  17.     end if
  18.   end if
  19. end
  20.