REM Knight's Quest
REM Auteur: DzjeeAr
REM Debogage et modifications: Yohabro@dungeon-keeper.net pour l'atelier de Grmf
REM -------------------------------------------------------------------------------

REM Liste des modifications et corrections:
REM * Mod: Un lutin ajout et quelques carrs attribus au gardien rouge (a l'est, prs du coeur et au nord prs de la pice d'eau) pour pouvoir reclamer tout le territoire.
REM * Cor: Attribution d'un FLAG pour gagner. A l'origine, il fallait tuer le chevalier heros dans la zone du point d'action 15.

REM Reglages generaux -------------------------------------------------------------
QUICK_OBJECTIVE(0,"Bienvenue, Gardien. Votre tche sera un peu particulire cette fois-ci. Vous avez hrit d'un chevalier novice qui a un compte  rgler avec le Grand Seigneur local. Aidez ce Chevalier  parvenir jusqu' lui et il se chargera de vous livrer ce monde souterrain.",PLAYER0)
START_MONEY(PLAYER0,0)

IF(PLAYER0,KNIGHT==0)
        LOSE_GAME
ENDIF

SET_CREATURE_STRENGTH(THIEF,20)
SET_CREATURE_HEALTH(KNIGHT,1400)

SET_FLAG(PLAYER0,FLAG0,0)


REM 
IF(PLAYER0,MONEY>=35000)
        QUICK_INFORMATION(5,"Bonne nouvelle, Gardien: le sort 'Gurison' est disponible. Mais attention, vous devez disposer d'au moins 35000 pices d'or pour pouvoir l'utiliser.")
        NEXT_COMMAND_REUSABLE
        MAGIC_AVAILABLE(PLAYER0,POWER_HEAL_CREATURE,1,1)
ENDIF

IF(PLAYER0,MONEY<35000)
        NEXT_COMMAND_REUSABLE
        MAGIC_AVAILABLE(PLAYER0,POWER_HEAL_CREATURE,0,0)
ENDIF

IF_ACTION_POINT(1,PLAYER0)
        QUICK_INFORMATION(1,"Bonne nouvelle, Gardien. Vous avez de l'aide...")
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,2,5,1,0)
ENDIF

IF_ACTION_POINT(3,PLAYER0)
        QUICK_INFORMATION(2,"Attention, Gardien ! Une escouade dbarque et vous recherche...")
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,4,7,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,4,2,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,5,7,2,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,5,3,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,6,9,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,6,3,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,7,10,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,7,2,3,0)
ENDIF

IF(PLAYER_GOOD,BILE_DEMON==0)
        QUICK_INFORMATION(3,"Attention, Gardien ! Une troupe de Dmons avortons hros vient  votre rencontre...")
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,8,2,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,9,3,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,10,2,2,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,11,2,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,12,3,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,DEMONSPAWN,13,4,1,0)
        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,14,8,1,0)
        IF(PLAYER_GOOD,TOTAL_CREATURES==0)
                IF_ACTION_POINT(15,PLAYER0)
                        QUICK_INFORMATION(4,"Le grand seigneur approche !...")
                        ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,KNIGHT,10,1,6,50000)
                        SET_FLAG(PLAYER0,FLAG0,1)
                ENDIF
        ENDIF
ENDIF

IF(PLAYER0,FLAG0==1)
        IF(PLAYER_GOOD,KNIGHT==0)
                WIN_GAME
        ENDIF
ENDIF
