mirror of
https://github.com/sfall-team/sfall.git
synced 2026-07-27 16:52:34 -07:00
phobos2077
cbe987df25
- Add test version of gl_npcarmor script with config file for FO2 RP - Add some useful scripting headers - Add new scripting functions to sfall.h
39 lines
1.2 KiB
C
39 lines
1.2 KiB
C
|
|
#include "..\scripting\headers\sfall.h"
|
|
#include "..\scripting\headers\define_lite.h"
|
|
#include "..\scripting\headers\define_extra.h"
|
|
|
|
#include "..\scripting\headers\lib.arrays.h"
|
|
#include "..\scripting\headers\lib.strings.h"
|
|
// #include "..\scripting\headers\lib.inven.h"
|
|
|
|
variable ini := "sfall-mods.ini";
|
|
variable translationIni;
|
|
|
|
// Gets the integer value from ddraw.ini
|
|
procedure GetConfig(variable section, variable key, variable def) begin
|
|
variable val := get_ini_setting(ini + "|" + section + "|" + key);
|
|
if val == -1 then val := def;
|
|
return val;
|
|
end
|
|
|
|
// Gets the string value from ddraw.ini
|
|
procedure GetConfigStr(variable section, variable key, variable def) begin
|
|
variable val := get_ini_string(ini + "|" + section + "|" + key);
|
|
if val == -1 or val == "" then val := def;
|
|
return val;
|
|
end
|
|
|
|
// Translates given string using Translations.ini
|
|
procedure Translate(variable id, variable def) begin
|
|
variable str := get_ini_string(translationIni + "|Sfall|" + id);
|
|
if not str or (strlen(str) == 0) then begin
|
|
str := def;
|
|
end
|
|
return str;
|
|
end
|
|
|
|
procedure InitConfigs begin
|
|
translationIni := GetConfigStr("Main", "TranslationsINI", "./Translations.ini");
|
|
end
|