Initial upload

Initial upload

_module/nss/takengivestone.nss

@@ -0,0 +1,32 @@
+
+void CreateItemOnObjectVoid(string sItemTemplate, object oTarget=OBJECT_SELF, int nStackSize=1)
+{
+CreateItemOnObject(sItemTemplate, oTarget, nStackSize);
+}
+object oItem;
+
+
+//This script takes all sequencer stones and returns them to the oem stone
+//Put this script OnEnter
+void main()
+{
+
+object oPC = GetEnteringObject();
+
+if (!GetIsPC(oPC)) return;
+
+if (GetItemPossessedBy(oPC, "newstone044")!= OBJECT_INVALID)
+   {
+   oItem = GetFirstItemInInventory(oPC);
+
+   while (GetIsObjectValid(oItem))
+      {
+      if (GetTag(oItem)=="newstone044") DestroyObject(oItem);
+
+      oItem = GetNextItemInInventory(oPC);
+      }
+
+   DelayCommand(1.0, CreateItemOnObjectVoid("ancstone88", oPC));
+
+   }
+}