DelayCommand(1.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),A));
DelayCommand(1.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),D));

DelayCommand(2.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),B));
DelayCommand(2.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),E));

DelayCommand(3.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),C));
DelayCommand(3.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_IMP_DEATH),D));

//::///////////////////////////////////////////////
//:: FileName BB_SETKEY
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Konrad
//:: Created On: 02/01/03 10:54:29
//:://////////////////////////////////////////////

void main()
{
    // Déterminer la variable du module qui comptera le nombre de clefs
    SetLocalInt(GetModule(), "bbKey",1);
}

//::///////////////////////////////////////////////
//:: FileName BB_BBKEY
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Konrad
//:: Created On: 02/01/03 10:54:29
//:://////////////////////////////////////////////
#include "nw_i0_tool"

void main()
{

/*
key_ak
key_cassin
key_kag
key_konrad
key_pp
key_thorgal
*/


    // Déterminer les variables
    int iKey = GetLocalInt(GetModule(), "bbKey");
    object oPC = GetEnteringObject();
    // Vérifier que le PJ qui entre dans la mod possède une ou plusieurs clefs dans son inventaire

    if(!CheckPartyForItem(oPC, "key_konrad"))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}

    if(!CheckPartyForItem(oPC, "key_cassin"))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}

    if(!CheckPartyForItem(oPC, "key_ak "))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}

    if(!CheckPartyForItem(oPC, "key_kag "))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}

    if(!CheckPartyForItem(oPC, "key_pp "))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}

    if(!CheckPartyForItem(oPC, "key_thorgal"))
        {
        // S'il possde une clef, upgrader la variable locale du module
        iKey = iKey + 1;
        }else{/*Ne rien faire*/}



if(iKey < 6)
    {
   //  Mise  jour du journal de tous les PJ
    SetLocalInt(GetModule(), "bbKey",iKey);
    AddJournalQuestEntry("BBKey",iKey,oPC,TRUE,TRUE,FALSE);
    }
else
    {
// Si des joueurs jouent un meme mod chacun de leur cote puis finissent par lancer une partie ensemble, il risque d'y avoir un bug dans le journal.
// Donc -> Reinitialisation de la variable du mod
    SetLocalInt(GetModule(), "bbKey",6);
    AddJournalQuestEntry("BBKey",iKey,oPC,TRUE,TRUE,FALSE);
    }
}