fallout2sfall/sfall
0
0
Fork 0
mirror of https://github.com/sfall-team/sfall.git synced 2026-07-27 16:52:34 -07:00
Code Issues Packages Projects Releases Wiki Activity

Added a new hook: HOOK_CANUSEWEAPON

Browse Source 
Updated NPC armor appearance mod script.
This commit is contained in:
NovaRain
2021-05-09 20:17:40 +08:00
parent 4f22b5a9fa
commit fc53df5a16
13 changed files with 148 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
artifacts/mods/gl_npcarmor.ssl
+14 -1
View File
@@ -9,7 +9,7 @@
NOTE: this script requires compiler from sfall modderspack with -s option
(short circuit evaluation)
version 1.1
version 1.2
*/
@@ -21,6 +21,7 @@
#define FID_OBJ_CRITTER (0x01000000)
procedure update_armor_apperance;
procedure canuseweapon_handler;
variable
modIni := "npcarmor.ini",
@@ -203,6 +204,7 @@ procedure start begin
register_hook_proc(HOOK_INVENWIELD, invenwield_handler);
register_hook_proc(HOOK_ADJUSTFID, adjustfid_handler);
register_hook_proc(HOOK_INVENTORYMOVE, inventorymove_handler);
register_hook_proc_spec(HOOK_CANUSEWEAPON, canuseweapon_handler);
debug_msg("NPC armor appearance mod: Done.");
end
@@ -220,3 +222,14 @@ procedure update_armor_apperance begin
end
end
end
procedure canuseweapon_handler begin
variable critter, canWield;
critter := get_sfall_arg;
if (critter) then begin
canWield := check_weapon_change(critter, get_sfall_arg, true);
//if (canWield != 0) then canWield := 1;
set_sfall_arg(3, canWield); // override result
set_sfall_return(canWield);
end
end