LEVEL_VERSION(1)
SET_GENERATE_SPEED(400)
START_MONEY(ALL_PLAYERS,2500)
MAX_CREATURES(ALL_PLAYERS,22)
SET_GAME_RULE(AlliesShareVision,1)
SET_FLAG(PLAYER_GOOD,FLAG1,1)

COMPUTER_PLAYER(PLAYER2,0)
COMPUTER_PLAYER(PLAYER3,0)
ALLY_PLAYERS(PLAYER0,PLAYER1,3)
ALLY_PLAYERS(PLAYER1,PLAYER0,3)
ALLY_PLAYERS(PLAYER2,PLAYER3,3)
ALLY_PLAYERS(PLAYER3,PLAYER2,3)
ALLY_PLAYERS(PLAYER2,PLAYER0,2)
ALLY_PLAYERS(PLAYER3,PLAYER0,2)
ALLY_PLAYERS(PLAYER2,PLAYER1,2)
ALLY_PLAYERS(PLAYER3,PLAYER1,2)

ADD_CREATURE_TO_POOL(FLY,20)
ADD_CREATURE_TO_POOL(BUG,20)
ADD_CREATURE_TO_POOL(DEMONSPAWN,20)
ADD_CREATURE_TO_POOL(TROLL,20)
ADD_CREATURE_TO_POOL(SPIDER,20)
ADD_CREATURE_TO_POOL(HELL_HOUND,25)
ADD_CREATURE_TO_POOL(TENTACLE,20)
ADD_CREATURE_TO_POOL(SORCEROR,20)
ADD_CREATURE_TO_POOL(ORC,25)
ADD_CREATURE_TO_POOL(BILE_DEMON,20)
ADD_CREATURE_TO_POOL(DRAGON,20)
ADD_CREATURE_TO_POOL(DARK_MISTRESS,25)

CREATURE_AVAILABLE(PLAYER0,FLY,1,0)
CREATURE_AVAILABLE(PLAYER0,BUG,1,0)
CREATURE_AVAILABLE(PLAYER0,SPIDER,1,0)
CREATURE_AVAILABLE(PLAYER1,FLY,1,0)
CREATURE_AVAILABLE(PLAYER1,BUG,1,0)
CREATURE_AVAILABLE(PLAYER1,SPIDER,1,0)
CREATURE_AVAILABLE(PLAYER2,FLY,0,0)
CREATURE_AVAILABLE(PLAYER2,BUG,0,0)
CREATURE_AVAILABLE(PLAYER2,SPIDER,0,0)
CREATURE_AVAILABLE(PLAYER3,FLY,0,0)
CREATURE_AVAILABLE(PLAYER3,BUG,0,0)
CREATURE_AVAILABLE(PLAYER3,SPIDER,0,0)
CREATURE_AVAILABLE(ALL_PLAYERS,DEMONSPAWN,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,HELL_HOUND,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,TENTACLE,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,SORCEROR,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,DRAGON,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,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,GUARD_POST,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,WORKSHOP,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,BARRACKS,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TORTURE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TEMPLE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,GRAVEYARD,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_TIME_BOMB,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_REBOUND,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_FREEZE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SLOW,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_DESTROY_WALLS,1,0)
MAGIC_AVAILABLE(PLAYER3,POWER_DESTROY_WALLS,1,0)

RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_SIGHT,3800)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_SPEED,5700)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_OBEY,6000)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,GUARD_POST,6700)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_CALL_TO_ARMS,7400)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,WORKSHOP,9000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_CONCEAL,9400)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,BARRACKS,12000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_HOLD_AUDIENCE,11000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_CAVE_IN,25000)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,TORTURE,20000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_HEAL_CREATURE,14000)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,TEMPLE,25000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_LIGHTNING,16000)
RESEARCH_ORDER(ALL_PLAYERS,ROOM,GRAVEYARD,27000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_PROTECT,17000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_CHICKEN,18000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_DISEASE,19000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_TIME_BOMB,20000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_REBOUND,21000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_FREEZE,22000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_SLOW,23000)
RESEARCH_ORDER(ALL_PLAYERS,MAGIC,POWER_DESTROY_WALLS,32000)


TRAP_AVAILABLE(ALL_PLAYERS,ALARM,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,POISON_GAS,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,WORD_OF_POWER,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,SENTRY,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,BALLISTA,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)

