Initial upload

Initial upload

module/nss/pcdeathport.nss

@@ -0,0 +1,28 @@
+//Created By Genisys / Guile 5/20/08
+//Put this script in the OnUsed even of a placeable switch (portal/ lever/ etc)
+void main()
+{
+
+object oPC = GetLastUsedBy();
+
+if (!GetIsPC(oPC)) return;
+
+object oTarget;
+location lTarget;
+lTarget = GetLocalLocation(oPC, "dth_stored_loc");
+
+if (GetAreaFromLocation(lTarget)==OBJECT_INVALID) return;
+
+AssignCommand(oPC, ClearAllActions());
+
+DelayCommand(3.0, AssignCommand(oPC, ActionJumpToLocation(lTarget)));
+
+oTarget = oPC;
+
+int nInt;
+nInt = GetObjectType(oTarget);
+
+if (nInt != OBJECT_TYPE_WAYPOINT) ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_UNSUMMON), oTarget);
+else ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_UNSUMMON), GetLocation(oTarget));
+
+}