object oPC = GetLastAttacker(OBJECT_SELF);
object oVideur = GetObjectByTag("videur");

void main()
{
SetLocalInt(oPC, "gardeauberge", GetLocalInt(oPC, "gardeauberge")+1);
AssignCommand(oVideur, ActionMoveToObject (oPC, TRUE));
AssignCommand(oPC, ClearAllActions(TRUE));
DelayCommand(3.0, ActionStartConversation(oVideur, "videur"));
}

object oPC = GetLastAttacker(OBJECT_SELF);
object oVideur = GetObjectByTag("videur");

void main()
{
SetLocalInt(oPC, "gardeauberge", GetLocalInt(oPC, "gardeauberge")+1);
ActionSpeakString(GetLocalString(oPC, "gardeauberge")); // Test pour vérifier l'état de la variable
AssignCommand(oVideur, ActionMoveToObject (oPC, TRUE));
AssignCommand(oPC, ClearAllActions(TRUE));
DelayCommand(5.0, AssignCommand(oVideur, ActionStartConversation(oPC, "videur")));
}

object oPC = GetLastAttacker(OBJECT_SELF);
object oVideur = GetObjectByTag("videur");

void main()
{
SetLocalInt(oPC, "gardeauberge", GetLocalInt(oPC, "gardeauberge")+1); // Là on incrémente le compteur d'avertissements
AssignCommand(oVideur, ActionMoveToObject (oPC, TRUE)); // Le videur marche vers le joueur
AssignCommand(oPC, ClearAllActions(TRUE)); // On fait arrêter l'action d'attaquer la porte au joueur
DelayCommand(3.0, AssignCommand(oVideur, ActionStartConversation(oPC, "videur"))); // Petit délais obligatoire pour laisser au videur le temps d'arriver jusqu'au joueur
}

/* Script permettant au NPC de s’adresser au PC "en train de terminer" une ‘Action’…
A mettre uniquement dans les ‘OnPhysicalAttacked’ & ‘OnSpellCastAt’ :
NOTE: Il est inutile ici d’initialiser la Variable, puisqu'elle le sera par l''Incrémentation' ;
au départ elle sera considérée donc comme ‘Nulle par défaut'. */

void main()
{
    object oPC = GetLastAttacker(); // On repère l''Agresseur' de la Porte
    object oVideur = GetNearestObjectByTag("videur"); // Au cas où on voudrait avoir plusieurs gars
    int nValue = GetLocalInt(oPC, "gardeauberge"); // 'Acquisition' de la Valeur "en cours"

    AssignCommand(oPC, ClearAllActions()); // Arrête le PC dans son "Action d’éclat"
    AssignCommand(oVideur, ClearAllActions()); // On s’assure que le NPC puisse faire ainsi ce qu’on lui demande
    AssignCommand(oVideur, ActionMoveToObject (oPC, TRUE)); // Amène le NPC vers le fauteur
    SetLocalInt(oPC, "gardeauberge", nValue+1); // De ‘Nulle’ la Variable passe à ‘+1’ ; et ainsi de suite

    if (nValue < 1) // On vérifie si une Variable a déjà été définie ; sinon :
    AssignCommand(oVideur, SpeakString("Hé! Calmez-vous là!")); // Le NPC peut interpeller le PC avant de retourner à sa place
    DelayCommand(5.0, AssignCommand(oVideur, ActionMoveToLocation(GetLocation(GetObjectByTag("poste_videur")))));

    if (nValue == 1) // On vérifie que la Variable est bien ‘Acquise’ à ‘1’ :
    AssignCommand(oVideur, SpeakString("Arrêtez-vous de suite! C'est la dernière fois que je vous le dis!")); // Idem au précédent
    DelayCommand(5.0, AssignCommand(oVideur, ActionMoveToLocation(GetLocation(GetObjectByTag("poste_videur")))));

    if (nValue == 2) // On s’assure que la Variable est passée à ‘2’ :
    {
    AssignCommand(oVideur, SpeakString("Très bien, vous l'aurez voulu!")); // Dernière Sommation
    AdjustReputation(oPC, oVideur, -100); // Mode ‘Agressif’ du NPC contre le PC
    AssignCommand(oVideur, ActionAttack(oPC)); // Mode ‘Combat’ du NPC contre le PC
    }
}

/* Script permettant au NPC de s’adresser au PC "en train de terminer" une ‘Action’…
A mettre uniquement dans les ‘OnPhysicalAttacked’ & ‘OnSpellCastAt’ :
NOTE: Il est inutile ici d’initialiser la Variable, puisqu'elle le sera par l''Incrémentation' ;
au départ elle sera considérée donc comme ‘Nulle par défaut'. */

