REM play level 1

REM Orcs die

REM now we'll see who wins, right oetelaer?
REM I want you to know I really loved to see all those orcs die!


REM ******* Basic settings *******

SET_GENERATE_SPEED(10)
MAX_CREATURES(PLAYER0,50)
START_MONEY(PLAYER0,20000)

ADD_CREATURE_TO_POOL(ORC,50)

REM ********** Available creatures **********

CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,1)

IF(PLAYER0,TOTAL_CREATURES >= 50)
    CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)
ENDIF

REM ********** Available rooms **********

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)

REM ********** Available spells **********

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)

REM ********** Available doors & traps **********

REM None

REM ********** settings **********

IF(PLAYER0,DUNGEON_DESTROYED == 1)
    LOSE_GAME
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED == 1)
    WIN_GAME
ENDIF


IF_ACTION_POINT(1,PLAYER0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,2,5,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,2,5,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,2,5,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,2,5,10,0)
    ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BILE_DEMON,2,5,10,0)
ENDIF

IF_ACTION_POINT(2,PLAYER_GOOD)
    SET_FLAG(PLAYER0,FLAG0,1)
ENDIF

REM ********** Party's **********
