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

QUICK_OBJECTIVE(1,"Find out what happened in the garrison; apparently, everyone has been possessed. Find the imp; he left you signs to help you locate him",PLAYER0)

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,20)
ADD_CREATURE_TO_POOL(TENTACLE,20)
ADD_CREATURE_TO_POOL(SORCEROR,20)
ADD_CREATURE_TO_POOL(ORC,20)
ADD_CREATURE_TO_POOL(BILE_DEMON,20)
ADD_CREATURE_TO_POOL(DRAGON,20)
ADD_CREATURE_TO_POOL(DARK_MISTRESS,20)

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,TROLL,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,SPIDER,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,BRIDGE,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)

REM -- Create a hero party to spawn
CREATE_PARTY(SPIDER_PARTY)
ADD_TO_PARTY(SPIDER_PARTY,SPIDER,2,2,ATTACK_DUNGEON_HEART,0)

REM -- Create a hero party to spawn
CREATE_PARTY(VAMPIRE_PARTY)
ADD_TO_PARTY(VAMPIRE_PARTY,VAMPIRE,5,5,ATTACK_DUNGEON_HEART,0)

REM -- Spawn a hero party at action point 1 when reaching action point 1
IF_ACTION_POINT(1,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SPIDER_PARTY,1,1)
    QUICK_INFORMATION(1, "Aghhhhhh!", 1)
ENDIF

REM -- Spawn a hero party at action point 2 when reaching action point 2
IF_ACTION_POINT(2,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,VAMPIRE_PARTY,2,5)   
    QUICK_INFORMATION(2, "Die!!!", 2)
ENDIF
	
REM -- Spawn a hero party at action point 2 when reaching action point 2
IF_ACTION_POINT(3,PLAYER0)   
    QUICK_INFORMATION(3, "Spider and Fly give you Warlock!!!", 3)
ENDIF

REM -- Spawn a hero party at action point 2 when reaching action point 2
IF_ACTION_POINT(4,PLAYER0)   
    QUICK_INFORMATION(4, "Move all to prison!!!", 4)
ENDIF

IF(PLAYER0,ALL_DUNGEONS_DESTROYED == 1)
	WIN_GAME
ENDIF