CREATE_PARTY(SKELE1)
CREATE_PARTY(HEROES1)
CREATE_PARTY(HEROES2)
CREATE_PARTY(HEROES3)
CREATE_PARTY(HEROES4)
CREATE_PARTY(HEROES5)
CREATE_PARTY(HEROES6)
CREATE_PARTY(HEROES7)
CREATE_PARTY(HEROES8)
CREATE_PARTY(HEROES9)
CREATE_PARTY(HEROES10)
CREATE_PARTY(HEROES11)
CREATE_PARTY(HEROES12)
CREATE_PARTY(HEROES13)
CREATE_PARTY(HEROES14)
CREATE_PARTY(HEROES15)
CREATE_PARTY(HEROES16)
CREATE_PARTY(HEROES17)
CREATE_PARTY(HEROES18)

ADD_TO_PARTY(SKELE1,SKELETON,10,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES1,DWARFA,3,200,ATTACK_DUNGEON_HEART,1)
ADD_TO_PARTY(HEROES2,DWARFA,6,200,ATTACK_DUNGEON_HEART,1)
ADD_TO_PARTY(HEROES3,DWARFA,8,200,ATTACK_DUNGEON_HEART,1)
ADD_TO_PARTY(HEROES4,DWARFA,10,200,ATTACK_DUNGEON_HEART,1)
ADD_TO_PARTY(HEROES5,DWARFA,3,200,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES6,DWARFA,6,200,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES7,DWARFA,8,200,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES8,DWARFA,10,200,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES9,FAIRY,10,200,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES9,FAIRY,10,200,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES10,WIZARD,10,200,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES11,WITCH,10,200,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES12,MONK,10,200,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES13,FAIRY,10,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES14,WIZARD,10,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES15,WITCH,10,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES15,MONK,10,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES16,KNIGHT,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,AVATAR,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,MONK,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,MONK,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,MONK,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,MONK,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,SAMURAI,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,SAMURAI,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,SAMURAI,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES16,SAMURAI,10,1000,ATTACK_DUNGEON_HEART,300)
ADD_TO_PARTY(HEROES17,ARCHER,6,0,DEFEND_LOCATION,0)
ADD_TO_PARTY(HEROES18,ARCHER,10,0,DEFEND_LOCATION,0)

QUICK_OBJECTIVE(1,"Welcome Keepers, The Dwarves of this land are more experianced than you are used too and there is another group of Keepers that have set themselves up well, Move with caution but if you move too slow you may not last.")

REMOVE_SACRIFICE_RECIPE(DARK_MISTRESS, BILE_DEMON, TROLL)

IF(PLAYER0,GAME_TURN > 16000)
    QUICK_OBJECTIVE(2,"Your presence has attracted the attention of nearby Dwarves")
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-1,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-2,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-3,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-4,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-5,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-6,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-7,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-8,2)
    SET_TIMER(PLAYER_GOOD,TIMER0)
    IF(PLAYER_GOOD,FLAG1 == 1)
	ADD_TUNNELLER_TO_LEVEL(PLAYER_GOOD,68,DUNGEON_HEART,0,3,200)
	ADD_TUNNELLER_TO_LEVEL(PLAYER_GOOD,69,DUNGEON_HEART,1,3,200)
        ADD_TUNNELLER_TO_LEVEL(PLAYER_GOOD,70,DUNGEON_HEART,0,3,200)
        ADD_TUNNELLER_TO_LEVEL(PLAYER_GOOD,71,DUNGEON_HEART,1,3,200)
    ENDIF
ENDIF

IF(PLAYER_GOOD,FLAG2 <= 2)
    IF(PLAYER_GOOD,TIMER0 >= 3600)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-1,3)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-5,3)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-6,3)
        NEXT_COMMAND_REUSABLE
        ADD_TO_FLAG(PLAYER_GOOD,FLAG2,1)
        NEXT_COMMAND_REUSABLE
        SET_TIMER(PLAYER_GOOD,TIMER0)
    ENDIF
ENDIF

IF(PLAYER_GOOD,FLAG3 <= 2)
    IF(PLAYER_GOOD,TIMER1 >= 3600)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-3,3)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-7,3)
        NEXT_COMMAND_REUSABLE
        ADD_TO_FLAG(PLAYER_GOOD,FLAG3,1)
        NEXT_COMMAND_REUSABLE
        SET_TIMER(PLAYER_GOOD,TIMER1)
    ENDIF
