Aschbourne_PRC8/_module/nss/_onclose_clear3.nss
GetOffMyYarn 69879d6957 Areas and Fixes
Added CCOH and missing areas
Changed some areas to be craftable,
Fixed some on death issues,
Fixed the Gaurd
2024-08-30 11:38:44 -04:00

27 lines
1.0 KiB
Plaintext

void main()
{
object oItem = GetFirstItemInInventory(OBJECT_SELF);
object oSelf = OBJECT_SELF;
location lSelf = GetLocation(oSelf);
object oDuplicate = GetNearestObjectByTag(GetTag(oSelf),oSelf,1);
object oPC = GetLastClosedBy();
DeleteLocalObject(oPC,"oLastOpened");
if (GetDistanceBetween(oDuplicate,oSelf)<0.3)DestroyObject(oDuplicate);
CreateObject(OBJECT_TYPE_PLACEABLE, GetResRef(oSelf),lSelf,FALSE);
DestroyObject(oSelf,0.5);
if (oItem == OBJECT_INVALID) return;
while (oItem != OBJECT_INVALID)
{
//SendMessageToPC(GetFirstPC(),"Tag: "+GetTag(oItem)+" --- ResRef: "+GetResRef(oItem)+" --- NAME: "+GetName(oItem));
if (GetStringLeft(GetResRef(oItem),7) == "pattern") DestroyObject(oItem);
if (GetStringLeft(GetResRef(oItem),10) == "flagswitch") DestroyObject(oItem);
if (GetStringLeft(GetTag(oItem),2) == "P_") DestroyObject(oItem);
oItem = GetNextItemInInventory(OBJECT_SELF);
if (oItem == OBJECT_INVALID) break;
}
//SendMessageToPC(GetFirstPC(),"DONE WITH CLOSE SCRIPT");
}