Initial commit. Updated release archive.

_module/nss/wiztp_main.nss

@@ -0,0 +1,40 @@
+void main()
+{
+    object oPC = GetPCSpeaker();
+
+    int i = GetLocalInt(oPC,"wizTPCtr");
+
+    if(GetLocalInt(oPC,"wizTPBack"))
+        i = i-4;
+
+    int j;
+    int b = FALSE;
+
+    string color = GetLocalString(oPC,"wizTPColor");
+
+    object wizTP = GetObjectByTag("wiztp_"+color,i);
+
+    for(j = 791; j < 795; j++)
+    {
+        if(wizTP != OBJECT_INVALID)
+        {
+            SetLocalObject(oPC,"wizTP"+IntToString(j),wizTP);
+            SetCustomToken(j,GetName(GetArea(wizTP)));
+            b = TRUE;
+        }
+
+        SetLocalInt(oPC,"wizTP"+IntToString(j),b);
+
+        i=i+1;
+        b=FALSE;
+
+        wizTP = GetObjectByTag("wiztp_"+color,i);
+    }
+
+    if((i%5) != 4)
+        i=0;
+
+    SetLocalInt(oPC,"wizTPCtr",i);
+
+    return;
+}