Initial upload

Initial upload.
2023-09-25 21:32:17 -04:00
parent c1b271b363
commit ec287507a1
10074 changed files with 8442145 additions and 0 deletions
--- a/_module/nss/pgs_gnome_oc.nss
+++ b/_module/nss/pgs_gnome_oc.nss
@@ -0,0 +1,122 @@
+//::///////////////////////////////////////////////
+//:: Name: pgs_gnome_oc
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    OnConversation event for the Vault Gnome.
+    This script will perform the actual functions
+    based on what the player selected.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Samius Maximus
+//:: Created On:
+//:://////////////////////////////////////////////
+#include "inc_gsystem"
+
+void main()
+{
+    object oPlayer = GetLastSpeaker();
+
+    if (GetListenPatternNumber() == -1)  /*Check for starting conversation.*/
+    {
+        SetLocalInt (oPlayer, "Remove_Gnome", (OBJECT_SELF == GetLocalObject
+            (oPlayer, "Temp_Vault_Gnome")));
+        ClearAllActions();
+        BeginConversation();
+        return;
+    }
+
+    //--------------------------------------------
+    //Check for correct player to listen for.
+    //--------------------------------------------
+    if (oPlayer != GetLocalObject (OBJECT_SELF, "Temp_Player"))
+        return;
+
+    int iGuild = GetLocalInt (oPlayer, "Player_Guild_Number");
+    int iAmount = StringToInt (GetMatchedSubstring (0));
+
+    //--------------------------------------------
+    //Determine what the Gnome should do with the
+    //information he has recorded from the player.
+    //--------------------------------------------
+    switch (GetLocalInt (oPlayer, "Do_What_With_Info"))
+    {
+        case 1:  /*Guild account donation.*/
+            if (GetIsDM (oPlayer))  /*Check if DM is editing information.*/
+            {
+                SpeakString ("The guild account has been updated.");
+                SetModuleGuildAccountValue (GetLocalInt (oPlayer, "Temp_Guild_" +
+                    "List_Number"), iAmount);
+            }
+            else  /*Player is making a donation to guild account.*/
+            {
+                if (iAmount < 1)  /*Check for valid donation amount.*/
+                {
+                    SpeakString ("I'm sorry, but that is not a valid amount.");
+                        return;
+                }
+
+                if (GetGold (oPlayer) < iAmount)  /*Check if player has enough.*/
+                {
+                    SpeakString ("I'm sorry, but you haven't the necessary " +
+                        "amount of coin to do that.");
+                    return;
+                }
+
+                //---------------------------------------------
+                //Take player gold and add it to guild account.
+                //---------------------------------------------
+                TakeGoldFromCreature (iAmount, oPlayer, TRUE);
+                SetModuleGuildAccountValue (iGuild, GetModuleGuildAccountValue
+                    (iGuild) + iAmount);
+                SendPGSGuildNotice (iGuild, GetName (oPlayer) + " has donated " +
+                    IntToString (iAmount) + " gold piece(s) to the guild account.");
+                SpeakString ("Of course.  You're donation has been added to " +
+                    "the guild account.");
+            }
+            break;
+        case 2:  /*Guild account withdrawal.*/
+            if (iAmount < 1)  /*Check for valid amount entered.*/
+            {
+                SpeakString ("I'm sorry, but that is not a valid amount.");
+                return;
+            }
+            if (GetModuleGuildAccountValue (iGuild) < iAmount)  /*Enough gold?*/
+            {
+                SpeakString ("I'm sorry, but currently the guild account " +
+                    "doesn't have enough coin.");
+                return;
+            }
+
+            //----------------------------------------
+            //Perform withdrawal action from account.
+            //-----------------------------------------
+            SetModuleGuildAccountValue (iGuild, GetModuleGuildAccountValue
+                (iGuild) - iAmount);
+            GiveGoldToCreature (oPlayer, iAmount);
+            SendPGSGuildNotice (iGuild, GetName (oPlayer) + " has withdrawn " +
+                IntToString (iAmount) + " gold piece(s) from the guild account.");
+            SpeakString ("Of course.  You're withdrawal has been added to " +
+                "your inventory.");
+            break;
+         case 3:  /*Guild joining fee.*/
+            if (iAmount < 0)  /*Check for valid amount.*/
+            {
+                SpeakString ("I'm sorry, but that is not a valid amount.");
+                return;
+            }
+
+            //-----------------------------------------
+            //Update guild joining fee.
+            //-----------------------------------------
+            SpeakString ("Of course.  You're guild joining fee has been " +
+                "updated.");
+            SetModuleGuildJoiningFee (iGuild, iAmount);
+            break;
+        case 4:  /*Guild experience pool - DM editing only.*/
+            SpeakString ("The guild experience pool has been updated.");
+            SetModuleGuildAwardableXP (GetLocalInt (oPlayer, "Temp_Guild_" +
+                "List_Number"), iAmount);
+            break;
+    }
+}