void main()
{
    object oPC = GetLastRespawnButtonPresser();
    object oTarget = GetWaypointByTag("RESPAWN");
    int nLevel = GetHitDice(oPC); //son niveau actuel
    int nXPLastLevel = nLevel*(nLevel-1)*500; //Nb de points d'XP pour son dernier level
    int nSeuil = nXPLastLevel+nLevel*500; //Nombre de pts d'XP a la moitie du level
    int nCurrentXP = GetXP(oPC);//XP actuelle
    int nNewXP = 0;
    int nGold = FloatToInt(0.30 * GetGold(oPC));
    string sCampaign = GetName(GetModule());
    int nDay = GetCalendarDay();
    int nMonth = GetCalendarMonth();
    int nYear = GetCalendarYear();
    int nHour = GetTimeHour();
    int nMinute = GetTimeMinute();
    int nSecond = GetTimeSecond();
    int nMillisecond = GetTimeMillisecond();

    if (nCurrentXP< nXPLastLevel + 100) nNewXP = nXPLastLevel-100; //100xp avant le level
    else if (nCurrentXP>nSeuil+100) nNewXP = nSeuil; //moitie du level
    else nNewXP =nXPLastLevel;

    SetXP(oPC,nNewXP);

    if (nGold > 5000)
        {
        nGold = 5000;
        }
    // Teleport a la zone de Respawn
    AssignCommand(oPC, JumpToObject(oTarget));
    ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectResurrection(),oPC);
    ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectHeal(GetMaxHitPoints(oPC)), oPC);
    RemoveEffects(oPC);

    // Sauvegarde de la date
    SetCampaignInt(sCampaign,"DAY",nDay);
    SetCampaignInt(sCampaign,"MONTH",nMonth);
    SetCampaignInt(sCampaign,"YEAR", nYear);
    SetCampaignInt(sCampaign,"HOUR", nHour);
    SetCampaignInt(sCampaign,"MINUTE", nMinute);
    SetCampaignInt(sCampaign,"SECOND", nSecond);
    SetCampaignInt(sCampaign,"MILLISECOND", nMillisecond);
/* warning: 1 unclosed block {} */

  object oMod = GetModule() ;
  object oDead = GetLastPlayerDied();
  location lDead = GetLocation(oDead) ;
  object oKiller = GetLastKiller();
// /.../
  // * Note: waiting for Sophia to make SetStandardFactionReptuation to clear all personal reputation
  // Lylver : modification de reputation personnelle a faire le cas echeant.
  if (GetStandardFactionReputation(STANDARD_FACTION_COMMONER, oDead) < 50)
  { SetStandardFactionReputation(STANDARD_FACTION_COMMONER, 50, oDead);
  }
  if (GetStandardFactionReputation(STANDARD_FACTION_MERCHANT, oDead) < 50)
  { SetStandardFactionReputation(STANDARD_FACTION_MERCHANT, 50, oDead);
  }
  if (GetStandardFactionReputation(STANDARD_FACTION_DEFENDER, oDead) < 50)
  { SetStandardFactionReputation(STANDARD_FACTION_DEFENDER, 50, oDead);
  }

  ClearPersonalReputation(oDead,oKiller) ; // permanent en cas de mort
  ClearPersonalReputation(oKiller,oDead) ; // simultanee et respawn
      // ceux qui ont vu le deces perdent leur inimitie personnelle
      // envers le mort, l'amitie reste.
  object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 40.0f, lDead);
  while (GetIsObjectValid(oTarget)) {
      if(!GetIsReactionTypeFriendly(oTarget)) {
        ClearPersonalReputation(oDead,oTarget) ;
        ClearPersonalReputation(oTarget,oDead) ;
      }
      // creature suivante dans un rayon de 4 tiles
      oTarget = GetNextObjectInShape(SHAPE_SPHERE, 40.0f, lDead);
  }