LEVEL_VERSION(1)
SET_GENERATE_SPEED(500)

COMPUTER_PLAYER(PLAYER1,0)

MAX_CREATURES(PLAYER0,10)
MAX_CREATURES(PLAYER1,25)

START_MONEY(PLAYER0,30000)
START_MONEY(PLAYER1,10000)

ADD_CREATURE_TO_POOL(DRAGON,10)
ADD_CREATURE_TO_POOL(SORCEROR,10)
ADD_CREATURE_TO_POOL(ORC,10)
ADD_CREATURE_TO_POOL(HELL_HOUND,10)

CREATURE_AVAILABLE(PLAYER1,DRAGON,1,0)
CREATURE_AVAILABLE(PLAYER1,SORCEROR,1,0)
CREATURE_AVAILABLE(PLAYER1,ORC,1,0)
CREATURE_AVAILABLE(PLAYER1,HELL_HOUND,1,0)
CREATURE_AVAILABLE(PLAYER1,VAMPIRE,1,0)

TRAP_AVAILABLE(PLAYER1,ALARM,1,1)

MAGIC_AVAILABLE(PLAYER0,POWER_HEAL_CREATURE,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_CALL_TO_ARMS,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_SPEED,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_CONCEAL,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_HEAL_CREATURE,1,1)
MAGIC_AVAILABLE(PLAYER1,POWER_DESTROY_WALLS,1,0)

SET_CREATURE_CONFIGURATION(WIZARD,Health,20)
SET_CREATURE_CONFIGURATION(BARBARIAN,Health,20)
SET_CREATURE_CONFIGURATION(ARCHER,Health,20)
SET_CREATURE_CONFIGURATION(MONK,Health,20)
SET_CREATURE_CONFIGURATION(DWARFA,Health,20)
SET_CREATURE_CONFIGURATION(KNIGHT,Health,2000)
SET_CREATURE_CONFIGURATION(KNIGHT,Strength,22)
SET_CREATURE_CONFIGURATION(KNIGHT,Armour,1000)
SET_CREATURE_CONFIGURATION(KNIGHT,Defence,110)
SET_CREATURE_CONFIGURATION(AVATAR,Health,200)
SET_CREATURE_CONFIGURATION(TUNNELLER,Health,20)
SET_CREATURE_CONFIGURATION(TUNNELLER,Strength,6)
SET_CREATURE_CONFIGURATION(WITCH,Health,20)
SET_CREATURE_CONFIGURATION(GIANT,Health,20)
SET_CREATURE_CONFIGURATION(FAIRY,Health,20)
SET_CREATURE_CONFIGURATION(THIEF,Health,20)
SET_CREATURE_CONFIGURATION(SAMURAI,Health,700)
SET_CREATURE_CONFIGURATION(HORNY,Health,20)
SET_CREATURE_CONFIGURATION(SKELETON,Health,20)
SET_CREATURE_CONFIGURATION(TROLL,Health,20)
SET_CREATURE_CONFIGURATION(DRAGON,Health,80)
SET_CREATURE_CONFIGURATION(DEMONSPAWN,Health,20)
SET_CREATURE_CONFIGURATION(FLY,Health,20)
SET_CREATURE_CONFIGURATION(DARK_MISTRESS,Health,20)
SET_CREATURE_CONFIGURATION(SORCEROR,Health,35)
SET_CREATURE_CONFIGURATION(BILE_DEMON,Health,20)
SET_CREATURE_CONFIGURATION(IMP,Health,20)
SET_CREATURE_CONFIGURATION(BUG,Health,20)
SET_CREATURE_CONFIGURATION(VAMPIRE,Health,80)
SET_CREATURE_CONFIGURATION(SPIDER,Health,20)
SET_CREATURE_CONFIGURATION(HELL_HOUND,Health,40)
SET_CREATURE_CONFIGURATION(GHOST,Health,20)
SET_CREATURE_CONFIGURATION(TENTACLE,Health,20)
SET_CREATURE_CONFIGURATION(ORC,Health,80)


IF(PLAYER0,SAMURAI <= 0)
    LOSE_GAME
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED == 1)
    WIN_GAME
ENDIF

REM _a | temple
IF_ACTION_POINT(1,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,HORNY,2,2,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,HORNY,3,3,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,HORNY,4,3,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,HORNY,5,2,10,0)
ENDIF

REM ې | Cobblestone
IF_ACTION_POINT(6,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,WITCH,7,5,10,0)
ENDIF

REM Back Attack
IF_ACTION_POINT(8,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SKELETON,9,4,10,300)
    SET_FLAG(PLAYER0,FLAG1,1)
ENDIF

IF_ACTION_POINT(10,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SKELETON,11,4,10,300)
    SET_FLAG(PLAYER0,FLAG2,1)
ENDIF

IF_ACTION_POINT(12,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SKELETON,13,4,10,300)
    SET_FLAG(PLAYER0,FLAG3,1)
ENDIF

IF_ACTION_POINT(14,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SKELETON,15,4,10,300)
    SET_FLAG(PLAYER0,FLAG4,1)
ENDIF

IF_ACTION_POINT(16,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SKELETON,17,4,10,300)
    SET_FLAG(PLAYER0,FLAG5,1)
ENDIF

IF(PLAYER0,FLAG1 == 1)
    IF(PLAYER0,FLAG2 == 1)
        IF(PLAYER0,FLAG3 == 1)
            IF(PLAYER0,FLAG4 == 1)
                IF(PLAYER0,FLAG5 == 1)
                    IF(PLAYER_GOOD,SKELETON <= 0)
                        REM ې΂NN[`𗎂Ƃ->Oi\ | Drops creatures that activate boulders -> allows progress
                        ADD_CREATURE_TO_LEVEL(PLAYER0,GHOST,18,1,1,0)
                    ENDIF
                ENDIF
            ENDIF
        ENDIF
    ENDIF
ENDIF

REM  | Branching
IF(PLAYER1,DUNGEON_DESTROYED == 1)
    ADD_CREATURE_TO_LEVEL(PLAYER0,GHOST,30,1,1,0)
ENDIF

IF_ACTION_POINT(30,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER0,GHOST,24,1,1,0)
ENDIF

REM O | Three options
IF_ACTION_POINT(21,PLAYER0)
    REM ͂ | Miss
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,21,15,4,0)
ENDIF

IF_ACTION_POINT(22,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER0,GHOST,23,1,1,0)
    ADD_CREATURE_TO_LEVEL(PLAYER0,GHOST,28,1,1,0)
ENDIF

REM  | duel
CREATE_PARTY(HEARTATTACKERS)
    ADD_TO_PARTY(HEARTATTACKERS,KNIGHT,10,0,ATTACK_DUNGEON_HEART,0)
    ADD_TO_PARTY(HEARTATTACKERS,KNIGHT,10,0,ATTACK_DUNGEON_HEART,0)

IF_ACTION_POINT(31,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,AVATAR,-2,1,10,15000)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,GIANT,-2,4,10,0)
    ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,HEARTATTACKERS,-1,DUNGEON_HEART,0,10,0)
    SET_FLAG(PLAYER0,FLAG0,1)
ENDIF

IF(PLAYER0,FLAG0 == 1)
    IF(PLAYER_GOOD,AVATAR <= 0)
        REM Ǖӂ𗘗p\ɁBwDHɃANZX\ | Destroy Walls is now available. You can now access the DH behind you.
        MAGIC_AVAILABLE(PLAYER0,POWER_DESTROY_WALLS,1,1)
        SET_FLAG(PLAYER0,FLAG0,2)
    ENDIF
ENDIF
