home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / EntertheTroy.dxr / 00001.ls next >
Encoding:
Text File  |  2002-01-31  |  6.2 KB  |  126 lines
  1. on exitFrame me
  2.   global anchorViewPoint, playerScore, locksOpened, maxLocks, lockedOffReigon, playerlevel, portalIndex, playerHealth, levelScore, playerLocData, playerViewpoint, animDelay, animNumber, monsterHitArea, playerInventory, viewChangerooRecord, screenTileSize, lastTimerCheck, totalFrames, playerSO
  3.   initializeterrainSet()
  4.   initializeConstants()
  5.   initializeScreen()
  6.   initializeMonsters()
  7.   initializePickups()
  8.   initializeplayer()
  9.   init_ParticleConstants()
  10.   init_Particles()
  11.   playerHealth = 3
  12.   levelScore = 0
  13.   member("Score Display").text = string(playerScore)
  14.   playerlevel = playerlevel + 1
  15.   repeat with wBulb = 1 to 3
  16.     if wBulb <= playerHealth then
  17.       set the member of sprite (410 + wBulb) to "Health Bulb On"
  18.       next repeat
  19.     end if
  20.     sprite(410 + wBulb).visible = "Health Bulb Off"
  21.   end repeat
  22.   locksOpened = 0
  23.   case playerlevel of
  24.     1:
  25.       maxLocks = 3
  26.       lockedOffReigon = [47, 7, 48, 11]
  27.       loadLevel(1)
  28.       portalIndex = []
  29.       curLoc = (point(50, 10.5) * 50) - 25
  30.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  31.       playerLocData[3] = point(780, 600)
  32.       playerLocData[7] = #R
  33.       playerViewpoint = point(485, 354)
  34.       anchorViewPoint = point(485, 354)
  35.       addPickup(2, 1, (point(15, 25) * 50) - 25, point(0, -5))
  36.       addPickup(2, 1, (point(21, 3) * 50) - 25, point(0, -5))
  37.       addPickup(2, 1, (point(46, 21) * 50) - 25, point(0, -5))
  38.       addMonster(1, (point(21, 4) * 50) - 25, [point(5, 4), point(0, 120), point(0, 0), 0])
  39.       addMonster(1, (point(21, 21) * 50) - 25, [point(5, 4), point(0, 120), point(0, 0), 0])
  40.       addMonster(1, (point(45, 9) * 50) - 25, [point(5, 4), point(0, 120), point(0, 0), 0])
  41.       addMonster(3, (point(21, 4) * 50) - 25, [point(3, 4), point(0, 120), point(0, 0), 0])
  42.       addMonster(3, (point(45, 9) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  43.       addMonster(4, (point(38, 19) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  44.       addMonster(4, (point(5, 9) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  45.     2:
  46.       maxLocks = 3
  47.       lockedOffReigon = [39, 22, 40, 24]
  48.       loadLevel(2)
  49.       portalIndex = []
  50.       curLoc = (point(37, 23.5) * 50) - 25
  51.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  52.       playerLocData[3] = point(2247, 1150)
  53.       playerViewpoint = point(1782, 946)
  54.       anchorViewPoint = point(1782, 946)
  55.       addPickup(2, 1, (point(11, 10) * 50) - 25, point(0, -5))
  56.       addPickup(2, 1, (point(30, 20) * 50) - 25, point(0, -5))
  57.       addPickup(2, 1, (point(33, 31) * 50) - 25, point(0, -5))
  58.       addMonster(1, (point(14, 14) * 50) - 25, [point(6, 0), point(0, 120), point(0, 0), 0])
  59.       addMonster(2, (point(9, 28) * 50) - 25, [180, 3])
  60.       addMonster(2, (point(11, 28) * 50) - 25, [180, 3])
  61.       addMonster(2, (point(13, 28) * 50) - 25, [180, 3])
  62.       addMonster(2, (point(11, 10) * 50) - 25, [0, 3])
  63.       addMonster(2, (point(11, 10) * 50) - 25, [120, 3])
  64.       addMonster(2, (point(11, 10) * 50) - 25, [240, 3])
  65.       addMonster(4, (point(4, 13) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  66.       addMonster(4, (point(17, 31) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  67.       addMonster(5, (point(4, 30) * 50) - 25, [240, point(0, 0), point(3, 5)])
  68.     3:
  69.       maxLocks = 3
  70.       lockedOffReigon = [66, 33, 72, 33]
  71.       loadLevel(3)
  72.       portalIndex = []
  73.       curLoc = (point(37, 23.5) * 50) - 25
  74.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  75.       playerLocData[3] = (point(26, 35) * 50) - 25
  76.       addMonster(5, (point(41, 16) * 50) - 25, [240, point(0, 0), point(3, 5)])
  77.       addMonster(5, (point(26, 19) * 50) - 25, [240, point(0, 0), point(3, 5)])
  78.       addMonster(2, (point(14, 5) * 50) - 25, [0, 5])
  79.       addMonster(2, (point(14, 5) * 50) - 25, [0, -5])
  80.       addMonster(2, (point(3, 34) * 50) - 25, [0, 5])
  81.       addMonster(3, (point(84, 8) * 50) - 25, [point(3, 4), point(0, 120), point(0, 0), 0])
  82.       addMonster(3, (point(88, 14) * 50) - 25, [point(3, 4), point(0, 120), point(0, 0), 0])
  83.       addMonster(3, (point(94, 16) * 50) - 25, [point(3, 4), point(0, 120), point(0, 0), 0])
  84.       addMonster(3, (point(103, 8) * 50) - 25, [point(3, 4), point(0, 120), point(0, 0), 0])
  85.       addMonster(4, (point(13, 35) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  86.       addMonster(4, (point(12, 30) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  87.       addMonster(4, (point(11, 20) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  88.       addMonster(4, (point(13, 13) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  89.       addMonster(4, (point(32, 33) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  90.       addPickup(2, 1, (point(14, 5) * 50) - 25, point(0, -5))
  91.       addPickup(2, 1, (point(28, 6) * 50) - 25, point(0, -5))
  92.       addPickup(2, 1, (point(3, 34) * 50) - 25, point(0, -5))
  93.       portalIndex = []
  94.       curLoc = (point(86, 35.5) * 50) - 25
  95.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  96.     4:
  97.       maxLocks = 3
  98.       lockedOffReigon = [66, 33, 72, 33]
  99.       loadLevel(4)
  100.       portalIndex = []
  101.       curLoc = (point(37, 23.5) * 50) - 25
  102.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  103.       playerLocData[3] = (point(5, 6) * 50) - 25
  104.       addMonster(5, (point(41, 16) * 50) - 25, [240, point(0, 0), point(3, 5)])
  105.       addMonster(4, (point(46, 27) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  106.       addMonster(4, (point(42, 27) * 50) - 25, [point(4, 4), point(0, 120), point(0, 0), 0])
  107.       addPickup(2, 1, (point(6, 2) * 50) - 25, point(0, -5))
  108.       portalIndex = []
  109.       curLoc = (point(86, 35.5) * 50) - 25
  110.       add(portalIndex, rect(curLoc[1] - 25, curLoc[2] - 25, curLoc[1] + 25, curLoc[2] + 25))
  111.   end case
  112.   animDelay = 0
  113.   animNumber = 1
  114.   monsterHitArea = []
  115.   member("Coin Display").text = string(playerInventory[1])
  116.   member("Key Display").text = string(playerInventory[2])
  117.   member("Lives Display").text = string(playerInventory[3])
  118.   viewChangerooRecord = playerViewpoint / screenTileSize
  119.   repositionTerrain()
  120.   redrawTerrainPics()
  121.   lastTimerCheck = the ticks
  122.   totalFrames = 0
  123.   sprite(playerSO).visible = 1
  124.   go(10)
  125. end
  126.