LEVEL_VERSION(1)
SET_GENERATE_SPEED(400)
START_MONEY(ALL_PLAYERS,2500)
MAX_CREATURES(ALL_PLAYERS,0)

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

CREATURE_AVAILABLE(ALL_PLAYERS,FLY,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,BUG,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,DEMONSPAWN,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,TENTACLE,1,0)

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,BRIDGE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,GUARD_POST,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,WORKSHOP,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,PRISON,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TORTURE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,BARRACKS,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TEMPLE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,GRAVEYARD,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,SCAVENGER,1,0)

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HAND,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SLAP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_POSSESS,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_OBEY,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HOLD_AUDIENCE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CAVE_IN,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_LIGHTNING,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_PROTECT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CHICKEN,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DISEASE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_ARMAGEDDON,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DESTROY_WALLS,1,0)

TRAP_AVAILABLE(ALL_PLAYERS,ALARM,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,POISON_GAS,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LIGHTNING,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LAVA,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,BOULDER,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,WORD_OF_POWER,1,0)

DOOR_AVAILABLE(ALL_PLAYERS,WOOD,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,BRACED,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,STEEL,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)

REM Nothern Waves

CREATE_PARTY(NORTH_1)
	ADD_TO_PARTY(NORTH_1,DWARFA,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_1,DWARFA,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_1,DWARFA,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_1,DWARFA,2,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(NORTH_2)
	ADD_TO_PARTY(NORTH_2,TUNNELLER,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_2,TUNNELLER,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_2,DWARFA,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_2,DWARFA,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_2,DWARFA,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_2,GIANT,5,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(NORTH_3)
	ADD_TO_PARTY(NORTH_3,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,TROLL,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,TROLL,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_3,GIANT,7,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(NORTH_4)
	ADD_TO_PARTY(NORTH_4,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_4,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_4,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_4,DWARFA,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_4,DRAGON,8,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(NORTH_5)
	ADD_TO_PARTY(NORTH_5,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_5,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_5,DWARFA,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_5,GIANT,9,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_5,GIANT,9,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_5,WIZARD,9,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(NORTH_0)
	ADD_TO_PARTY(NORTH_0,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_0,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_0,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(NORTH_0,DWARFA,5,200,ATTACK_DUNGEON_HEART,250)
	
REM Eastern Waves	

CREATE_PARTY(EAST_1)
	ADD_TO_PARTY(EAST_1,THIEF,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_1,THIEF,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_1,THIEF,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_1,SAMURAI,2,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(EAST_2)
	ADD_TO_PARTY(EAST_2,SAMURAI,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_2,SAMURAI,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_2,SAMURAI,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_2,SAMURAI,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_2,MONK,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_2,MONK,4,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(EAST_3)
	ADD_TO_PARTY(EAST_3,THIEF,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_3,THIEF,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_3,HELL_HOUND,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_3,HELL_HOUND,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_3,MONK,4,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(EAST_4)
	ADD_TO_PARTY(EAST_4,SAMURAI,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_4,SAMURAI,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_4,SAMURAI,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_4,ARCHER,6,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_4,ARCHER,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_4,MONK,7,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(EAST_5)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_5,SAMURAI,7,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(EAST_0)
	ADD_TO_PARTY(EAST_0,SAMURAI,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_0,SAMURAI,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_0,MONK,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(EAST_0,MONK,5,200,ATTACK_DUNGEON_HEART,250)
		
REM Southern Waves

CREATE_PARTY(SOUTH_1)
	ADD_TO_PARTY(SOUTH_1,ARCHER,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_1,ARCHER,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_1,ARCHER,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_1,ARCHER,2,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(SOUTH_2)
	ADD_TO_PARTY(SOUTH_2,ARCHER,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_2,ARCHER,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_2,ARCHER,3,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_2,SORCEROR,4,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(SOUTH_3)
	ADD_TO_PARTY(SOUTH_3,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_3,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_3,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_3,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_3,DEMONSPAWN,6,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(SOUTH_4)
	ADD_TO_PARTY(SOUTH_4,SKELETON,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_4,SKELETON,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_4,SKELETON,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_4,SKELETON,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_4,SKELETON,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_4,SORCEROR,7,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(SOUTH_5)
	ADD_TO_PARTY(SOUTH_5,ARCHER,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_5,ARCHER,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_5,ARCHER,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_5,SORCEROR,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_5,SORCEROR,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_5,WITCH,8,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(SOUTH_0)
	ADD_TO_PARTY(SOUTH_0,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_0,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_0,ARCHER,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(SOUTH_0,SORCEROR,5,200,ATTACK_DUNGEON_HEART,250)
	
	
REM Western Waves	
	
CREATE_PARTY(WEST_1)
	ADD_TO_PARTY(WEST_1,WIZARD,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_1,WIZARD,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_1,WIZARD,2,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_1,WITCH,2,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(WEST_2)
	ADD_TO_PARTY(WEST_2,WIZARD,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_2,WIZARD,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_2,WIZARD,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_2,WIZARD,4,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_2,DRAGON,5,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(WEST_3)
	ADD_TO_PARTY(WEST_3,WITCH,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_3,WITCH,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_3,WITCH,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_3,ORC,6,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(WEST_4)
	ADD_TO_PARTY(WEST_4,WIZARD,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_4,WIZARD,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_4,WIZARD,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_4,WITCH,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_4,WITCH,7,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_4,WITCH,7,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(WEST_5)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WIZARD,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,WITCH,8,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_5,DRAGON,10,200,ATTACK_DUNGEON_HEART,250)
	
CREATE_PARTY(WEST_0)
	ADD_TO_PARTY(WEST_0,WIZARD,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_0,WIZARD,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_0,WIZARD,5,200,ATTACK_DUNGEON_HEART,250)
	ADD_TO_PARTY(WEST_0,WITCH,5,200,ATTACK_DUNGEON_HEART,250)

REM Landlord
	
CREATE_PARTY(LANDLORD)
	ADD_TO_PARTY(LANDLORD,BARBARIAN,10,200,ATTACK_DUNGEON_HEART,500)
	ADD_TO_PARTY(LANDLORD,BARBARIAN,10,200,ATTACK_DUNGEON_HEART,500)
	ADD_TO_PARTY(LANDLORD,WIZARD,8,200,ATTACK_DUNGEON_HEART,500)
	ADD_TO_PARTY(LANDLORD,ARCHER,7,200,ATTACK_DUNGEON_HEART,500)
	ADD_TO_PARTY(LANDLORD,ARCHER,7,200,ATTACK_DUNGEON_HEART,500)
	ADD_TO_PARTY(LANDLORD,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,500)
	
	QUICK_OBJECTIVE(1,"You are located in the midde of the four directions. Every direction got a portal allowing different monsters to join your dungeon. But heroes can also use them to attack. Be mindful of the number of portals you may open.",PLAYER0)
	
REM Norther Portal

IF_ACTION_POINT(1,PLAYER0)
	QUICK_INFORMATION(2,"This is the northern portal, it will give us access to cold blooded creatures and technology.",1)
	CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,0)
	CREATURE_AVAILABLE(ALL_PLAYERS,SPIDER,1,0)
	ROOM_AVAILABLE(PLAYER0,WORKSHOP,1,1)
	ROOM_AVAILABLE(PLAYER0,BARRACKS,1,1)
	SET_FLAG(PLAYER_GOOD,FLAG1,1)
	SET_FLAG(PLAYER_GOOD,FLAG5,1)
ENDIF

REM Eastern Portal

IF_ACTION_POINT(2,PLAYER0)
	QUICK_INFORMATION(3,"We reached the eastern portal, dark creatures will now join your cause by bringing in crule new arts.",2)
	CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,1,0)
	CREATURE_AVAILABLE(ALL_PLAYERS,HELL_HOUND,1,0)
	ROOM_AVAILABLE(PLAYER0,TORTURE,1,1)
	ROOM_AVAILABLE(PLAYER0,GRAVEYARD,1,1)
	SET_FLAG(PLAYER_GOOD,FLAG2,1)
	SET_FLAG(PLAYER_GOOD,FLAG5,2)
ENDIF

REM Southern Portal

IF_ACTION_POINT(3,PLAYER0)
	QUICK_INFORMATION(4,"The Southern portal will soon be yours, now obscure eastern fiends will join your dungeon and bring their arts with them.",3)
	CREATURE_AVAILABLE(ALL_PLAYERS,SORCEROR,1,0)
	CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,0)
	ROOM_AVAILABLE(PLAYER0,TEMPLE,1,1)
	ROOM_AVAILABLE(PLAYER0,SCAVENGER,1,1)
	SET_FLAG(PLAYER_GOOD,FLAG3,1)
	SET_FLAG(PLAYER_GOOD,FLAG5,3)
ENDIF

REM Western Portal

IF_ACTION_POINT(4,PLAYER0)
	QUICK_INFORMATION(5,"The western portal in in reach, can you smell the breath of dragons and the cold steel of prison bars?",4)
	CREATURE_AVAILABLE(ALL_PLAYERS,DRAGON,1,0)
	CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)
	ROOM_AVAILABLE(PLAYER0,PRISON,1,1)
	SET_FLAG(PLAYER_GOOD,FLAG4,1)
	SET_FLAG(PLAYER_GOOD,FLAG5,4)
ENDIF

REM any portal

IF(PLAYER0,ENTRANCE >= 9)
	MAX_CREATURES(ALL_PLAYERS,10)
	SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF

REM Attack Waves

IF(PLAYER_GOOD,TIMER1 > 6000)
IF(PLAYER_GOOD,TIMER1 < 7000)
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_1,1,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_1,4,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_1,3,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_1,2,DUNGEON,0,2,500)
	ENDIF
	QUICK_INFORMATION(6,"The first wave of heroes arrives though the portal.")
ENDIF
ENDIF

IF(PLAYER_GOOD,TIMER1 > 12000)
IF(PLAYER_GOOD,TIMER1 < 13000)
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_2,1,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_2,4,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_2,3,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_2,2,DUNGEON,0,4,500)
	ENDIF
ENDIF
ENDIF

IF(PLAYER_GOOD,TIMER1 > 18000)
IF(PLAYER_GOOD,TIMER1 < 19000)
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_3,1,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_3,4,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_3,3,DUNGEON,0,4,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_3,2,DUNGEON,0,4,500)
	ENDIF
ENDIF
ENDIF

IF(PLAYER_GOOD,TIMER1 > 24000)
IF(PLAYER_GOOD,TIMER1 < 25000)
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_4,1,DUNGEON,0,5,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_4,4,DUNGEON,0,5,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_4,3,DUNGEON,0,5,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_4,2,DUNGEON,0,5,500)
	ENDIF
ENDIF
ENDIF

IF(PLAYER_GOOD,TIMER1 > 32000)
IF(PLAYER_GOOD,TIMER1 < 33000)
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_5,1,DUNGEON,0,6,500)
		SET_TIMER(PLAYER0,TIMER2)
		QUICK_INFORMATION(10,"This is the last wave, now the Lord of the four directions is slowly approaching.")
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_5,4,DUNGEON,0,6,500)
		SET_TIMER(PLAYER0,TIMER2)
		QUICK_INFORMATION(11,"This is the last wave, now the Lord of the four directions is slowly approaching.")
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_5,3,DUNGEON,0,6,500)
		SET_TIMER(PLAYER0,TIMER2)
		QUICK_INFORMATION(12,"This is the last wave, now the Lord of the four directions is slowly approaching.")
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_5,2,DUNGEON,0,6,500)
		SET_TIMER(PLAYER0,TIMER2)
		QUICK_INFORMATION(13,"This is the last wave, now the Lord of the four directions is slowly approaching.")
	ENDIF
ENDIF
ENDIF

REM Lord of the Land arrives, after all other heros are dead
IF(PLAYER0,TIMER2 > 6000)
	IF(PLAYER_GOOD,FLAG5 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,1,DUNGEON,0,8,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG5 == 2)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,2,DUNGEON,0,8,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG5 == 3)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,3,DUNGEON,0,8,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG5 == 4)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,4,DUNGEON,0,8,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG1 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,NORTH_0,1,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG4 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,WEST_0,4,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG3 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SOUTH_0,3,DUNGEON,0,2,500)
	ENDIF
	IF(PLAYER_GOOD,FLAG2 == 1)
		ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,EAST_0,2,DUNGEON,0,2,500)
	ENDIF
	SET_TIMER(PLAYER_GOOD,TIMER3)
ENDIF

REM Check if the Landlord is dead
IF(PLAYER_GOOD,TIMER3 > 100)
	IF(PLAYER_GOOD,KNIGHT <= 0)
		DISPLAY_OBJECTIVE(40,PLAYER0)
		WIN_GAME
	ENDIF
ENDIF

REM More Portals inceare creature cap
IF(PLAYER0,ENTRANCE >= 18)
	MAX_CREATURES(ALL_PLAYERS,20)
	QUICK_INFORMATION(7,"We now controll two portals. This means more monster but also more heroes. We will be attacked from two sides.")
ENDIF

IF(PLAYER0,ENTRANCE >= 27)
	MAX_CREATURES(ALL_PLAYERS,30)
	QUICK_INFORMATION(8,"We have opened three portals. Be carefull master the heroes will sync their attacks on us. Perhaps you should lay traps to delay their movements.")
ENDIF

IF(PLAYER0,ENTRANCE >= 36)
	MAX_CREATURES(ALL_PLAYERS,40)
	QUICK_INFORMATION(9,"Four portals!? I hope you know what you're doing master. Beeing attacked from four sides at once!?")
ENDIF