ENDIF

IF(PLAYER_GOOD,FLAG4 <= 2)
    IF(PLAYER_GOOD,TIMER2 >= 3600)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-2,3)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-6,3)
        NEXT_COMMAND_REUSABLE
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,58,6)
        NEXT_COMMAND_REUSABLE
        SET_TIMER(PLAYER_GOOD,TIMER2)
    ENDIF
ENDIF

IF(PLAYER_GOOD,FLAG5 <= 2)
    IF(PLAYER_GOOD,TIMER3 >= 3600)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-4,3)
        NEXT_COMMAND_REUSABLE
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,-8,3)
        NEXT_COMMAND_REUSABLE
        ADD_TO_FLAG(PLAYER_GOOD,FLAG5,1)
        NEXT_COMMAND_REUSABLE
        SET_TIMER(PLAYER_GOOD,TIMER3)
    ENDIF
ENDIF

IF_ACTION_POINT(1,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(55,98,PRETTY_PATH)
    CHANGE_SLAB_TYPE(44,94,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,30,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,32,4)
    SET_FLAG(PLAYER_GOOD,FLAG2,1)
    SET_TIMER(PLAYER_GOOD,TIMER0)
ENDIF

IF_ACTION_POINT(2,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(113,70,PRETTY_PATH)
    CHANGE_SLAB_TYPE(124,44,WATER)
    SET_FLAG(PLAYER_GOOD,FLAG5,1)
    SET_TIMER(PLAYER_GOOD,TIMER3)
ENDIF

IF_ACTION_POINT(3,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(59,103,PRETTY_PATH)
    CHANGE_SLAB_TYPE(41,100,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,38,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,42,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,50,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,54,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES5,46,8)
    SET_FLAG(PLAYER_GOOD,FLAG2,1)
    SET_TIMER(PLAYER_GOOD,TIMER0)
ENDIF

IF_ACTION_POINT(4,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(109,65,PRETTY_PATH)
    CHANGE_SLAB_TYPE(127,68,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,41,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,45,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,53,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,57,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES5,49,8)
    SET_FLAG(PLAYER_GOOD,FLAG5,1)
    SET_TIMER(PLAYER_GOOD,TIMER3)
ENDIF

IF_ACTION_POINT(5,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(55,70,PRETTY_PATH)
    CHANGE_SLAB_TYPE(44,74,WATER)
    SET_FLAG(PLAYER_GOOD,FLAG4,1)
    SET_TIMER(PLAYER_GOOD,TIMER2)
ENDIF

IF_ACTION_POINT(6,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(113,98,PRETTY_PATH)
    CHANGE_SLAB_TYPE(124,94,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,35,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES1,37,4)
    SET_FLAG(PLAYER_GOOD,FLAG3,1)
    SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF

IF_ACTION_POINT(7,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(59,65,PRETTY_PATH)
    CHANGE_SLAB_TYPE(41,68,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,39,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,43,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,51,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,55,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES5,47,8)
    SET_FLAG(PLAYER_GOOD,FLAG4,1)
    SET_TIMER(PLAYER_GOOD,TIMER2)
ENDIF

IF_ACTION_POINT(8,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(109,103,PRETTY_PATH)
    CHANGE_SLAB_TYPE(127,100,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,40,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES17,44,4)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,52,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES18,56,2)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES5,48,8)
    SET_FLAG(PLAYER_GOOD,FLAG3,1)
    SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF

IF_ACTION_POINT(9,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(22,72,PRETTY_PATH)
    CHANGE_SLAB_TYPE(3,39,WATER)
ENDIF

IF_ACTION_POINT(10,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(146,96,PRETTY_PATH)
    CHANGE_SLAB_TYPE(165,129,WATER)
ENDIF

IF_ACTION_POINT(11,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(1,90,WATER)
    ADD_TO_FLAG(PLAYER0,FLAG1,1)
    QUICK_OBJECTIVE(3,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(12,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(167,78,WATER)
    ADD_TO_FLAG(PLAYER1,FLAG1,1)
    QUICK_OBJECTIVE(4,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(13,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(22,96,PRETTY_PATH)
    CHANGE_SLAB_TYPE(3,129,WATER)
    ADD_TO_FLAG(PLAYER0,FLAG1,1)
    QUICK_OBJECTIVE(5,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(14,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(146,72,PRETTY_PATH)
    CHANGE_SLAB_TYPE(165,39,WATER)
    ADD_TO_FLAG(PLAYER1,FLAG1,1)
    QUICK_OBJECTIVE(6,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(15,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(3,135,WATER)
    ADD_TO_FLAG(PLAYER0,FLAG1,1)
    QUICK_OBJECTIVE(7,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(16,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(165,33,WATER)
    ADD_TO_FLAG(PLAYER1,FLAG1,1)
    QUICK_OBJECTIVE(8,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(17,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(63,87,PATH)
    CHANGE_SLAB_TYPE(68,92,PATH)
    CHANGE_SLAB_TYPE(36,136,WATER)
ENDIF

IF_ACTION_POINT(18,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(105,81,PATH)
    CHANGE_SLAB_TYPE(100,76,PATH)
    CHANGE_SLAB_TYPE(132,32,WATER)
ENDIF

IF_ACTION_POINT(19,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(100,92,PATH)
    CHANGE_SLAB_TYPE(105,87,PATH)
    CHANGE_SLAB_TYPE(40,162,WATER)
ENDIF

IF_ACTION_POINT(20,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(63,81,PATH)
    CHANGE_SLAB_TYPE(68,76,PATH)
    CHANGE_SLAB_TYPE(128,6,WATER)
ENDIF

IF_ACTION_POINT(21,ALL_PLAYERS)
    CHANGE_SLAB_TYPE(75,84,PATH)
    CHANGE_SLAB_TYPE(93,84,PATH)
    SET_FLAG(PLAYER_GOOD,FLAG1,2)
ENDIF

IF_ACTION_POINT(22,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,22,6)
ENDIF

IF_ACTION_POINT(23,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,23,6)
ENDIF

IF_ACTION_POINT(24,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,24,6)
ENDIF

IF_ACTION_POINT(25,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,25,6)
ENDIF

IF_ACTION_POINT(26,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,26,6)
ENDIF

IF_ACTION_POINT(26,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    CHANGE_SLAB_TYPE(4,162,PRETTY_PATH)
    CHANGE_SLAB_TYPE(39,131,WATER)
ENDIF

IF_ACTION_POINT(27,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    CHANGE_SLAB_TYPE(164,6,PRETTY_PATH)
    CHANGE_SLAB_TYPE(129,37,WATER)
ENDIF

IF_ACTION_POINT(28,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES2,28,6)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,58,6)
ENDIF

IF_ACTION_POINT(29,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES2,29,6)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,59,6)
ENDIF

IF_ACTION_POINT(64,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SKELE1,64,6)
ENDIF

IF_ACTION_POINT(65,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SKELE1,65,6)
ENDIF

IF_ACTION_POINT(66,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SKELE1,66,6)
ENDIF

IF_ACTION_POINT(67,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SKELE1,67,6)
ENDIF

IF_ACTION_POINT(72,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES2,72,6)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,60,6)
ENDIF

IF_ACTION_POINT(73,PLAYER1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES2,73,6)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES3,61,6)
ENDIF

IF_ACTION_POINT(74,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    ADD_TO_FLAG(PLAYER0,FLAG1,1)
    CHANGE_SLAB_TYPE(22,85,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES4,-9,8)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES10,-9,4)
    QUICK_OBJECTIVE(9,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(75,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    ADD_TO_FLAG(PLAYER1,FLAG1,1)
    CHANGE_SLAB_TYPE(22,83,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES4,-10,8)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES10,-10,4)
    QUICK_OBJECTIVE(10,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(76,PLAYER0)
    PLAY_MESSAGE(PLAYER0,SPEECH,65)
    ADD_TO_FLAG(PLAYER0,FLAG1,1)
    CHANGE_SLAB_TYPE(146,85,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES4,-11,8)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES10,-11,4)
    QUICK_OBJECTIVE(11,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF_ACTION_POINT(77,PLAYER1)
    PLAY_MESSAGE(PLAYER1,SPEECH,65)
    ADD_TO_FLAG(PLAYER1,FLAG1,1)
    CHANGE_SLAB_TYPE(146,83,WATER)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES4,-12,8)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES10,-12,4)
    QUICK_OBJECTIVE(12,"The Gods shall guide you more for each Shrine you worship at.")
ENDIF

IF(PLAYER0,FLAG1 >= 6)
    CHANGE_SLAB_TYPE(81,83,DIRT)
    CHANGE_SLAB_TYPE(81,84,DIRT)
    CHANGE_SLAB_TYPE(81,85,DIRT)
    CHANGE_SLAB_TYPE(81,86,DIRT)
    CHANGE_SLAB_TYPE(81,87,DIRT)
    CHANGE_SLAB_TYPE(82,87,DIRT)
    CHANGE_SLAB_TYPE(83,87,DIRT)
    CHANGE_SLAB_TYPE(84,87,DIRT)
    CHANGE_SLAB_TYPE(85,87,DIRT)
    CHANGE_SLAB_TYPE(87,85,DIRT)
    CHANGE_SLAB_TYPE(87,84,DIRT)
    CHANGE_SLAB_TYPE(87,83,DIRT)
    CHANGE_SLAB_TYPE(87,82,DIRT)
    CHANGE_SLAB_TYPE(87,81,DIRT)
    CHANGE_SLAB_TYPE(86,81,DIRT)
    CHANGE_SLAB_TYPE(85,81,DIRT)
    CHANGE_SLAB_TYPE(84,81,DIRT)
    CHANGE_SLAB_TYPE(83,81,DIRT)
    QUICK_OBJECTIVE(13,"The Gods have broken away a part of the protective shell the Dwarves have created.")
ENDIF

IF(PLAYER1,FLAG1 >= 6)
    CHANGE_SLAB_TYPE(86,85,DIRT)
    CHANGE_SLAB_TYPE(86,84,DIRT)
    CHANGE_SLAB_TYPE(86,83,DIRT)
    CHANGE_SLAB_TYPE(86,82,DIRT)
    CHANGE_SLAB_TYPE(85,82,DIRT)
    CHANGE_SLAB_TYPE(84,82,DIRT)
    CHANGE_SLAB_TYPE(83,82,DIRT)
    CHANGE_SLAB_TYPE(85,86,DIRT)
    CHANGE_SLAB_TYPE(84,86,DIRT)
    CHANGE_SLAB_TYPE(83,86,DIRT)
    CHANGE_SLAB_TYPE(82,86,DIRT)
    CHANGE_SLAB_TYPE(82,85,DIRT)
    CHANGE_SLAB_TYPE(82,84,DIRT)
    CHANGE_SLAB_TYPE(82,83,DIRT)
    QUICK_OBJECTIVE(14,"The Gods have broken away a part of the protective shell the Dwarves have created.")
ENDIF

IF(PLAYER0,FLAG1 >= 6)
    IF(PLAYER1,FLAG1 >= 6)
        QUICK_OBJECTIVE(14,"The Gods have broken away the protective shell the Dwarves had created but the Heroes of this land have emerged to defend them.")
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES16,21,1)
        ADD_PARTY_TO_LEVEL(PLAYER_GOOD,HEROES13,21,4)
    ENDIF
ENDIF

IF(PLAYER0,DUNGEON_DESTROYED == 1)
    LOSE_GAME
ENDIF

IF(PLAYER1,DUNGEON_DESTROYED == 1)
    LOSE_GAME
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED == 1)
    ADD_TO_FLAG(PLAYER_GOOD,FLAG6,2)
    QUICK_OBJECTIVE(15,"Thats one less Keeper to worry about.")
ENDIF

IF(PLAYER2,DUNGEON_DESTROYED == 1)
    ADD_TO_FLAG(PLAYER_GOOD,FLAG6,2)
    QUICK_OBJECTIVE(16,"Thats one less Keeper to worry about.")
ENDIF

IF(PLAYER3,DUNGEON_DESTROYED == 1)
    ADD_TO_FLAG(PLAYER_GOOD,FLAG6,2)
    QUICK_OBJECTIVE(17,"Good work Keepers, now time to claim the rest of this land.")
ENDIF

IF(PLAYER_GOOD,FLAG6 > 6)
    WIN_GAME
    QUICK_OBJECTIVE(18,"Excellent Work Keepers, your work here will not be forgotten.")
ENDIF