home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / TroyReturns.dxr / 00036.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  647 b   |  17 lines

  1. on exitFrame me
  2.   global playerViewpoint, anchorViewPoint, playerLocData, playerSO, animDelay, animNumber
  3.   animNumber = animNumber + 1
  4.   movePlayer()
  5.   randomValue = point(playerLocData[3][1], playerLocData[3][2])
  6.   addparticle(randomValue, 0, 5, the member of sprite playerSO, sprite(playerSO).flipH)
  7.   moveParticles()
  8.   repositionTerrain()
  9.   redrawTerrainPics()
  10.   moveSpeed = findDistance(playerViewpoint, anchorViewPoint)
  11.   moveAim = findAngle(playerViewpoint, anchorViewPoint)
  12.   locY = 0
  13.   locX = integer(sin(moveAim * PI / 180) * (moveSpeed * 0.10000000000000001))
  14.   playerViewpoint = playerViewpoint + point(locX, locY)
  15.   go(the frame)
  16. end
  17.