REM The invasion of Normandy, 1944 AD, was the beginning of the end of the Second Thirty years war.
REM Again an inquisition under the cover of a war, where the papists where killing Jews and other non-Catholics.
REM Also  disloyal Catholics where murdered, 2,500 priest in Dachau to start out with.
REM Revenge on Martin Luther, after the annihalation of the Prusian and Ottoman Empres at the start
REM of the Second Thirty years war, was the clear purpose of the papists, that had signed Concordats
REM with Germany in 1933, Italy in 1929. With the Latheran Accords, Benito Mussolini gave the Vatican to the Pope.
REM Allies where Pavelic, General Franco, Adolph Hitler. General Franco had put down a revolt against the Pope
REM in Spain, known as the Spanish Civil War 1936~1939. Hitler who assisted in putting down this revolt against
REM Roman Catholicism, was financed by Cardinal Paccelli in the 1920's, who later became Pope Pius the 12th.
REM Portrayed in this map, is the genocide on Southern Baptist Americans at Omaha Beach.

REM 9 and they went vp on the playne of the erth and compased the tentes of the saynctes about and the beloved cite. And fyre cam doune from God out of heven and devoured them:
REM 10 and the devyll that desceaved them was cast into a lake of fyre and brymstone where the beest and the falce prophet were and shalbe tormented daye and nyght for ever more.
REM 11 And I sawe a grett whyte seate and him that sate on it from whose face fleed awaye both the erth and heave and their place was no more founde.
REM 12 And I sawe the deed both grett and small stonde before God: And the bokes were opened and another boke was opened which is the boke of lyfe and the deed were iudged of thoo thynges which weer wrytten in the bokes accordinge to their dedes:
REM 13 and the see gave vp her deed which were in her and deth and hell delyvered vp the deed which were in them: and they were iudged every man accordinge to his dedes.
REM 14 And deth and hell were cast into the lake of fyre. This is that second deeth.
REM 15 And whosoever was not founde written in the boke of lyfe was cast into the lake of fyre.
REM Revelation Chapter 20

COMPUTER_PLAYER(PLAYER2,5)

START_MONEY(PLAYER0,RANDOM(10,100000))
START_MONEY(PLAYER2,RANDOM(1000,100000))
ALLY_PLAYERS(PLAYER3,PLAYER2)
ALLY_PLAYERS(PLAYER0,PLAYER2)
ALLY_PLAYERS(PLAYER3,PLAYER_GOOD)
ALLY_PLAYERS(PLAYER2,PLAYER_GOOD)

SET_CREATURE_HEALTH(KNIGHT,5184)
SET_CREATURE_ARMOUR(KNIGHT,216)
SET_CREATURE_STRENGTH(KNIGHT,216)

SET_GENERATE_SPEED(484)

