LEVEL_VERSION(1)

SET_GENERATE_SPEED(450)

START_MONEY(PLAYER0,30000)
START_MONEY(PLAYER2,500000)

COMPUTER_PLAYER(PLAYER2,0)

REM ADD_CREATURE_TO_LEVEL(PLAYER0,DARK_MISTRESS,1,100,10,0)

MAX_CREATURES(PLAYER0,35)
MAX_CREATURES(PLAYER2,50)

ALLY_PLAYERS(PLAYER2,PLAYER_GOOD,1)

SET_GAME_RULE(StunEvilEnemyChance,40)
SET_GAME_RULE(StunGoodEnemyChance,40)
SET_GAME_RULE(PrisonSkeletonChance,40)
SET_GAME_RULE(GhostConvertChance,30)
SET_GAME_RULE(TortureDeathChance,50)
SET_GAME_RULE(ImpWorkExperience,300)
SET_GAME_RULE(MaxThingsInHand,40)
SET_GAME_RULE(DungeonHeartHealth,10000)

ADD_CREATURE_TO_POOL(DRUID,40)
ADD_CREATURE_TO_POOL(BILE_DEMON,7)
ADD_CREATURE_TO_POOL(DARK_MISTRESS,8)
ADD_CREATURE_TO_POOL(TIME_MAGE,8)
ADD_CREATURE_TO_POOL(TROLL,4)
ADD_CREATURE_TO_POOL(DRAGON,12)
ADD_CREATURE_TO_POOL(ORC,8)
ADD_CREATURE_TO_POOL(HORNY,3)
ADD_CREATURE_TO_POOL(VAMPIRE,2)
ADD_CREATURE_TO_POOL(TENTACLE,10)
ADD_CREATURE_TO_POOL(SPIDER,4)
ADD_CREATURE_TO_POOL(BUG,4)

CREATURE_AVAILABLE(ALL_PLAYERS,DRUID,1,40)
CREATURE_AVAILABLE(PLAYER2,DARK_MISTRESS,1,0)
CREATURE_AVAILABLE(PLAYER2,TIME_MAGE,1,0)
CREATURE_AVAILABLE(PLAYER0,TROLL,1,0)
CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)
CREATURE_AVAILABLE(PLAYER0,BUG,1,1)
CREATURE_AVAILABLE(PLAYER0,TENTACLE,1,10)
CREATURE_AVAILABLE(ALL_PLAYERS,DRAGON,1,0)
CREATURE_AVAILABLE(PLAYER2,HORNY,1,0)
CREATURE_AVAILABLE(PLAYER2,VAMPIRE,1,0)
CREATURE_AVAILABLE(PLAYER0,SPIDER,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,BARRACKS,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,GUARD_POST,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TORTURE,1,0)
ROOM_AVAILABLE(PLAYER2,PRISON,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,WORKSHOP,1,0)
ROOM_AVAILABLE(PLAYER2,TEMPLE,1,0)
ROOM_AVAILABLE(PLAYER2,GRAVEYARD,1,0)

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SLAP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HAND,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_OBEY,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(PLAYER2,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)

TRAP_AVAILABLE(ALL_PLAYERS,LIGHTNING,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,WORD_OF_POWER,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,BRACED,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)

