Initial upload

Initial upload

_module/nss/secretlichtrigg.nss

@@ -0,0 +1,37 @@
+//Created by Guile 01/10/07
+//Put this script OnEnter
+void main()
+{
+
+object oPC = GetEnteringObject();
+
+if (!GetIsPC(oPC)) return;
+
+if (GetItemPossessedBy(oPC, "lichskull044")!= OBJECT_INVALID)
+   return;
+
+if (GetItemPossessedBy(oPC, "lichsecret1")!= OBJECT_INVALID)
+   return;
+
+object oTarget;
+location lTarget;
+oTarget = GetWaypointByTag("lichway3");
+
+lTarget = GetLocation(oTarget);
+
+//only do the jump if the location is valid.
+//though not flawless, we just check if it is in a valid area.
+//the script will stop if the location isn't valid - meaning that
+//nothing put after the teleport will fire either.
+//the current location won't be stored, either
+
+if (GetAreaFromLocation(lTarget)==OBJECT_INVALID) return;
+
+SetLocalLocation(oPC, "ls_stored_loc", GetLocation(oPC));
+
+AssignCommand(oPC, ClearAllActions());
+
+AssignCommand(oPC, ActionJumpToLocation(lTarget));
+
+}
+