MAX_CREATURES(PLAYER0,(RANDOM(20,25))
MAX_CREATURES(PLAYER2,(RANDOM(20,25))

ADD_CREATURE_TO_POOL(DARK_MISTRESS,8)
ADD_CREATURE_TO_POOL(HELL_HOUND,8)
ADD_CREATURE_TO_POOL(DEMONSPAWN,8)
ADD_CREATURE_TO_POOL(TROLL,8)
ADD_CREATURE_TO_POOL(DRAGON,8)
ADD_CREATURE_TO_POOL(SORCEROR,8)
ADD_CREATURE_TO_POOL(BILE_DEMON,8)
ADD_CREATURE_TO_POOL(BUG,8)
ADD_CREATURE_TO_POOL(SPIDER,8)
ADD_CREATURE_TO_POOL(ORC,8)

ADD_CREATURE_TO_POOL(ARCHER,4)
ADD_CREATURE_TO_POOL(DWARFA,4)
ADD_CREATURE_TO_POOL(THIEF,4)
ADD_CREATURE_TO_POOL(GIANT,4)
ADD_CREATURE_TO_POOL(WITCH,12)

CREATURE_AVAILABLE(PLAYER0,DARK_MISTRESS,1,1)
CREATURE_AVAILABLE(PLAYER0,HELL_HOUND,1,1)
CREATURE_AVAILABLE(PLAYER0,DEMONSPAWN,1,1)
CREATURE_AVAILABLE(PLAYER0,TROLL,1,1)
CREATURE_AVAILABLE(PLAYER0,DRAGON,1,1)
CREATURE_AVAILABLE(PLAYER0,SORCEROR,1,1)
CREATURE_AVAILABLE(PLAYER0,BILE_DEMON,1,1)
CREATURE_AVAILABLE(PLAYER0,BUG,1,1)
CREATURE_AVAILABLE(PLAYER0,SPIDER,1,1)
CREATURE_AVAILABLE(PLAYER0,ORC,1,1)

CREATURE_AVAILABLE(PLAYER2,ARCHER,1,1)
CREATURE_AVAILABLE(PLAYER2,DWARFA,1,1)
CREATURE_AVAILABLE(PLAYER2,THIEF,1,1)
CREATURE_AVAILABLE(PLAYER2,GIANT,1,1)
CREATURE_AVAILABLE(PLAYER2,WITCH,1,1)

ROOM_AVAILABLE(ALL_PLAYERS,TREASURE,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,LAIR,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,GARDEN,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,TRAINING,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,RESEARCH,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,TORTURE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TEMPLE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,BARRACKS,1,0)
ROOM_AVAILABLE(PLAYER0,WORKSHOP,1,0)
ROOM_AVAILABLE(PLAYER2,GRAVEYARD,1,0)
ROOM_AVAILABLE(PLAYER2,BRIDGE,1,0)

IF(PLAYER0,GRAVEYARD>=1)
    ROOM_AVAILABLE(PLAYER0,GRAVEYARD,1,1)
ENDIF

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_OBEY,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_PROTECT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HOLD_AUDIENCE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_LIGHTNING,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DESTROY_WALLS,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_POSSESS,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_POWER_CHICKEN,1,0)

IF_AVAILABLE(PLAYER0,POWER_ARMAGEDDON==1)
    ROOM_AVAILABLE(PLAYER0,SCAVENGER,1,0)
	DISPLAY_INFORMATION(107)
ENDIF

IF_AVAILABLE(PLAYER0,SCAVENGER==1)
    DISPLAY_INFORMATION(28)
ENDIF

TRAP_AVAILABLE(ALL_PLAYERS,ALARM,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LAVA,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,WOOD,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)
DOOR_AVAILABLE(PLAYER2,BRACED,1,25)

CREATE_PARTY(FAIRIES1)
    ADD_TO_PARTY(FAIRIES1,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FAIRIES1,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FAIRIES1,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)

CREATE_PARTY(FAIRIES2)
    ADD_TO_PARTY(FAIRIES2,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_DUNGEON_HEART,0)
    ADD_TO_PARTY(FAIRIES2,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_DUNGEON_HEART,0)
    ADD_TO_PARTY(FAIRIES2,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_DUNGEON_HEART,0)

CREATE_PARTY(FAIRIES3)
    ADD_TO_PARTY(FAIRIES3,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ROOMS,0)
    ADD_TO_PARTY(FAIRIES3,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ROOMS,0)
    ADD_TO_PARTY(FAIRIES3,FAIRY,RANDOM(4,10),RANDOM(144,1448),ATTACK_ROOMS,0)

CREATE_PARTY(FAIRIES4)
    ADD_TO_PARTY(FAIRIES4,FAIRY,RANDOM(4,10),RANDOM(144,1448),STEAL_SPELLS,0)

CREATE_PARTY(FAIRIES5)
    ADD_TO_PARTY(FAIRIES5,FAIRY,RANDOM(4,10),RANDOM(144,1448),STEAL_GOLD,0)

CREATE_PARTY(MSUPERIOR)
    ADD_TO_PARTY(MSUPERIOR,WITCH,RANDOM(2,10),RANDOM(144,1448),ATTACK_DUNGEON_HEART,0)
    ADD_TO_PARTY(MSUPERIOR,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MSUPERIOR,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MSUPERIOR,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MSUPERIOR,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MSUPERIOR,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)

CREATE_PARTY(MUSCLE)
    ADD_TO_PARTY(MUSCLE,BARBARIAN,RANDOM(6,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(MUSCLE,BARBARIAN,RANDOM(6,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(MUSCLE,BARBARIAN,RANDOM(6,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(MUSCLE,ARCHER,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MUSCLE,ARCHER,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MUSCLE,WIZARD,RANDOM(5,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MUSCLE,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)

CREATE_PARTY(RANGED)
    ADD_TO_PARTY(RANGED,ARCHER,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(RANGED,ARCHER,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(RANGED,ARCHER,RANDOM(4,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(RANGED,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(RANGED,WIZARD,RANDOM(5,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(RANGED,WIZARD,RANDOM(5,10),RANDOM(144,1448),ATTACK_ENEMIES,0)

CREATE_PARTY(MOVERS)
    ADD_TO_PARTY(MOVERS,ARCHER,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MOVERS,WIZARD,RANDOM(5,10),RANDOM(144,1448),ATTACK_DUNGEON_HEART,0)
    ADD_TO_PARTY(MOVERS,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MOVERS,FAIRY,RANDOM(4,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(MOVERS,SAMURAI,RANDOM(6,10),RANDOM(144,1448),DEFEND_PARTY,0)

CREATE_PARTY(TUNNEL)
    ADD_TO_PARTY(TUNNEL,BARBARIAN,RANDOM(6,10),RANDOM(144,1448),ATTACK_ENEMIES,0)
    ADD_TO_PARTY(TUNNEL,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(TUNNEL,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(TUNNEL,MONK,RANDOM(2,10),RANDOM(144,1448),DEFEND_PARTY,0)
    ADD_TO_PARTY(TUNNEL,GIANT,10,RANDOM(144,1448),ATTACK_ENEMIES,0)

REM ACTION POINT 33,32  1 & HERO GATE -1 ... BUNKER GEMS CENTER
REM ACTION POINT 67,53  2 ... EAST PATH BEHIND FIRST BRIDGE NORTH OF OMAHA BEACH
REM ACTION POINT 59,49  3 ... BUNKER EAST + GEMS&GOLD
REM ACTION POINT  7,41  4 ... BUNKER WEST
REM ACTION POINT 49,32  5 ... PATH LONG BEFORE BRIDGE
REM ACTION POINT 70,60  6 ... PATH + WATER CENTER OMAHA BEACH
REM ACTION POINT 77,49  7 ... PATH BEFORE FIRST BRIDGE EAST
REM ACTION POINT 68,48  8 ... PATH BEFORE FIRST BRIDGE WEST
REM ACTION POINT 72,66  9 ... 3 BRIDGES AT CENTER OMAHA BEACH
REM ACTION POINT 57,75 10 ... LAST BRIDGE OMAHA BEACH
REM ACTION POINT 96,50 11 ... HERO HEART
REM HERO GATE 73,78 -2 ... SOUTH EAST OMAHA BEACH GEMS
REM HERO GATE 64,65 -3 ... WEST CENTER OMAHA BEACH
REM HERO GATE 78,59 -4 ... EAST ABOVE CENTER OMAHA BEACH
REM HERO GATE 47,75 -5 ... END OMAHA BEACH
REM PLAYER_GOOD GUARD COUNT: BUNKER1 81 BUNKER2 20 BUNKER3 14 BUNKER4 16
REM BUNKER5 3 BUNKER6 12 BUNKER7 12 BUNKER8 18 BUNKER9 20 BUNKER 10 4
REM 81+20+14+16+3+12+12+18+20+4=200 GUARD POSTS ... >83

IF(PLAYER_GOOD,GUARD_POST<83)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MSUPERIOR,6,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,6,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,-2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,-3,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,-4,1)
ENDIF

IF(PLAYER_GOOD,GUARD_POST<63)
    ROOM_AVAILABLE(ALL_PLAYERS,GUARD_POST,1,0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,-2,1)
ENDIF

IF(PLAYER_GOOD,GUARD_POST<7)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,10,3)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,-2,3)
ENDIF

IF(PLAYER_GOOD,GUARD_POST<1)
    DISPLAY_INFORMATION(19)
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,TUNNEL,-5,ACTION_POINT,10,RANDOM(1,10),RANDOM(144,448))
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,TUNNEL,-5,DUNGEON_HEART,PLAYER0,RANDOM(1,10),RANDOM(144,448))
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,TUNNEL,-5,ACTION_POINT,11,RANDOM(1,10),RANDOM(144,448))
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,TUNNEL,11,ACTION_POINT,10,RANDOM(1,10),RANDOM(144,448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,KNIGHT,11,1,RANDOM(7,10),RANDOM(1448,14482))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BARBARIAN,11,RANDOM(1,12),RANDOM(6,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,11,RANDOM(1,12),RANDOM(4,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,MONK,11,RANDOM(1,12),RANDOM(2,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,11,RANDOM(1,12),RANDOM(6,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WIZARD,11,RANDOM(1,12),RANDOM(5,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FAIRY,11,RANDOM(1,12),RANDOM(4,10),RANDOM(144,1448))
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,GIANT,11,3,10,RANDOM(144,1448))
ENDIF

IF(PLAYER0,BRIDGE>=1)
    ROOM_AVAILABLE(PLAYER0,BRIDGE,1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,6,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,7,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,8,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES1,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES2,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES3,-1,1)
ENDIF

IF_ACTION_POINT(5,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES1,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES2,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES3,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES4,3,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES5,4,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES4,4,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FAIRIES5,3,1)
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,MOVERS,3,ACTION_POINT,4,RANDOM(1,5),RANDOM(144,448))
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,MOVERS,4,ACTION_POINT,3,RANDOM(1,5),RANDOM(144,448))
ENDIF

IF_ACTION_POINT(6,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,9,3)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,9,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MOVERS,9,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MOVERS,-2,1)
ENDIF

IF_ACTION_POINT(7,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,2,1)
ENDIF

IF_ACTION_POINT(8,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,6,1)
ENDIF

IF_ACTION_POINT(9,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,RANGED,9,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MUSCLE,-2,3)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,MOVERS,-2,1)
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED==1)
    IF(PLAYER_GOOD,KNIGHT<1)
        WIN_GAME
    ENDIF
ENDIF
