Initial upload

Initial upload.

_module/nss/_setgp.nss

@@ -0,0 +1,30 @@
+#include "fcb_inc_vars"
+#include "fcb_inc_parser"
+#include "fcb_inc_general"
+
+//==========================================/
+void main()
+//==========================================/
+    {
+    //uncomment to use - gives infinite gold
+    /*
+    string arg = retrieve_arg(1);
+    if(get_is_number(arg))
+        {
+        int gp_amount = StringToInt(arg);
+
+        if(gp_amount < 0)
+            {
+            gp_amount = 0;
+            }
+
+        object user = GetLocalObject(FCB_HOST, USER);
+        int gp_current = GetGold(user);
+
+        give_gold(gp_amount - gp_current, user);
+
+        set_function_result(IntToString(GetGold(user)));
+        set_function_result_valid();
+        }
+    */
+    }