REM ****************************************************************************
REM                                 ӭʹػ
REM                ͼAI<<³ػIͼAI༭>>
REM                          ߣ֮磬QQ3262900
REM ****************************************************************************
REM                     ͼƣ2502,Life 3 (By.ڰɾ)
REM                     ͼߣĬ     QQ1220604726
REM         ӭ1128460424³ػ - Dungeon KeeperȺ
REM ****************************************************************************
REM                    PLAYER1=-1,PLAYER2=-1,PLAYER3=0
REM ****************************************************************************
REM ͼĴο飺
REM    1.Ӣ۾,ӵд.
REM    2.ػӵй,ػӵиߵħ.
REM    3.ϷΪչ,ӵҰĽӢ۵ľݵ.
REM    4.̽,ͼ,,.
REM    5.ʤΪ,,.
REM    6.ʧΪ,.
REM ****************************************************************************
REM ޸
REM 1
REM 2
REM 3
REM     
REM 4
REM     
REM 5
REM    
REM ****************************************************************************
REM ************ʼǮ**************
START_MONEY(PLAYER0,0)
MAX_CREATURES(PLAYER0,20)
START_MONEY(PLAYER1,10000)
MAX_CREATURES(PLAYER1,30)
COMPUTER_PLAYER(PLAYER1,0)
START_MONEY(PLAYER2,10000)
MAX_CREATURES(PLAYER2,30)
COMPUTER_PLAYER(PLAYER2,0)

REM ************************************
SET_GENERATE_SPEED(500)
ADD_CREATURE_TO_POOL(SKELETON,20)
ADD_CREATURE_TO_POOL(TROLL,20)
ADD_CREATURE_TO_POOL(DRAGON,20)
ADD_CREATURE_TO_POOL(DEMONSPAWN,20)
ADD_CREATURE_TO_POOL(FLY,20)
ADD_CREATURE_TO_POOL(DARK_MISTRESS,20)
ADD_CREATURE_TO_POOL(SORCEROR,20)
ADD_CREATURE_TO_POOL(BILE_DEMON,20)
ADD_CREATURE_TO_POOL(BUG,20)
ADD_CREATURE_TO_POOL(VAMPIRE,20)
ADD_CREATURE_TO_POOL(SPIDER,20)
ADD_CREATURE_TO_POOL(HELL_HOUND,20)
ADD_CREATURE_TO_POOL(TENTACLE,20)
ADD_CREATURE_TO_POOL(ORC,20)

REM **********ħ**********
CREATURE_AVAILABLE(PLAYER0,BUG,1,1)
CREATURE_AVAILABLE(PLAYER0,SPIDER,1,1)
CREATURE_AVAILABLE(PLAYER0,HELL_HOUND,1,1)
CREATURE_AVAILABLE(PLAYER0,TENTACLE,1,1)
CREATURE_AVAILABLE(PLAYER1,SKELETON,1,1)
CREATURE_AVAILABLE(PLAYER1,TROLL,1,1)
CREATURE_AVAILABLE(PLAYER1,DARK_MISTRESS,1,1)
CREATURE_AVAILABLE(PLAYER1,SORCEROR,1,1)
CREATURE_AVAILABLE(PLAYER2,DRAGON,1,1)
CREATURE_AVAILABLE(PLAYER2,BILE_DEMON,1,1)
CREATURE_AVAILABLE(PLAYER2,VAMPIRE,1,1)
CREATURE_AVAILABLE(PLAYER2,ORC,1,1)
ROOM_AVAILABLE(PLAYER0,LAIR,1,0)
ROOM_AVAILABLE(PLAYER0,GARDEN,1,0)
ROOM_AVAILABLE(PLAYER0,TRAINING,1,0)
ROOM_AVAILABLE(PLAYER0,RESEARCH,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_IMP,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
MAGIC_AVAILABLE(PLAYER1,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(PLAYER1,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(PLAYER1,POWER_LIGHTNING,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER2,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(PLAYER2,POWER_LIGHTNING,1,0)
TRAP_AVAILABLE(PLAYER1,LIGHTNING,1,0)
TRAP_AVAILABLE(PLAYER1,BOULDER,1,0)
DOOR_AVAILABLE(PLAYER1,MAGIC,1,0)
TRAP_AVAILABLE(PLAYER2,LIGHTNING,1,0)
TRAP_AVAILABLE(PLAYER2,BOULDER,1,0)
DOOR_AVAILABLE(PLAYER2,MAGIC,1,0)

REM ****************ͬ********************
ALLY_PLAYERS(PLAYER1,PLAYER2)
ALLY_PLAYERS(PLAYER1,PLAYER_GOOD)
ALLY_PLAYERS(PLAYER2,PLAYER_GOOD)

REM ************************************

REM ************************************

REM ************************************
CREATE_PARTY(GOOD_0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,5000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_0,KNIGHT,10,2000,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_1)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_1,SAMURAI,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_2)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_2,MONK,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_3)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_3,WIZARD,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_4)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_4,BARBARIAN,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_5)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_5,ARCHER,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_6)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_6,DWARFA,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_7)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_7,WITCH,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_8)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_8,GIANT,10,500,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(GOOD_9)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(GOOD_9,FAIRY,10,500,ATTACK_DUNGEON_HEART,0)

