REM ********************************************
REM
REM             Script for Level 222
REM
REM ********************************************

REM Mine - Auteur: Mike Short
REM Traduction: yohabro@dungeon-keeper.net pour L'Atelier de Grmf



SET_GENERATE_SPEED(250)

MAX_CREATURES(PLAYER0,34)

START_MONEY(PLAYER0,1010101)

ADD_CREATURE_TO_POOL(AVATAR,110)

CREATURE_AVAILABLE(PLAYER0,AVATAR,1,1)

ROOM_AVAILABLE(PLAYER0,BRIDGE,1,1)

MAGIC_AVAILABLE(PLAYER0,POWER_HOLD_AUDIENCE,1,1)
MAGIC_AVAILABLE(PLAYER0,POWER_HEAL_CREATURE,1,1)
MAGIC_AVAILABLE(PLAYER0,POWER_DESTROY_WALLS,1,0)

QUICK_OBJECTIVE(12,"Vous arrivez avec peu d'aide, Gardien. La bataille a dja commenc, alors dtruisez tous les ennemis mais prenez garde ! Des avatars peuvent apparatre. Cependant, je vous donnerai quelque chose avec l'antre si vous y arrivez.",PLAYER0)

QUICK_INFORMATION(19,"Vous allez tre dtruit si vous ne faites pas attention...", PLAYER0)

CREATE_PARTY(PLATE)
	ADD_TO_PARTY(PLATE,WIZARD,7,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(PLATE,AVATAR,9,4141,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(PLATE,WITCH,8,0,DEFEND_PARTY,0)

IF_AVAILABLE(PLAYER0,SCAVENGER>=0)
	ROOM_AVAILABLE(PLAYER0,TORTURE,1,1)
        DISPLAY_INFORMATION(120,"Vous avez rcupr la salle d'enrlement ainsi que la possibilit de construire une salle des tortures.",PLAYER0)
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED==1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,PLATE,1,4)
		IF(PLAYER_GOOD,TOTAL_CREATURES==0)
			ROOM_AVAILABLE(PLAYER0,LAIR,1,1)
		ENDIF
ENDIF

IF(PLAYER_GOOD,TOTAL_CREATURES==0)
	WIN_GAME
ENDIF

IF(PLAYER0,TOTAL_CREATURES==0)
	IF(PLAYER0,DUNGEON_DESTROYED==1)
	LOSE_GAME
ENDIF
