Aantioch_Infernum/_module/nss/money_remove.nss
Jaysyn904 22947ad4b6 Initial Upload
Initial Upload
2023-08-08 16:22:17 -04:00

20 lines
422 B
Plaintext

void main()
{
object oPC = GetEnteringObject();
if (!GetIsPC(oPC)) return;
int DoOnce = GetCampaignInt("money_remove",GetTag(OBJECT_SELF),oPC);
if (DoOnce==1) return;
int iGold = GetGold(oPC);
if(iGold>1000000)
{
AssignCommand(oPC, TakeGoldFromCreature(iGold-1000000, oPC, TRUE));
SendMessageToPC(oPC,"Excess funds removed.");
SetCampaignInt("money_remove",GetTag(OBJECT_SELF),1,oPC);
}
else return;
}