//:///////////////////////// ////////////////////
//:: Created By:  Konrad
//:: Created On:  30/11/02
//:: Dragon Noir, l'Exil.
//:///////////////////////// ////////////////////
#include "nw_i0_plot"

// * Applies an XP and GP penalty
// * to the player respawning
void ApplyPenalty(object oDead)
{
    int nXP = GetXP(oDead);
    int nPenalty = 50 * GetHitDice(oDead);
    int nHD = GetHitDice(oDead);
    // * You can not lose a level with this respawning
    int nMin = ((nHD * (nHD - 1)) / 2) * 1000;

    int nNewXP = nXP - nPenalty;
    if (nNewXP < nMin)
      nNewXP = nMin;
    SetXP(oDead, nNewXP);
    int nGoldToTake = FloatToInt(0.10 * GetGold(oDead));
    // * a cap of 10 000gp taken from you
    if (nGoldToTake > 10000)
    {
        nGoldToTake = 10000;
    }
    AssignCommand(oDead, TakeGoldFromCreature(nGoldToTake, oDead, TRUE));
    DelayCommand(4.0, FloatingTextStrRefOnCreature(58299, oDead, FALSE));
    DelayCommand(4.8, FloatingTextStrRefOnCreature(58300, oDead, FALSE));

}


////////////////////////////// ////////////////////////////// //////////////////


void main()
{

    //* Return PC to Zacharie


    object oRespawner = GetLastRespawnButtonPresser();
    string sDestTag = "dnrespawn1";
    string sArea = GetTag(GetArea(oRespawner));
    int iNewvie = GetLocalInt(oRespawner,"vie")-1;
    /*
      Indication du point de Respawn en fonction de la zone
    */

    if (sArea == "ArKIrissLechteauenruineExtrieur" ||
    sArea == "ArKIrissLacabaneduGnome" ||
    sArea == "ArKIrissLebosquetbrumeux" ||
    sArea == "ArKIrissLeportail" ||
    sArea == "ArKIrissLechteauenruineIntrieur")
    {
        sDestTag = "dnrespawn1";
    }
    else
    {
      if (sArea == "ArKIrissLeplandecombat" ||
      sArea == "ArKIrissLacroisedeschemins" ||
      sArea == "ArKIrissLaFortdePnradLaclairires" ||
      sArea == "ArKIrissLaFortdePnradLevillagede" ||
      sArea == "ArKIrissLaFortdePnradLeVillageEl" ||
      sArea == "ArKIrissLaFortdePnradPortesElfiq" ||
      sArea == "ArKIrissLaFortdePnradUnlongchemi" ||
      sArea == "ArKIrissLavalledeGoblinsLaRouted" ||
      sArea == "ArKIrissLavalledesGoblinsLeMouli" ||
      sArea == "ArKIrissLavalledesGobelinsLeMoul" ||
      sArea == "ArKIrissLavalledesGobelinsLeMoul" ||
      sArea == "ArKIrissLeMontKarthmLaRouteduSud" ||
      sArea == "ArKIrissLeMontKarthmLaSourceMagi" ||
      sArea == "ArKIrissLesGrottesdesTrollsEntre" ||
      sArea == "ArKIrissLesCavernesdesTrollsLaCa" ||
      sArea == "ArKIrissLesCavernesdesTrollsTunn")
      {
      sDestTag = "dnrespawn2";
      }
      else
      {
            if (sArea == "ArKIrissLeSiege")
            {
            sDestTag = "dnrespawn3";
            }
            else
            {
              if (sArea == "ArKIrissLeDragonNoir" ||
                    sArea == "ArKIrissLaboutiqueduGnome" ||
                    sArea == "TentedeBlackFox")
                    {
                    sDestTag = "dnrespawn4";
                    }
                    else
                    {
                            if (sArea == "ArKIrissLeLacduDragon" ||
                            sArea == "ArKIrissLacavernedesNains" ||
                            sArea == "ArKIrissLesCavernesdesNainsLesmi" ||
                            sArea == "ArKIrissLesCavernesdesNainsLamai" ||
                            sArea == "ArKIrissLesCavernesdesNainsTunel" ||
                            sArea == "ArKIrissLesCavernesdesNainsLeVil" ||
                            sArea == "ArKIrissLescavernesdesnainsLesGa")
                            {
                                sDestTag = "dnrespawn5";
                            }
                            else
                            {
                            //ne rien faire
                            }
                    }

            }
      }
    }


//  Respawn si le module Dragon Noir - Pelude a ete termine

   
    if(GetIsObjectValid(GetItemPossessedBy(oRespawner, "rebelle")))
    {
        if(GetLocalInt(oRespawner,"vie")>0)
        {

        ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectResurrection(),oRespawner);
        ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectHeal(GetMaxHitPoints(oRespawner)), oRespawner);
        RemoveEffects(oRespawner);
        ApplyPenalty(oRespawner);

        object oSpawnPoint = GetObjectByTag(sDestTag);
        AssignCommand(oRespawner,JumpToLocation(GetLocation(oSpawnPoint)));
        SetLocalInt(oRespawner,"vie",iNewvie);
        }
        else
        {
        //ne rien faire
        SendMessageToPC(oRespawner,"RESURECTION IMPOSSIBLE : PLUS DE VIE");
        }
    }
    else
    {
  //ne rien faire
    SendMessageToPC(oRespawner,"RESURECTION IMPOSSIBLE : VOUS N'AVEZ PAS L'AMULETTE DES REBELLES");
    }

}