CREATE_PARTY(YI)
	ADD_TO_PARTY(YI,DWARFA,5,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(YI,DWARFA,4,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(YI,ARCHER,4,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(YI,TIME_MAGE,4,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(YI,TIME_MAGE,4,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(YI,FAIRY,5,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(ER)
	ADD_TO_PARTY(ER,MONK,5,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(ER,MONK,5,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(ER,WITCH,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(ER,WITCH,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(ER,TIME_MAGE,5,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(ER,TIME_MAGE,5,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(SAN)
	ADD_TO_PARTY(SAN,MONK,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SAN,MONK,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SAN,WITCH,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SAN,WITCH,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SAN,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SAN,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(SI)
	ADD_TO_PARTY(SI,GIANT,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SI,GIANT,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SI,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SI,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(SI,BARBARIAN,7,300,SABOTAGE_ROOMS,0)
	ADD_TO_PARTY(SI,BARBARIAN,7,300,SABOTAGE_ROOMS,0)

CREATE_PARTY(WU)
	ADD_TO_PARTY(WU,VAMPIRE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,VAMPIRE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,VAMPIRE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,VAMPIRE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,GHOST,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,GHOST,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(WU,GHOST,8,300,SABOTAGE_ROOMS,0)
	ADD_TO_PARTY(WU,GHOST,8,300,STEAL_GOLD,0)
	ADD_TO_PARTY(WU,GHOST,8,300,STEAL_SPELLS,0)
	ADD_TO_PARTY(WU,GHOST,8,300,SABOTAGE_ROOMS,0)
	ADD_TO_PARTY(WU,GHOST,8,300,STEAL_GOLD,0)
	ADD_TO_PARTY(WU,GHOST,8,300,STEAL_SPELLS,0)

CREATE_PARTY(LIU)
	ADD_TO_PARTY(LIU,SAMURAI,6,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(LIU,SAMURAI,6,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(LIU,WIZARD,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(LIU,WIZARD,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(LIU,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(LIU,TIME_MAGE,7,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(QI)
	ADD_TO_PARTY(QI,SKELETON,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SKELETON,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SKELETON,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SKELETON,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SPIDER,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SPIDER,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SPIDER,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(QI,SPIDER,10,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(BA)
	ADD_TO_PARTY(BA,SAMURAI,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,SAMURAI,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,SAMURAI,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,SAMURAI,7,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,WIZARD,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,WIZARD,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,TIME_MAGE,8,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(BA,TIME_MAGE,8,300,SNIPE_DUNGEON_HEART,0)

CREATE_PARTY(JIU)
	ADD_TO_PARTY(JIU,AVATAR,9,300,SNIPE_DUNGEON_HEART,99999)
	ADD_TO_PARTY(JIU,SAMURAI,9,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,SAMURAI,9,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,SAMURAI,9,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,GIANT,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,GIANT,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,GIANT,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,TIME_MAGE,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,TIME_MAGE,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,TIME_MAGE,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,TIME_MAGE,10,300,SNIPE_DUNGEON_HEART,0)
	ADD_TO_PARTY(JIU,TIME_MAGE,10,300,SNIPE_DUNGEON_HEART,0)

SET_CREATURE_CONFIGURATION(BUG,TrainingValue,7)
SET_CREATURE_CONFIGURATION(BUG,BaseSpeed,100)
SET_CREATURE_CONFIGURATION(TENTACLE,TrainingValue,4)
SET_CREATURE_CONFIGURATION(TENTACLE,BaseSpeed,100)

QUICK_OBJECTIVE(1,"You've encountered a formidable opponent; he actually has many hearts! And his creatures are powerful too. Can you win, haha?")


IF_ACTION_POINT(2,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,YI,2,1)
ENDIF

IF_ACTION_POINT(3,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,ER,3,1)
ENDIF

IF_ACTION_POINT(4,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SAN,4,1)
ENDIF

IF_ACTION_POINT(5,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SI,5,1)
ENDIF

IF_ACTION_POINT(6,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,WU,6,1)
ENDIF

IF_ACTION_POINT(7,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,7,1)
ENDIF

IF_ACTION_POINT(8,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,QI,8,1)
ENDIF

IF_ACTION_POINT(9,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,JIU,9,1)
ENDIF

IF_ACTION_POINT(10,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,BA,10,1)
ENDIF

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

IF(PLAYER0,GAME_TURN>=7000)
	CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,0)
ENDIF

IF(PLAYER0,GAME_TURN>=9000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,YI,DRAWFROM(11,12),DUNGEON,0,5,100)
	QUICK_INFORMATION(2,"As expected, the heroes are invading too. It is said that their treasures are in the central area, but heavily guarded. Can you obtain them?",9)
ENDIF


IF(PLAYER0,GAME_TURN>=18000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,YI,DRAWFROM(11,12),DUNGEON,0,5,100)
ENDIF

IF(PLAYER0,GAME_TURN>=27000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,ER,DRAWFROM(11,12),DUNGEON,0,7,100)
ENDIF

IF(PLAYER0,GAME_TURN>=36000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,ER,DRAWFROM(11,12),DUNGEON,0,7,100)
ENDIF

IF(PLAYER0,GAME_TURN>=45000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,11,DUNGEON,0,9,100)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,12,DUNGEON,0,9,100)
ENDIF

IF(PLAYER0,GAME_TURN>=54000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,11,DUNGEON,0,9,100)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,12,DUNGEON,0,9,100)
ENDIF

IF(PLAYER0,GAME_TURN>=63000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,11,DUNGEON,0,9,100)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,LIU,12,DUNGEON,0,9,100)
ENDIF

IF(PLAYER0,GAME_TURN>=72000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,BA,11,DUNGEON,0,9,100)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,BA,12,DUNGEON,0,9,100)
ENDIF

IF(PLAYER0,GAME_TURN>=81000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,BA,11,DUNGEON,0,9,100)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,BA,12,DUNGEON,0,9,100)
ENDIF

IF(PLAYER0,GAME_TURN>=90000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,JIU,DRAWFROM(11,12),DUNGEON,0,9,100)
ENDIF

SET_TIMER(PLAYER2,TIMER0)

REVEAL_MAP_RECT(PLAYER0,127,28,27,32)

IF(PLAYER0,GAME_TURN>=50000)
	QUICK_INFORMATION(3,"I have a bad feeling. The power of the enemy Keepers seems to have become stronger.")
	ADD_CREATURE_TO_POOL(HORNY,10)
	ADD_CREATURE_TO_POOL(VAMPIRE,10)
	MAX_CREATURES(PLAYER2,75)
	ROOM_AVAILABLE(PLAYER2,BRIDGE,1,1)
	ROOM_AVAILABLE(PLAYER2,SCAVENGER,1,1)
	MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DESTROY_WALLS,1,1)
	CREATURE_ENTRANCE_LEVEL(PLAYER2,4)
	CHANGE_SLAB_TYPE(42,34,PATH)
	CHANGE_SLAB_TYPE(41,35,PATH)
	CHANGE_SLAB_TYPE(42,35,PATH)
	CHANGE_SLAB_TYPE(43,35,PATH)
	CHANGE_SLAB_OWNER(42, 34, PLAYER2)
	CHANGE_SLAB_OWNER(41, 35, PLAYER2)
	CHANGE_SLAB_OWNER(42, 35, PLAYER2)
	CHANGE_SLAB_OWNER(43, 35, PLAYER2)
ENDIF

IF(PLAYER0,GAME_TURN>=80000)
	ADD_CREATURE_TO_POOL(HORNY,20)
	ADD_CREATURE_TO_POOL(VAMPIRE,20)
	MAX_CREATURES(PLAYER2,100)
	MAGIC_AVAILABLE(PLAYER2,POWER_ARMAGEDDON,1,1)
	MAGIC_AVAILABLE(PLAYER2,POWER_TIME_BOMB,1,1)
	CREATURE_ENTRANCE_LEVEL(PLAYER2,8)
ENDIF

IF(PLAYER2,HEART_HEALTH<=0)
	IF(PLAYER2,TIMER0>=200)
		QUICK_INFORMATION(4,"You shattered one of the enemy's hearts, but its released energy summoned more enemy creatures!")
REM Weak creature group
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(BUG,SPIDER,GHOST,SKELETON),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(BUG,SPIDER,GHOST,SKELETON),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(BUG,SPIDER,GHOST,SKELETON),1,1,DRAWFROM(6,7,8,9,10),0)
REM Moderate creature group
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(TROLL,ORC,TIME_MAGE,DRUID,TENTACLE,HELL_HOUND),1,1,DRAWFROM(6,7,8,9,10),0)
REM Strong creature group
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(DARK_MISTRESS,BILE_DEMON,DRAGON),1,1,DRAWFROM(7,8,9,10),0)
REM Powerful creature group
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(HORNY,VAMPIRE),1,1,DRAWFROM(8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(HORNY,VAMPIRE),1,1,DRAWFROM(8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(HORNY,VAMPIRE),1,1,DRAWFROM(8,9,10),0)
		NEXT_COMMAND_REUSABLE
		ADD_CREATURE_TO_LEVEL(PLAYER2,DRAWFROM(HORNY,VAMPIRE),1,1,DRAWFROM(8,9,10),0)
		NEXT_COMMAND_REUSABLE
		SET_TIMER(PLAYER2,TIMER0)
	ENDIF
ENDIF

IF(PLAYER2,FLOATING_SPIRIT>=1)
	NEXT_COMMAND_REUSABLE
	KILL_CREATURE(PLAYER2,FLOATING_SPIRIT,MOST_EXPERIENCED,100)
ENDIF

IF(PLAYER0,KEEPERS_DESTROYED>=10)
	QUICK_OBJECTIVE(5,"You've already shattered 10 hearts. That's the way, keep it up!")
ENDIF

IF(PLAYER0,KEEPERS_DESTROYED>=49)
	QUICK_OBJECTIVE(6,"Even such a formidable opponent is not your match. Indeed, you are the most formidable guy in the dungeon, Keeper!")
	WIN_GAME
ENDIF