#include "nw_i0_plot"

void DestroyItems(object oPC, string sItem)
{
if(HasItem(oPC, sItem) == TRUE)
{
DestroyObject(GetItemPossessedBy(oPC, sItem));
SendMessageToPC(oPC, "Um dos seus itens foi destruido pois era fruto de trapaca");
}

}

void main()
{
object oPC = GetEnteringObject();

if (GetCampaignInt("Hermes", "WAS_CRAFTING", oPC) == TRUE)
{
string sCraftedItem = GetCampaignString("Hermes", "CRAFT_OBJECT", oPC);
DestroyItems(oPC, sCraftedItem);
string sName = GetName(oPC);
string sCDKEY = GetPCPublicCDKey(oPC);
SendMessageToAllDMs("ATENCAO!!! O jogador "+sName+" CDKEY "+sCDKEY+" esta tentando duplicar um item!!");
WriteTimestampedLogEntry("ATENCAO!!! O jogador "+sName+" CDKEY "+sCDKEY+" esta tentando duplicar um item!!");
DeleteCampaignVariable("Hermes", "WAS_CRAFTING", oPC);
DeleteCampaignVariable("Hermes", "CRAFT_OBJECT", oPC);
}
}

//le paillasson du bouchon

object oPC = GetEnteringObject();

void main()
{
ExecuteScript("ats_client_enter", GetModule());

if (!GetIsDM (oPC))
{

if(GetItemPossessedBy(oPC,"mort")!=OBJECT_INVALID)
{
effect eDeath = EffectDeath(FALSE, FALSE);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eDeath, oPC);
DestroyObject( GetItemPossessedBy(oPC,"mort"));
return;
}
else
{
string PCName = GetName(oPC);
// if (GetArea(oPC)!=GetAreaFromLocation(GetStartingLocation()))
// {
int MaxHP = GetMaxHitPoints(oPC);
int Damage = GetLocalInt(GetModule(),GetName(oPC)+GetPCPublicCDKey(oPC)+"Damages");
if (MaxHP<Damage) // Normalement, aurait du arriver avec carte de mort: probablement un tricheur => punition exemplaire !
{
int nXP = GetXP(oPC);
int nPenalty = 100 * GetHitDice(oPC);
int nHD = GetHitDice(oPC);
// * 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(oPC, nNewXP);
int nGoldToTake = FloatToInt(0.20 * GetGold(oPC));
AssignCommand(oPC, TakeGoldFromCreature(nGoldToTake, oPC, TRUE));
SendMessageToAllDMs(GetName(oPC)+" a ete puni pour avoir essaye de tricher avec la mort !");
WriteTimestampedLogEntry(GetName(oPC)+"(CDkey:"+GetPCPublicCDKey(oPC)+") a ete puni pour avoir essaye de tricher avec la mort !");
DelayCommand(4.0, FloatingTextStringOnCreature(GetName(oPC)+" regrette amerement d'avoir essaye de tricher avec la mort !", oPC, TRUE));
}
effect eDamage = EffectDamage(Damage, DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_PLUS_FIVE);
ApplyEffectToObject(DURATION_TYPE_INSTANT, eDamage, oPC);
SetLocalInt(GetModule(),GetName(oPC)+GetPCPublicCDKey(oPC)+"Damages",0);
WriteTimestampedLogEntry(GetName(oPC) + " doit subire " + IntToString(Damage) + " / " + IntToString(GetMaxHitPoints(oPC)) + " =>> Sante=" + IntToString(GetCurrentHitPoints(oPC)));
return;
// }
}
}
}