void main()
{
    object oPC = GetLastAttacker(); // On repère l''Agresseur' de la Porte
    object oVideur = GetNearestObjectByTag("videur"); // Au cas où on voudrait avoir plusieurs gars
    int nValue = GetLocalInt(oPC, "gardeauberge"); // 'Acquisition' de la Valeur "en cours"

    AssignCommand(oPC, ClearAllActions()); // Arrête le PC dans son "Action d’éclat"
    AssignCommand(oVideur, ClearAllActions()); // On s’assure que le NPC puisse faire ainsi ce qu’on lui demande
    AssignCommand(oVideur, ActionMoveToObject (oPC, TRUE)); // Amène le NPC vers le fauteur
    DelayCommand(8.0, AssignCommand(oVideur, ActionMoveToLocation(GetLocation(GetObjectByTag("poste_videur"))))); // Retour
    SetLocalInt(oPC, "gardeauberge", nValue+1); // De ‘Nulle’ la Variable passe à ‘+1’ ; et ainsi de suite

    if (nValue < 1) // On vérifie si une Variable a déjà été définie ; sinon :
    AssignCommand(oVideur, SpeakString("Hé! Calmez-vous là!")); // Le NPC peut interpeller le PC

    if (nValue == 1) // On vérifie que la Variable est bien ‘Acquise’ à ‘1’ :
    AssignCommand(oVideur, SpeakString("Arrêtez-vous de suite! C'est la dernière fois que je vous le dis!")); // Idem au précédent

    if (nValue > 1) // On s’assure que la Variable est maintenant supérieur à '1' :
    {
    AssignCommand(oVideur, SpeakString("Très bien, vous l'aurez voulu!")); // Dernières Sommations
    AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_LISTEN)); // Le PC est interpelé par l'injonction
    DelayCommand(0.0, SetCommandable(FALSE, oPC)); // Le PC s'arrête sous l'ordre brutal
    AdjustReputation(oPC, oVideur, -100); // Mode ‘Agressif’ du NPC contre le PC
    AssignCommand(oVideur, ActionAttack(oPC)); // Mode ‘Combat’ du NPC contre le PC
    DelayCommand(1.5, SetCommandable(TRUE, oPC)); // Le PC reprends ensuite ses esprits
    DelayCommand(5.0, AssignCommand(oVideur, SurrenderToEnemies())); // Break, le NPC se contentant d'un brève correction
    DelayCommand(6.5, AssignCommand(oVideur, SpeakString("Et que je ne vous y reprenne plus!")));
    }
}

/* Script permettant au NPC de s’adresser au PC "en train de terminer" une ‘Action’…
A mettre uniquement dans les ‘OnPhysicalAttacked’ & ‘OnSpellCastAt’ :
NOTE: Il est inutile ici d’initialiser la Variable, puisqu'elle le sera par l''Incrémentation' ;
au départ elle sera considérée donc comme ‘Nulle par défaut'. */

void main()
{
    object oPC = GetLastAttacker(); // On repère l''Agresseur' de la Porte
    object oVideur = GetNearestObjectByTag("videur"); // Au cas où on voudrait avoir plusieurs gars
    string sSpeak; // Phrase que le NPC devra prononcer...
    string sVarName = "gardeauberge"; // Nom de la Variable "gardeauberge"
    int nValue = GetLocalInt(oPC, sVarName); // 'Acquisition' de la Valeur "en cours"
    int bRun = TRUE; // Mode 'Course'
    location lPoste = GetLocation(GetObjectByTag("poste_videur")); // Localisation du 'Poste' du Videur

    AssignCommand(oPC, ClearAllActions()); // Arrête le PC dans son "Action d’éclat"
    AssignCommand(oVideur, ClearAllActions()); // On s’assure que le NPC puisse faire ainsi ce qu’on lui demande

    switch (nValue)
    {
        // Valeur par defaut avant initialisation de la Variable "gardeauberge" :
        case 0//: sSpeak = "Hé! Calmez-vous là!"; break;

         // Valeur de la Variable "gardeauberge" apres le 1er avertissement :
        case 1//: sSpeak = "Arrêtez-vous de suite! C'est la dernière fois que je vous le dis!"; break;

        // Toutes autres Valeurs de la Variable "gardeauberge" (a partir de la 3e Sommation) :
        default //: sSpeak = "Très bien, vous l'aurez voulu!";
        AssignCommand(oVideur, ActionAttack(oPC)); break; // (NPC Mode en ‘Combat’ non 'Aggressif')
    }

    AssignCommand(oVideur, ActionMoveToObject (oPC, bRun)); // Amène le NPC vers le fauteur
    AssignCommand(oVideur, SpeakString(sSpeak)); // Le NPC interpelle le PC (par 'Texte Flottant')
    sSpeak = "Et que je ne vous y reprenne plus!"; // Phrase de 'Retour'...
    DelayCommand(7.8, AssignCommand(oVideur, SpeakString(sSpeak))); // Expression sur le 'Retour'
    DelayCommand(8.0, AssignCommand(oVideur, ActionMoveToLocation(lPoste))); // 'Retour' au Poste

    SetLocalInt(oPC, sVarName, nValue+1); // De ‘Nulle’ la Variable passe à ‘+1’ (et ainsi de suite!)
}