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

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

SET_GENERATE_SPEED(400)
MAX_CREATURES(PLAYER0,30)
START_MONEY(PLAYER0,12000)

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

ADD_CREATURE_TO_POOL(DWARFA,20)
ADD_CREATURE_TO_POOL(BARBARIAN,20)
ADD_CREATURE_TO_POOL(GIANT,20)
ADD_CREATURE_TO_POOL(THIEF,10)
ADD_CREATURE_TO_POOL(ARCHER,20)
ADD_CREATURE_TO_POOL(SAMURAI,10)
ADD_CREATURE_TO_POOL(WIZARD,10)
ADD_CREATURE_TO_POOL(FAIRY,20)

CREATURE_AVAILABLE(PLAYER0,DWARFA,1,1)
CREATURE_AVAILABLE(PLAYER0,BARBARIAN,1,1)
CREATURE_AVAILABLE(PLAYER0,GIANT,1,1)
CREATURE_AVAILABLE(PLAYER0,THIEF,1,1)
CREATURE_AVAILABLE(PLAYER0,ARCHER,1,1)
CREATURE_AVAILABLE(PLAYER0,SAMURAI,1,1)
CREATURE_AVAILABLE(PLAYER0,WIZARD,1,1)
CREATURE_AVAILABLE(PLAYER0,FAIRY,1,1)

REM *************** SETUP - ROOMS **************

ROOM_AVAILABLE(PLAYER0,TREASURE,1,1)
ROOM_AVAILABLE(PLAYER0,LAIR,1,1)
ROOM_AVAILABLE(PLAYER0,GARDEN,1,1)
ROOM_AVAILABLE(PLAYER0,TRAINING,1,1)
ROOM_AVAILABLE(PLAYER0,RESEARCH,1,1)
ROOM_AVAILABLE(PLAYER0,BRIDGE,1,1)
ROOM_AVAILABLE(PLAYER0,GUARD_POST,1,1)
ROOM_AVAILABLE(PLAYER0,WORKSHOP,1,0)
ROOM_AVAILABLE(PLAYER0,TORTURE,1,0)
ROOM_AVAILABLE(PLAYER0,BARRACKS,1,0)
ROOM_AVAILABLE(PLAYER0,GRAVEYARD,1,0)

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

MAGIC_AVAILABLE(PLAYER0,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER0,POWER_SIGHT,1,1)
MAGIC_AVAILABLE(PLAYER0,POWER_SPEED,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_CALL_TO_ARMS,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_CAVE_IN,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(PLAYER0,POWER_LIGHTNING,1,1)
MAGIC_AVAILABLE(PLAYER0,POWER_DISEASE,1,1)

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

TRAP_AVAILABLE(PLAYER0,ALARM,1,0)
TRAP_AVAILABLE(PLAYER0,POISON_GAS,1,0)
TRAP_AVAILABLE(PLAYER0,WORD_OF_POWER,1,0)
DOOR_AVAILABLE(PLAYER0,WOOD,1,0)
DOOR_AVAILABLE(PLAYER0,BRACED,1,0)
DOOR_AVAILABLE(PLAYER0,STEEL,1,0)

CREATE_PARTY(ONE)
    ADD_TO_PARTY(ONE,WIZARD,8,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,BARBARIAN,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,GIANT,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,FAIRY,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,SAMURAI,9,500,ATTACK_ENEMIES,0)

CREATE_PARTY(TWO)
    ADD_TO_PARTY(TWO,BARBARIAN,5,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(TWO,THIEF,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(TWO,ARCHER,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(TWO,ARCHER,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(TWO,THIEF,6,500,ATTACK_ENEMIES,0)

CREATE_PARTY(THREE)
    ADD_TO_PARTY(THREE,GIANT,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(THREE,GIANT,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(THREE,DWARFA,8,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(THREE,DWARFA,8,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(THREE,ARCHER,8,500,ATTACK_ENEMIES,0)

CREATE_PARTY(FOUR)
    ADD_TO_PARTY(FOUR,WICTH,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FOUR,WICTH,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FOUR,GIANT,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FOUR,WIZARD,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FOUR,FAIRY,6,500,ATTACK_ENEMIES,0)

CREATE_PARTY(FIVE)
    ADD_TO_PARTY(FIVE,MONK,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FIVE,BARBARIAN,6,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FIVE,GIANT,9,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FIVE,MONK,9,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(FIVE,FAIRY,8,500,ATTACK_ENEMIES,0)

CREATE_PARTY(SIX)
    ADD_TO_PARTY(SIX,THIEF,8,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(SIX,BARBARIAN,9,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(SIX,WIZARD,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(SIX,GIANT,7,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(SIX,ARCHER,6,500,ATTACK_ENEMIES,0)

CREATE_PARTY(LANDLORD)
    ADD_TO_PARTY(LANDLORD,KNIGHT,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(LANDLORD,DWARFA,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(LANDLORD,DWARFA,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(LANDLORD,GIANT,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(LANDLORD,GIANT,10,2000,ATTACK_ENEMIES,0)

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

QUICK_OBJECTIVE(1,"The inhabitants of this land already have a Hero Fortress here. They're planning a full scale attack on your dungeon. Hurry! You only have several minutes to wall yourself in and train up a suitable strong fighting force before venturing out for more resources.",ALL_PLAYERS)

SET_TIMER(PLAYER_GOOD,TIMER1)

IF_ACTION_POINT(7,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,7,1)
	SET_FLAG(PLAYER0,FLAG0,1)
ENDIF

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

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

IF(PLAYER_GOOD,TIMER1 >= 3000)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,ONE,1,DUNGEON,0,2,1500)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,TWO,2,DUNGEON,0,6,1500)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,THREE,3,DUNGEON,0,4,1500)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,FOUR,4,DUNGEON,0,5,1500)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,FIVE,5,DUNGEON,0,7,1500)
	ADD_TUNNELLER_PARTY_TO_LEVEL(PLAYER_GOOD,SIX,6,DUNGEON,0,3,1500)
	SET_FLAG(PLAYER0,FLAG0,1)
	SET_FLAG(PLAYER0,FLAG1,1)
ENDIF

IF(PLAYER0,FLAG1 == 1)
	QUICK_OBJECTIVE(2,"Brace yourself, keeper! The enemy are upon us. Dispose of them any way you see fit. Then we can turn the tables on the good Lord of this realm by reducing his fortress to a burning pile of rubble.",ALL_PLAYERS)
ENDIF

IF(PLAYER0,FLAG0 == 1)
	IF(PLAYER_GOOD,DUNGEON_DESTROYED ==1)
		IF(PLAYER_GOOD,TOTAL_CREATURES == 0)
			QUICK_OBJECTIVE(3,"Magnificent, my Lord! You have won a truly, outstanding victory against formidable opponents. Conan is most pleased with your progress...",ALL_PLAYERS)
			WIN_GAME
		ENDIF
	ENDIF
ENDIF

