REM ********************************************
REM
REM            Script for Level 25 - Volcania
REM
REM ********************************************
REM Generated using Dungeon Scripter V0.84.
REM Created by Stubbjax.
REM ********************************************

REM ************** SETUP - GENERAL *************

SET_GENERATE_SPEED(400)
MAX_CREATURES(PLAYER0,11)
MAX_CREATURES(PLAYER1,11)
MAX_CREATURES(PLAYER2,11)
START_MONEY(ALL_PLAYERS,10000)
COMPUTER_PLAYER(PLAYER1,1)
COMPUTER_PLAYER(PLAYER2,1)
COMPUTER_PLAYER(PLAYER3,5)

REM ************* SETUP - CREATURES ************



REM *************** SETUP - 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)
ROOM_AVAILABLE(ALL_PLAYERS,BRIDGE,1,0)

REM ************** SETUP - SPELLS **************

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CAVE_IN,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_PROTECT,1,0)

REM *********** SETUP - TRAPS & DOORS **********

DOOR_AVAILABLE(ALL_PLAYERS,STEEL,1,10)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,10)

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

QUICK_OBJECTIVE(1,"Volcania is a land that is set inside a vast volcano. Over the years this realm has become a battlegound for keepers alike. Dispose of your three rivals here to prove your worth. This realm has no portals. It's also rumored that there's an Avatar imprisoned here. perhaps it's worth freeing him. His powers could prove useful.",PLAYER0)
ENDIF

SET_FLAG(PLAYER0,FLAG0,1)

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

IF(PLAYER0,TOTAL_CREATURES == 0)
QUICK_OBJECTIVE(2,"You've lost all of your minions, Master. Your conquest ends here.",PLAYER0)
    LOSE_GAME
ENDIF

IF(PLAYER0,FLAG0 == 1)
    IF(PLAYER_GOOD,TOTAL_CREATURES == 0)
       IF(PLAYER0,ALL_DUNGEONS_DESTROYED ==1)
QUICK_OBJECTIVE(3,"You are most definetly the Victor of this Realm, Keeper. When word of this victory gets out. It'll send shockwaves across the realm. Well Done!",PLAYER0)
    WIN_GAME   
   ENDIF
      ENDIF
        ENDIF
   