Initial upload

Initial upload

_module/nss/stonestoresloc.nss

@@ -0,0 +1,26 @@
+void main()
+{
+object oPC = GetPCSpeaker();
+object oToken = oPC;
+string sName = GetName(oToken);
+object oArea = GetArea(oPC);
+location lSaved = GetLocation(oPC);
+object oWay = GetNearestObjectByTag("no_recall", oPC);
+int nMulti = GetLocalInt(GetModule(), "multi");
+
+//Don't store information if the location is invalid!
+ if(oArea!=OBJECT_INVALID && oWay == OBJECT_INVALID)
+ {
+  SetLocalLocation(oToken, "RECALL_LOC", lSaved);
+  if(nMulti) //If Multiplayer, Save Their Toon!
+       {
+         ExportSingleCharacter(oPC);
+       }
+ }
+
+effect eVis;
+eVis = EffectVisualEffect(VFX_IMP_GOOD_HELP);
+DelayCommand(0.4, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oPC, 0.0f));
+
+DelayCommand(0.5, SendMessageToPC(oPC, "Recall Location Stored!"));
+}