// Pierres de rappel
int bHasGoodStone = GetItemPossessedBy(oActivator, "pierre_sacree2") != OBJECT_INVALID;
int bHasEvilStone = GetItemPossessedBy(oActivator, "pierre_mal") != OBJECT_INVALID;
int bHasNeutralStone = GetItemPossessedBy(oActivator, "pierre_univ") != OBJECT_INVALID;
int bhasMenotte = GetItemPossessedBy(oActivator, "menoNODROP") != OBJECT_INVALID;
int bUseGoodStone = sItemTag == "pierre_sacree2";
int bUseEvilStone = sItemTag == "pierre_mal";
int bUseNeutralStone = sItemTag == "pierre_univ";

if (bUseGoodStone || bUseEvilStone || bUseNeutralStone) // Une pierre de rappel a ete utilisee
    {
    string tArea = GetTag(GetArea(oActivator));
    int iArea = StringToInt(GetSubString(tArea, 5, GetStringLength(tArea)-5));
    if (bHasGoodStone + bHasEvilStone + bHasNeutralStone + bhasMenotte == 1) // Il n'en possede bien qu'une
        if ((iArea>=140 && iArea<=179) || (iArea>=190 && iArea<=199))
            {SendMessageToPC(oActivator,"Les puissantes protections magiques de cet endroit empechent votre pierre de fonctionner"); return;}
        else
        {
        location LastRecallUsed; // Set the location variable
        LastRecallUsed = GetLocation(oActivator); // Get the location, fill up the variable
        SetLocalLocation(oActivator,"LastRecallUsed",LastRecallUsed); // Set where the portal jump the player to
        SetLocalInt(oActivator,"HasRecalled",1); // To make the recall poretal tells the player if he want to go back
        ActionCastFakeSpellAtObject ( SPELL_DISMISSAL , oActivator);
        int bFighting = 0;
        int nHD = GetHitDice(oActivator);

        if (GetIsInCombat(oActivator)) bFighting = 1;
        //{SendMessageToPC(oActivator, "Vous n'arrivez pas a vous concentrer suffisamment pendant le combat pour utiliser cette pierre de rappel"); return;}
        int nXP = GetXP(oActivator);
        int nPenalty = 0;
        int nGoldPenalty = nHD * nHD * nHD;
        if (bFighting) nPenalty = nHD*nHD;
        if (bFighting) nGoldPenalty *= 4;
        // * You can not lose a level with this respawning
        int nMin = ((nHD * (nHD - 1)) / 2) * 1000;
        if (GetGold(oActivator)<nGoldPenalty)
            nGoldPenalty = GetGold(oActivator);

        int nNewXP = nXP - nPenalty;
        if (nNewXP < nMin)
            nNewXP = nMin;
        SetXP(oActivator, nNewXP);
        TakeGoldFromCreature(nGoldPenalty, oActivator, TRUE);

        if (bUseGoodStone) AssignCommand(oActivator,JumpToLocation(GetLocation(GetObjectByTag("pierre_sacree2")))); // Get the player to the temple
        if (bUseEvilStone) AssignCommand(oActivator,JumpToLocation(GetLocation(GetObjectByTag("pierre_mal")))); // Get the player to the temple
        if (bUseNeutralStone) AssignCommand(oActivator,JumpToLocation(GetLocation(GetObjectByTag("temple_venus")))); // Get the player to the temple
        }
    return;
    }

SetLocalLocation(oActivator,"LastRecallUsed",LastRecallUsed); // Set where the portal jump the player to
        SetLocalInt(oActivator,"HasRecalled",1); // To make the recall poretal tells the player if he want to go back
        ActionCastFakeSpellAtObject ( SPELL_DISMISSAL , oActivator);
        int bFighting = 0;
        int nHD = GetHitDice(oActivator);