CREATE_PARTY(New_1)
ADD_TO_PARTY(New_1,BARBARIAN,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_1,BARBARIAN,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_1,BARBARIAN,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_2)
ADD_TO_PARTY(New_2,GIANT,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_2,GIANT,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_2,GIANT,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_3)
ADD_TO_PARTY(New_3,SAMURAI,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_3,SAMURAI,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_3,SAMURAI,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_4)
ADD_TO_PARTY(New_4,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_4,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_4,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_4,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_4,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_5)
ADD_TO_PARTY(New_5,FAIRY,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_5,FAIRY,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_5,FAIRY,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_5,FAIRY,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_5,FAIRY,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_6)
ADD_TO_PARTY(New_6,THIEF,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_6,THIEF,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_6,THIEF,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_7)
ADD_TO_PARTY(New_7,DWARFA,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_7,DWARFA,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_7,DWARFA,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_7,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_7,ARCHER,10,200,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(New_8)
ADD_TO_PARTY(New_8,WITCH,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_8,WITCH,10,200,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(New_8,WITCH,10,200,ATTACK_DUNGEON_HEART,0)

REM **********************************

REM ***************¼*******************
QUICK_OBJECTIVE(1,"This mysterious dungeon has many creatures, rooms, technologies, and mysterious boxes, explore this dungeon and get what you want.",PLAYER0)

IF(PLAYER0,GAME_TURN>=100)
    QUICK_INFORMATION(2,"There is a portal in the south of your dungeon, it will attract creatures for you.")
ENDIF

SET_CREATURE_TENDENCIES(PLAYER1,IMPRISON,1)

IF_ACTION_POINT(6,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_1,6,2)
ENDIF
IF_ACTION_POINT(7,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_1,7,1)
ENDIF
IF_ACTION_POINT(8,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_1,8,1)
ENDIF
IF_ACTION_POINT(9,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_1,9,1)
ENDIF
IF_ACTION_POINT(10,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_2,10,1)
ENDIF
IF_ACTION_POINT(11,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_2,11,1)
ENDIF
IF_ACTION_POINT(12,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_2,12,1)
ENDIF
IF_ACTION_POINT(13,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_3,13,1)
ENDIF
IF_ACTION_POINT(14,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_2,14,1)
ENDIF
IF_ACTION_POINT(15,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_4,15,1)
ENDIF
IF_ACTION_POINT(16,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_3,16,1)
ENDIF
IF_ACTION_POINT(17,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_4,17,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_5,17,1)
ENDIF
IF_ACTION_POINT(18,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_4,18,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_5,18,1)
ENDIF
IF_ACTION_POINT(19,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_4,19,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_5,19,1)
ENDIF
IF_ACTION_POINT(20,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_7,20,1)
ENDIF
IF_ACTION_POINT(21,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_7,21,1)
ENDIF
IF_ACTION_POINT(22,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_7,22,1)
ENDIF
IF_ACTION_POINT(23,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_7,23,1)
ENDIF
IF_ACTION_POINT(24,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_7,24,1)
ENDIF
IF_ACTION_POINT(25,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_8,25,1)
ENDIF
IF_ACTION_POINT(26,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_8,26,1)
ENDIF
IF_ACTION_POINT(27,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_8,27,1)
ENDIF
IF_ACTION_POINT(28,PLAYER0)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,New_8,28,1)
ENDIF

IF_ACTION_POINT(5,PLAYER0)
    QUICK_INFORMATION(6,"You found a damaged temple, seems one of its slabs has been destroyed. Maybe there is some way to find the lost fragment to fix it!")
ENDIF

IF(PLAYER0,BILE_DEMON>=1)
    QUICK_INFORMATION(8,"'I accidentally smashed the temple, here's the fragment you want.' the bile demon said.")
    ROOM_AVAILABLE(PLAYER0,TEMPLE,1,1)
ENDIF

IF(PLAYER0,RESEARCH>=9)
    ROOM_AVAILABLE(PLAYER0,LAIR,1,1)
    TUTORIAL_FLASH_BUTTON(8,PLAYER0)
    ROOM_AVAILABLE(PLAYER0,GARDEN,1,1)
    TUTORIAL_FLASH_BUTTON(7,PLAYER0)
    QUICK_INFORMATION(10,"You found lair and hatchery plans in this library!")
ENDIF

IF(PLAYER0,TORTURE>=9)
    ADD_CREATURE_TO_POOL(DARK_MISTRESS,5)
    CREATURE_AVAILABLE(PLAYER0,DARK_MISTRESS,1,1)
    QUICK_INFORMATION(22,"You have claimed a torture chamber, and mistresses are willing to join you, you know?")
ENDIF
IF(PLAYER0,GRAVEYARD>=9)
    CREATURE_AVAILABLE(PLAYER0,VAMPIRE,1,1)
    ADD_CREATURE_TO_POOL(VAMPIRE,5)
    QUICK_INFORMATION(32,"You have claimed a scavenger room and its magic power will scavenge vampires for you!")
ENDIF

IF(PLAYER1,DUNGEON_DESTROYED==1)
    QUICK_INFORMATION(20,"After destroying blue keeper, you also stealed his techonlogy plans, now you can build bridge and traps!")
    ROOM_AVAILABLE(PLAYER0,BRIDGE,1,1)
    TRAP_AVAILABLE(PLAYER0,ALARM,1,1)
    TRAP_AVAILABLE(PLAYER0,LIGHTNING,1,1)
    TRAP_AVAILABLE(PLAYER0,LAVA,1,1)
    TRAP_AVAILABLE(PLAYER0,BOULDER,1,1)
    TRAP_AVAILABLE(PLAYER0,WORD_OF_POWER,1,1)
    TRAP_AVAILABLE(PLAYER0,POISON_GAS,1,1)
    TUTORIAL_FLASH_BUTTON(18,PLAYER0)
ENDIF

IF(PLAYER2,DUNGEON_DESTROYED==1)
    QUICK_INFORMATION(30,"After destroying green keeper, you also stealed his powerful magic books, now you can cast lightning, chicken and destroy walls spells!")
    MAGIC_AVAILABLE(PLAYER0,POWER_LIGHTNING,1,1)
    MAGIC_AVAILABLE(PLAYER0,POWER_DESTROY_WALLS,1,1)
    MAGIC_AVAILABLE(PLAYER0,POWER_CHICKEN,1,1)
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED==1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_0,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_1,-2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_2,1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_3,1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_4,2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_5,2,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_6,3,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_7,3,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_8,-1,1)
    ADD_PARTY_TO_LEVEL(PLAYER_GOOD,GOOD_9,-2,1)
    QUICK_INFORMATION(36,"Are you trembling, cowering, or even ready to retreat? The Avatar and his army just arrived here. But wait, where is the Avatar himself?")
ENDIF

IF(PLAYER_GOOD,AVATAR<=0)
    QUICK_INFORMATION(40,"After so much effort, you beat the Avatar again. Congratulations, the dominator of the underworld.")
    WIN_GAME
ENDIF




