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



REM ************** SETUP - GENERAL *************
SET_GENERATE_SPEED(500)
MAX_CREATURES(ALL_PLAYERS,14)
START_MONEY(ALL_PLAYERS,15000)



REM *************** SETUP - ROOMS **************
ROOM_AVAILABLE(PLAYER0,GUARD_POST,1,1)



REM ************** SETUP - SPELLS **************
MAGIC_AVAILABLE(PLAYER0,POWER_SIGHT,1,1)



REM *********** SETUP - TRAPS & DOORS **********
TRAP_AVAILABLE(PLAYER0,BOULDER,1,0)
DOOR_AVAILABLE(PLAYER0,MAGIC,1,0)



REM *********** SETUP - PARTIES **********
CREATE_PARTY(ONE)
    ADD_TO_PARTY(ONE,THIEF,10,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,THIEF,10,500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(ONE,THIEF,10,500,ATTACK_ENEMIES,0)

CREATE_PARTY(AVATAR)
    ADD_TO_PARTY(AVATAR,AVATAR,10,5500,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(AVATAR,MONK,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(AVATAR,MONK,10,2000,ATTACK_ENEMIES,0)
    ADD_TO_PARTY(AVATAR,MONK,10,2000,ATTACK_ENEMIES,0)



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

QUICK_OBJECTIVE(0,"The Inhabitants of this land hold all the cards against you, Keeper. Tread carefully. This realm is treacherous. Use the sight of evil spell to your advantage. It may save your life."PLAYER0)


SET_TIMER(PLAYER0,TIMER1)


IF(PLAYER_GOOD,WIZARD == 0)
	QUICK_OBJECTIVE(1,"The destruction of this goodly Wizard has revealed to us the plans for building bridges. Most useful indeed."PLAYER0)
	ROOM_AVAILABLE(PLAYER0,BRIDGE,1,1)
ENDIF


IF(PLAYER0,TIMER1 >= 100)
	QUICK_INFORMATION(3,"You have little wealth to aid you in this realm Keeper. Find a workshop to sell your doors and traps in exchange for wealth. Food is also scarce at this point, so make haste.")
ENDIF

IF(PLAYER_GOOD,KNIGHT == 0)
	QUICK_OBJECTIVE(2,"The Avatar himself has been roused from hiding. Defeat this mighty, divine adversary and the realm is yours. You haven't come all this way for nothing."PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,AVATAR,3,1)
	SET_FLAG(PLAYER0,FLAG2,1)
ENDIF


IF(PLAYER0,FLAG2 == 1)
	IF(PLAYER_GOOD,TOTAL_CREATURES == 0)
		IF(PLAYER0,ALL_DUNGEONS_DESTROYED == 1)
		WIN_GAME
		ENDIF
	ENDIF
ENDIF


REM	##################
REM	##################


IF_ACTION_POINT(1,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,ONE,1,1)
ENDIF


IF_ACTION_POINT(2,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,ONE,2,1)
ENDIF


REM	##################
REM	##################


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

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

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

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