Replaced restock_fix macro with sfall's unsigned integer comparison

Added wipe_inventory support to Trader Bill in Abbey.

Author: NovaRain

scripts_src/abbey/abbilbox.ssl

@@ -22,6 +22,7 @@
 /* Include Files */
 #define SCRIPT_REALNAME "abbilbox"
 #include "../headers/define.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_ABBILBOX
 
@@ -79,12 +80,8 @@ procedure map_enter_p_proc begin
        set_local_var(LVAR_Trapped,TRAPPED_STATUS);
    end
 
-   if (((game_time) < 0) and (local_var(LVAR_Restock_Time_Fix) == 0)) then begin
-      set_local_var(LVAR_Restock_Time, game_time - 1);
-      set_local_var(LVAR_Restock_Time_Fix, 1);
-   end
-
-   if (local_var(LVAR_Restock_Time) < game_time) then begin
+   if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
+      variable tmp_box := move_quest_items();
       check_restock_item(PID_BOTTLE_CAPS, 150, 225, 100)
       check_restock_item(PID_LEATHER_ARMOR, 1, 1, 100)
       check_restock_item(PID_HEALING_POWDER, 2, 4, 100)
@@ -102,6 +99,7 @@ procedure map_enter_p_proc begin
       check_restock_item(PID_FIRST_AID_KIT, 0, 1, 100)
       check_restock_item(PID_SPEAR, 1, 1, 100)
       check_restock_item(PID_FLARE, 1, 3, 100)
+      call restore_critical_items(tmp_box);
       set_local_var(LVAR_Restock_Time, (10 * ONE_GAME_DAY) + game_time);
    end
 

scripts_src/brokhill/hidocbox.ssl

@@ -23,6 +23,7 @@
 #define SCRIPT_REALNAME "hidocbox"
 #include "../headers/define.h"
 #include "../headers/broken1.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_HIDOCBOX
 
@@ -53,8 +54,7 @@ procedure map_enter_p_proc begin
 
    broken_hills_doc_box := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          variable tmp_box := move_quest_items();
          check_restock_item(PID_BOTTLE_CAPS, 200, 750, 100)
          check_restock_item(PID_FIRST_AID_KIT, 0, 1, 25)

scripts_src/brokhill/hijacbox.ssl

@@ -23,6 +23,7 @@
 #define SCRIPT_REALNAME "hijacbox"
 #include "../headers/define.h"
 #include "../headers/broken1.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_HIJACBOX
 
@@ -46,8 +47,7 @@ end
 procedure map_enter_p_proc begin
    broken_hills_jacob_box := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          variable tmp_box := move_quest_items();
          check_restock_item(PID_BOTTLE_CAPS, 200, 1250, 100)
          check_restock_item(PID_BUFFOUT, 0, 3, 25)

scripts_src/brokhill/hilbox.ssl

@@ -23,6 +23,7 @@
 #define SCRIPT_REALNAME "hilbox"
 #include "../headers/define.h"
 #include "../headers/broken1.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_HILBOX
 
@@ -48,8 +49,7 @@ procedure map_enter_p_proc begin
    broken_hills_liz_box := self_obj;
    if (is_loading_game == false) then begin
       if (map_var(MVAR_Liz_Dead) == 0) then begin
-         restock_fix
-         if (local_var(LVAR_Restock_Time) < game_time) then begin
+         if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
             variable tmp_box := move_quest_items();
             check_restock_item(PID_BOTTLE_CAPS, 100, 300, 100)
             check_restock_item(PID_ROPE, 1, 5, 100)

scripts_src/brokhill/hioutbox.ssl

@@ -23,6 +23,7 @@
 #define SCRIPT_REALNAME "hioutbox"
 #include "../headers/define.h"
 #include "../headers/broken1.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_HIOUTBOX
 
@@ -46,8 +47,7 @@ end
 procedure map_enter_p_proc begin
    broken_hills_outfitter_box := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          variable tmp_box := move_quest_items();
          check_restock_item(PID_BOTTLE_CAPS, 100, 500, 100)
          check_restock_item(PID_223_FMJ, 0, 3, 25)

scripts_src/den/dcdealer.ssl

@@ -3,6 +3,7 @@
 #include "../headers/define.h"
 #include "../headers/den.h"
 #include "../headers/denres1.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_DCDEALER
 
@@ -147,8 +148,7 @@ procedure map_enter_p_proc begin
       dealer := 1;
 
    if (dealer and is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          check_restock_item(PID_JET, 2, 5, 100)
          check_restock_item(PID_BUFFOUT, 0, 1, 100)
          check_restock_item(PID_STIMPAK, 2, 3, 100)

scripts_src/den/diflibox.ssl

@@ -1,5 +1,5 @@
 /*
-   Copyright 1998-2003 Interplay Entertainment Corp.  All rights reserved.
+	Copyright 1998-2003 Interplay Entertainment Corp.  All rights reserved.
 */
 
 /*
@@ -18,6 +18,7 @@
 /* Include Files */
 #define SCRIPT_REALNAME "diflibox"
 #include "../headers/define.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_DIFLIBOX
 
@@ -40,8 +41,7 @@ procedure map_enter_p_proc begin
 /* Set up the door state when the player first enters the map */
    den_flick_box_obj := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          variable tmp_box := move_quest_items();
          self_caps_adjust(random(55, 61) - self_caps);
          check_restock_item(PID_JET, 0, 1, 100)

scripts_src/den/diflkbox.ssl

@@ -21,6 +21,7 @@
 /* Include Files */
 #define SCRIPT_REALNAME "diflkbox"
 #include "../headers/define.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_DIFLKBOX
 
@@ -62,8 +63,7 @@ procedure map_enter_p_proc begin
        set_local_var(LVAR_Trapped,TRAPPED_STATUS);
    end
 
-   restock_fix
-   if (local_var(LVAR_Restock_Time) < game_time) then begin
+   if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
       variable tmp_box := move_quest_items();
       check_restock_item(PID_BOTTLE_CAPS, 148, 3512, 100)
       check_restock_item(PID_LEATHER_ARMOR, 1, 1, 80)

scripts_src/den/dimetbox.ssl

@@ -18,6 +18,7 @@
 /* Include Files */
 #define SCRIPT_REALNAME "dimetbox"
 #include "../headers/define.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_DIMETBOX
 
@@ -46,8 +47,7 @@ procedure map_enter_p_proc begin
    /* Set up the door state when the player first enters the map */
    den_metzger_box_obj := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          if (gave_metzger_party_stuff) then begin
             off_gave_metzger_party_stuff;
             the_box_to_kill := create_object(PID_FOOTLOCKER_CLEAN_RIGHT, 0, 0);

scripts_src/den/dimombox.ssl

@@ -18,6 +18,7 @@
 /* Include Files */
 #define SCRIPT_REALNAME "dimombox"
 #include "../headers/define.h"
+#include "../sfall/lib.math.h"
 
 #define NAME                    SCRIPT_DIMOMBOX
 
@@ -39,8 +40,7 @@ procedure map_enter_p_proc begin
    /* Set up the door state when the player first enters the map */
    den_mom_box_obj := self_obj;
    if (is_loading_game == false) then begin
-      restock_fix
-      if (local_var(LVAR_Restock_Time) < game_time) then begin
+      if (unsigned_int_compare(local_var(LVAR_Restock_Time), game_time) < 0) then begin
          variable tmp_box := move_quest_items();
          self_caps_adjust(random(110, 125) - self_caps);
          check_restock_item(PID_STIMPAK, 0, 2, 90)