scgunthr: Lowered some money and EXP rewards, tweaked fancy ammo avai…

…lability in shops
phobos2077 · Jun 29, 2024 · 8515056 · 8515056
1 parent 8f9996e
commit 8515056
Show file tree

Hide file tree

Showing 6 changed files with 12 additions and 10 deletions.
diff --git a/scripts_src/ncr/scgunthr.ssl b/scripts_src/ncr/scgunthr.ssl
@@ -37,6 +37,10 @@
 
 #include "../headers/ncr.h"
 
+// phobos2077:
+#undef EXP_FOUND_SPY
+#define EXP_FOUND_SPY          (2000) // lower from 4000
+
 
 /* Standard Script Procedures */
 procedure start;
@@ -468,9 +472,9 @@ end
 procedure Node019 begin
    if (map_var(MVAR_Vault_reward) > 0) then begin
       if (map_var(MVAR_Vault_reward) == 1) then begin
-         dude_caps_adjust(10000);
+         dude_caps_adjust(6000); // pbs: was 10000
       end else begin
-         dude_caps_adjust(15000); // pbs: was 20000
+         dude_caps_adjust(10000); // pbs: was 20000
       end
       set_map_var(MVAR_Vault_reward, 0);
       give_xp(500); // lowered 2000 => 500 by phobos2077 (you get 2000 reward already when visit V13)
@@ -551,7 +555,7 @@ procedure Node999b begin
    inc_general_rep(REP_BONUS_NCR_SPY_NO);
    inc_ncr_rep(REP_HERO_NCR_FOUND_SPY);
    give_xp(EXP_FOUND_SPY);
-   dude_caps_adjust(4000);
+   dude_caps_adjust(3000); // pbs: was 4000
    call Node999;
 end
 

diff --git a/scripts_src/ncr/sidtbl.ssl b/scripts_src/ncr/sidtbl.ssl
@@ -200,10 +200,8 @@ procedure map_enter_p_proc begin
             check_restock_item(PID_SHOTGUN_SHELLS, 20, 20, 100)
             check_restock_item(PID_PBS_SHOTGUN_SLUGS, 1, 2, 45) // pbs
             check_restock_item(PID_7_62MM_AMMO, 10, 10, 100)
-            check_restock_item(PID_PBS_7_62MM_AP, 1, 3, 50) // pbs
             check_restock_item(PID_FN_FAL_HPFA, 1, 3, 100)
             check_restock_item(PID_HK_P90C, 1, 2, 100)
-            check_restock_item(PID_PBS_14MM_SMG, 1, 1, 25) // pbs
             check_restock_item(PID_POWER_FIST, 0, 2, 100)
             check_restock_item(PID_10MM_AP, 5, 10, 100)
             check_restock_item(PID_FLAMETHROWER_FUEL, 1, 5, 100) // pbs

diff --git a/scripts_src/ncr/sishelf3.ssl b/scripts_src/ncr/sishelf3.ssl
@@ -210,11 +210,11 @@ procedure map_enter_p_proc begin
          check_restock_item(PID_CURED_LEATHER_ARMOR, 1, 1, 10)
          check_restock_item(PID_223_FMJ, 2, 5, 100)
          check_restock_item(PID_7_62MM_AMMO, 3, 8, 100)
-         check_restock_item(PID_PBS_7_62MM_AP, 1, 2, 50) // pbs
          check_restock_item(PID_2MM_EC_AMMO, 1, 5, 25)
          check_restock_item(PID_HN_AP_NEEDLER_CARTRIDGE, 2, 5, 100)
 
-         check_restock_item(PID_PBS_50_AMMO, 2, 5, 50) // pbs 
+         check_restock_item(PID_PBS_7_62MM_AP, 1, 3, 50) // pbs
+         check_restock_item(PID_PBS_50_AMMO, 1, 4, 50) // pbs 
          check_restock_item(PID_FRAG_GRENADE, 2, 3, 50) // pbs
          check_restock_item(PID_PBS_40MM_HE, 2, 3, 50) // pbs
 

diff --git a/scripts_src/newreno/nieldbox.ssl b/scripts_src/newreno/nieldbox.ssl
@@ -85,6 +85,7 @@ procedure map_enter_p_proc begin
          check_restock_item(PID_LEATHER_ARMOR_MK_II, 1, 2, 75)
          check_restock_item(PID_METAL_ARMOR_MK_II, 1, 1, 50)
          // pbs new stuff:
+         check_restock_item(PID_PBS_223_AP, 1, 3, 40)
          check_restock_item(PID_PBS_THROWING_AXE, 1, 3, 50)
          check_restock_item(PID_THROWING_KNIFE, 2, 5, 100)
          check_restock_item(PID_SNIPER_RIFLE, 1, 1, 50)

diff --git a/scripts_src/sanfran/figuntbl.ssl b/scripts_src/sanfran/figuntbl.ssl
@@ -221,7 +221,6 @@ procedure map_enter_p_proc begin
             check_restock_item(PID_5MM_AP, 5, 10, 75)
             check_restock_item(PID_5MM_JHP, 5, 10, 75)
             check_restock_item(PID_223_FMJ, 5, 10, 100)
-            check_restock_item(PID_PBS_223_AP, 3, 6, 50) // pbs
             check_restock_item(PID_14MM_AP, 2, 5, 100) // pbs: inc count
             check_restock_item(PID_PBS_14MM_JHP, 1, 3, 50) // pbs
             check_restock_item(PID_FLAMETHROWER_FUEL, 3, 5, 100)
@@ -234,7 +233,7 @@ procedure map_enter_p_proc begin
             check_restock_item(PID_PBS_SHOTGUN_SLUGS, 3, 5, 100) // pbs
             check_restock_item(PID_4_7MM_CASELESS, 1, 4, 33)
             check_restock_item(PID_2MM_EC_AMMO, 1, 4, 33)
-            check_restock_item(PID_PBS_50_AMMO, 2, 6, 50) // pbs
+            check_restock_item(PID_PBS_50_AMMO, 2, 5, 50) // pbs
             check_restock_item(PID_PBS_40MM_HE, 2, 6, 100) // pbs
             check_restock_item(PID_PBS_40MM_IC, 1, 3, 100) // pbs
             call restore_critical_items(tmp_box);

diff --git a/scripts_src/sanfran/filaotbl.ssl b/scripts_src/sanfran/filaotbl.ssl
@@ -165,6 +165,7 @@ procedure map_enter_p_proc begin
             check_restock_item(PID_PBS_PLASMA_LANCE, 1, 1, 25)
             call check_restock_craft_schematic(PID_PBS_CRAFT_SCHEMA_T2, PID_PBS_50_AMMO, 100);
             call check_restock_craft_schematic(PID_PBS_CRAFT_SCHEMA_T2, PID_FLAMETHROWER_FUEL_MK_II, 100);
+            call check_restock_craft_schematic(PID_PBS_CRAFT_SCHEMA_T2, PID_IMPROVED_FLAMETHROWER, 100);
 
 //Used to be table 3
 
@@ -233,7 +234,6 @@ procedure map_enter_p_proc begin
 //Used to be table 5
 
             check_restock_item(PID_7_62MM_AMMO, 3, 4, 50)
-            check_restock_item(PID_PBS_7_62MM_AP, 1, 2, 50) // pbs
             check_restock_item(PID_FLAMETHROWER_FUEL_MK_II, 1, 3, 50)
             check_restock_item(PID_MICRO_FUSION_CELL, 2, 4, 50)
             check_restock_item(PID_ROCKET_AP, 1, 4, 50)