//:///////////////////////// ////////////////////
//:: Name: Zimero's Limited Resting v1.2
//:: FileName: z_mod_onrest
//:///////////////////////// ////////////////////

//:///////////////////////// ////////////////////
//:: Created By: Jonas Boberg aka. zimero
//:: Created On: 20021212
//:: Modified On: 20030107

//:: Traduit le: Vendredi 31 Janvier 2003
//:///////////////////////// ////////////////////

//VARIABLE MODIFIABLES
//Le nombres d'heure durant lequelles le joueurs doit attendre

int TIMEBETWEENRESTING=5;
//Le nombre reel de minutes qui correspond a 1 heure dans le jeu
int REALTIMEMINUTES=1;
//FIN DES VARIABLES MODIFIABLES
int CurrentTime();

void main()
{
    //initiation des varibles
    object oPC = GetLastPCRested();
    int iCurrentTime, iLastRestTime, iTimeSinceRest, iTimeUntilRest;
    float fTimePenalty;

    switch (GetLastRestEventType())
    {
    case REST_EVENTTYPE_REST_STARTED:
        iCurrentTime = CurrentTime();
        iLastRestTime = GetLocalInt(oPC,"REST_HOUR");
        iTimeSinceRest = iCurrentTime-iLastRestTime;

        SetLocalInt(oPC, "REST_SECOND", GetTimeSecond());

        if (iLastRestTime==0 || iTimeSinceRest >= TIMEBETWEENRESTING)
        {
            SetLocalInt(oPC, "REST_ALLOWED", TRUE);
        }
        else
        {
            SetLocalInt(oPC, "REST_ALLOWED", FALSE);
            iTimeUntilRest = TIMEBETWEENRESTING-iTimeSinceRest;
            if (REALTIMEMINUTES == 1)
                {
                iTimeUntilRest = FloatToInt(HoursToSeconds(iTimeUntilRest)/60);
                //Vous pouvez changer le message si le repos n'est pas encore
                //autorise
                if (iTimeUntilRest == 1)
                    {
                    FloatingTextStringOnCreature("Vous devez attendre " +
                                " heure avant de pouvoir vous reposer", oPC);
                    }
                else
                    {
                    FloatingTextStringOnCreature("Vous devez attendre "+
                                              IntToString(iTimeUntilRest)+
                              " heures avant de pouvoir vous reposer", oPC);
                    }
                }
            else
                {
                if (iTimeUntilRest == 1)
                    {
                    FloatingTextStringOnCreature("Vous devez attendre " +
                                  " heure avant de pouvoir vous reposer", oPC);
                    }
                else
                    {
                    FloatingTextStringOnCreature("Vous devez attendre "+
                                              IntToString(iTimeUntilRest)+
                                " heures avant de pouvoir vous reposer", oPC);

                    }

                }
        //Annuler le repos
        AssignCommand(oPC,ClearAllActions());
        }
        break;

    case REST_EVENTTYPE_REST_CANCELLED:
        //variable sur le temps de repos
        if (GetLocalInt(oPC, "REST_ALLOWED") == TRUE)
        {
            iCurrentTime = GetTimeSecond();
            iLastRestTime = GetLocalInt(oPC, "REST_SECOND");
            iTimeSinceRest = iCurrentTime - iLastRestTime;
            if (iTimeSinceRest<0) iTimeSinceRest+= 60;

            fTimePenalty = TIMEBETWEENRESTING*(iTimeSinceRest/(0.5*GetHitDice(oPC)+10));

            SetLocalInt(oPC,"REST_HOUR", CurrentTime()-(TIMEBETWEENRESTING-FloatToInt(fTimePenalty)));
        }
        break;

    case REST_EVENTTYPE_REST_FINISHED:
        SetLocalInt(oPC, "REST_HOUR", CurrentTime());
    }
}

int CurrentTime()
{
return GetCalendarYear()*8064 + GetCalendarMonth()*672 + GetCalendarDay()*24 + GetTimeHour();
}

void main()
{
object oPC = GetLastPCRested();
object oFireCamp = GetObjectByTag(" TAG_A_REMPLIR ");
float fDistance = GetDistanceBetween(oPC,oFireCamp);

if (fDistance > 2.0f)
{
AssignCommand(oPC, ClearAllActions());
FloatingTextStringOnCreature(" Impossible de se reposer si loin du feu de camps... ", oPC,TRUE);
SendMessageToPC(oPC,"Ca fonctionne pourtant") ;
}
else { SendMessageToPC(oPC, "La distance entre le pc et le feu de camp est : "+FloatToString(fDistance)) ;}
}