1851,10 → 1851,10 |
RandomLevelMaxEnemyLives = 10; |
var |
act: integer; |
Enemies: array[1..27] of TEnemyType; |
Enemies: array[1..32] of TEnemyType; |
numEnemies: integer; |
e: TEnemyAdvent; |
bossPosition, medikitPosition: integer; |
bossPosition: integer; |
levFile: TLevelFile; |
begin |
ResetLevelData; |
1866,28 → 1866,33 |
Enemies[3] := etEnemyUFO; // ab Lev 1 |
Enemies[4] := etEnemyAttacker; // ab Lev 2 |
Enemies[5] := etEnemyMeteor; // ab Lev 3 |
Enemies[6] := etEnemyUFO; // ... |
Enemies[7] := etEnemyAttacker; |
Enemies[8] := etEnemyMeteor; |
Enemies[9] := etEnemyUFO; |
Enemies[10] := etEnemyAttacker; |
Enemies[11] := etEnemyMeteor; |
Enemies[12] := etEnemyUFO; |
Enemies[13] := etEnemyAttacker; |
Enemies[14] := etEnemyMeteor; |
Enemies[15] := etEnemyUFO; |
Enemies[16] := etEnemyAttacker3; |
Enemies[17] := etEnemyAttacker; |
Enemies[18] := etEnemyMeteor; |
Enemies[19] := etEnemyUFO; |
Enemies[20] := etEnemyUFO2; |
Enemies[21] := etEnemyAttacker; |
Enemies[22] := etEnemyMeteor; |
Enemies[23] := etEnemyUFO; |
Enemies[24] := etEnemyAttacker2; |
Enemies[25] := etEnemyMeteor; |
Enemies[26] := etEnemyUFO; |
Enemies[27] := etEnemyAttacker; |
Enemies[6] := etEnemyUFO; // ab Lev 4 |
Enemies[7] := etEnemyAttacker; // ab Lev 5 |
Enemies[8] := etEnemyMeteor; // ab Lev 6 |
Enemies[9] := etEnemyUFO; // ab Lev 7 |
Enemies[10] := etEnemyAttacker; // ab Lev 8 |
Enemies[11] := etEnemyMeteor; // ab Lev 9 |
Enemies[12] := etEnemyUFO; // ab Lev 10 |
Enemies[13] := etEnemyAttacker; // ab Lev 11 |
Enemies[14] := etEnemyMeteor; // ab Lev 12 |
Enemies[15] := etEnemyUFO; // ab Lev 13 |
Enemies[16] := etEnemyAttacker3; // ab Lev 14 |
Enemies[17] := etEnemyAttacker; // ab Lev 15 |
Enemies[18] := etEnemyMeteor; // ab Lev 16 |
Enemies[19] := etEnemyUFO; // ab Lev 17 |
Enemies[20] := etEnemyUFO2; // ab Lev 18 |
Enemies[21] := etEnemyAttacker; // ab Lev 19 |
Enemies[22] := etEnemyMeteor; // ab Lev 20 |
Enemies[23] := etEnemyUFO; // ab Lev 21 |
Enemies[24] := etEnemyAttacker2; // ab Lev 22 |
Enemies[25] := etEnemyMeteor; // ab Lev 23 |
Enemies[26] := etEnemyUFO; // ab Lev 24 |
Enemies[27] := etEnemyAttacker; // ab Lev 25 |
Enemies[28] := etEnemyAttacker; // ab Lev 26 |
Enemies[29] := etEnemyAttacker2; // ab Lev 27 |
Enemies[30] := etEnemyAttacker3; // ab Lev 28 |
Enemies[31] := etEnemyUFO; // ab Lev 29 |
Enemies[32] := etEnemyUFO2; // ab Lev 30 |
numEnemies := lev*ADDITIONAL_ENEMIES_PER_LEVEL; |
SetLength(LevelData.EnemyAdventTable, numEnemies); |
for act := 0 to numEnemies-1 do |
1918,6 → 1923,12 |
end; |
end; |
|
if (act-1) mod 200 = 0 then |
begin |
e.enemyType := etItemMedikit; |
e.lifes := 0; |
end; |
|
LevelData.EnemyAdventTable[act] := e; |
end; |
|
1937,6 → 1948,9 |
bossPosition := round(0.75 * numEnemies); |
end; |
|
if LevelData.EnemyAdventTable[bossPosition].enemyType = etItemMedikit then |
Inc(bossPosition); |
|
if bossPosition >= 0 then |
begin |
e.enemyType := etEnemyBoss; |
1947,10 → 1961,6 |
LevelData.EnemyAdventTable[bossPosition] := e; |
end; |
|
medikitPosition := 0; |
LevelData.EnemyAdventTable[medikitPosition].enemyType := etItemMedikit; |
LevelData.EnemyAdventTable[medikitPosition].lifes := 0; |
|
{$ENDREGION} |
end |
else |