393 lines
16 KiB
Plaintext
393 lines
16 KiB
Plaintext
#include "fcb_inc_prot"
|
|
|
|
//==========================================/
|
|
//create all
|
|
//==========================================/
|
|
|
|
//==========================================/
|
|
void array_main()
|
|
//==========================================/
|
|
{
|
|
//2DA file rows that will be read
|
|
//range: [lower bound 31:16][upper bound 15:0]
|
|
//invalid rows may be included - they are skipped during read.
|
|
SetLocalInt(FCB_HOST, "IPRP_ABILITIES_0", 5);
|
|
SetLocalInt(FCB_HOST, "IPRP_ACMODTYPE_0", 4);
|
|
SetLocalInt(FCB_HOST, "IPRP_ALIGNGRP_0", 5);
|
|
SetLocalInt(FCB_HOST, "IPRP_ALIGNMENT_0", 8);
|
|
SetLocalInt(FCB_HOST, "IPRP_AMMOCOST_0", 15);
|
|
SetLocalInt(FCB_HOST, "IPRP_AMMOTYPE_0", 2);
|
|
SetLocalInt(FCB_HOST, "IPRP_AMOUNT_0", 4);
|
|
SetLocalInt(FCB_HOST, "IPRP_ARCSPELL_0", 19);
|
|
//SetLocalInt(FCB_HOST, "IPRP_BASE1_0", 0);
|
|
SetLocalInt(FCB_HOST, "IPRP_BLADECOST_0", 5);
|
|
SetLocalInt(FCB_HOST, "IPRP_BONUSCOST_0", 12);
|
|
SetLocalInt(FCB_HOST, "IPRP_CHARGECOST_0", 13);
|
|
SetLocalInt(FCB_HOST, "IPRP_COLOR_0", 6);
|
|
SetLocalInt(FCB_HOST, "IPRP_COMBATDAM_0", 2);
|
|
SetLocalInt(FCB_HOST, "IPRP_COSTTABLE_0", 27);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_DAMAGECOST_0", 30);
|
|
SetLocalInt(FCB_HOST, "IPRP_DAMAGECOST_1", 71 << BITLEN_2DA_RANGE | 80); //PRC
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_DAMAGETYPE_0", 14); //13
|
|
SetLocalInt(FCB_HOST, "IPRP_DAMVULCOST_0", 7);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_FEATS_0", 39);
|
|
SetLocalInt(FCB_HOST, "IPRP_FEATS_1", 250 << BITLEN_2DA_RANGE | 254); //PRC
|
|
SetLocalInt(FCB_HOST, "IPRP_FEATS_2", 271 << BITLEN_2DA_RANGE | 385); //PRC
|
|
SetLocalInt(FCB_HOST, "IPRP_FEATS_3", 399 << BITLEN_2DA_RANGE | 570); //PRC
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_IMMUNCOST_0", 7);
|
|
SetLocalInt(FCB_HOST, "IPRP_IMMUNITY_0", 9);
|
|
SetLocalInt(FCB_HOST, "IPRP_KITCOST_0", 50);
|
|
SetLocalInt(FCB_HOST, "IPRP_LIGHTCOST_0", 4);
|
|
SetLocalInt(FCB_HOST, "IPRP_MELEECOST_0", 20);
|
|
SetLocalInt(FCB_HOST, "IPRP_MONSTCOST_0", 58);
|
|
SetLocalInt(FCB_HOST, "IPRP_MONSTERHIT_0", 9);
|
|
SetLocalInt(FCB_HOST, "IPRP_NEG10COST_0", 10);
|
|
SetLocalInt(FCB_HOST, "IPRP_NEG5COST_0", 10); //PRC 10
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHIT_0", 25);
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHITCOST_0", 70); //PRC 70
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHITDUR_0", 4); //PRC 20
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHITDUR_1", 20 << BITLEN_2DA_RANGE | 20);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHITSPELL_0", 140); //PRC 202
|
|
SetLocalInt(FCB_HOST, "IPRP_ONHITSPELL_1", 200 << BITLEN_2DA_RANGE | 202);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_PARAMTABLE_0", 11);
|
|
SetLocalInt(FCB_HOST, "IPRP_POISON_0", 5);
|
|
SetLocalInt(FCB_HOST, "IPRP_PROTECTION_0", 19);
|
|
SetLocalInt(FCB_HOST, "IPRP_REDCOST_0", 5);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_RESISTCOST_0", 10); //PRC 20
|
|
SetLocalInt(FCB_HOST, "IPRP_RESISTCOST_1", 20 << BITLEN_2DA_RANGE | 20);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_SAVEELEMENT_0", 21);
|
|
SetLocalInt(FCB_HOST, "IPRP_SAVINGTHROW_0", 3);
|
|
SetLocalInt(FCB_HOST, "IPRP_SKILLCOST_0", 50);
|
|
//SetLocalInt(FCB_HOST, "IPRP_SLOTSCOST_0", 0);
|
|
SetLocalInt(FCB_HOST, "IPRP_SOAKCOST_0", 13); //PRC 13
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLCOST_0", 242); //PRC 242
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLCSTR_0", 39);
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLLVCOST_0", 9);
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLLVLIMM_0", 9);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLS_0", 500); //PRC 1138
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLS_1", 511 << BITLEN_2DA_RANGE | 569);
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLS_2", 600 << BITLEN_2DA_RANGE | 802);
|
|
|
|
SetLocalInt(FCB_HOST, "IPRP_SPELLSHL_0", 7);
|
|
SetLocalInt(FCB_HOST, "IPRP_SRCOST_0", 60); //PRC 60
|
|
|
|
//SetLocalInt(FCB_HOST, "IPRP_STAMINACOAT_0", 0);
|
|
//SetLocalInt(FCB_HOST, "IPRP_TERRAINTYPE_0", 0);
|
|
SetLocalInt(FCB_HOST, "IPRP_TRAPCOAT_0", 11);
|
|
SetLocalInt(FCB_HOST, "IPRP_TRAPS_0", 4);
|
|
SetLocalInt(FCB_HOST, "IPRP_VISUALFX_0", 6);
|
|
SetLocalInt(FCB_HOST, "IPRP_WALK_0", 1);
|
|
SetLocalInt(FCB_HOST, "IPRP_WEIGHTCOST_0", 5);
|
|
SetLocalInt(FCB_HOST, "IPRP_WEIGHTINC_0", 5);
|
|
|
|
//--------------------------------------/
|
|
SetLocalInt(FCB_HOST, "itempropdef_0", 84);
|
|
SetLocalInt(FCB_HOST, "itemprops_0", 84);
|
|
SetLocalInt(FCB_HOST, "itemvalue_0", 59);
|
|
|
|
SetLocalInt(FCB_HOST, "Classes_0", 38); //PRC 254
|
|
SetLocalInt(FCB_HOST, "Classes_1", 51 << BITLEN_2DA_RANGE | 56);
|
|
SetLocalInt(FCB_HOST, "Classes_2", 65 << BITLEN_2DA_RANGE | 105);
|
|
SetLocalInt(FCB_HOST, "Classes_3", 113 << BITLEN_2DA_RANGE | 134);
|
|
SetLocalInt(FCB_HOST, "Classes_4", 149 << BITLEN_2DA_RANGE | 181);
|
|
|
|
SetLocalInt(FCB_HOST, "racialtypes_0", 253); //CEP+PRC 253
|
|
SetLocalInt(FCB_HOST, "skills_0", 26);
|
|
SetLocalInt(FCB_HOST, "Skills_0", 26);
|
|
|
|
SetLocalInt(FCB_HOST, "disease_0", 16);
|
|
|
|
SetLocalInt(FCB_HOST, "poison_0", 44); //PRC 114
|
|
SetLocalInt(FCB_HOST, "poison_1", 100 << BITLEN_2DA_RANGE | 114);
|
|
|
|
SetLocalInt(FCB_HOST, "gender_0", 4);
|
|
|
|
//--------------------------------------/
|
|
//--------------------------------------/
|
|
menu_main();
|
|
chcnt_main();
|
|
|
|
DelayCommand(0.0, iprp_main(0, 20));
|
|
DelayCommand(0.0, iprp_main(21, 50));
|
|
DelayCommand(0.0, iprp_main(51, 84));
|
|
}
|
|
|
|
//==========================================/
|
|
//main/sub menues
|
|
//==========================================/
|
|
|
|
//==========================================/
|
|
void menu_main()
|
|
//==========================================/
|
|
{
|
|
{
|
|
int file_type_iprp = create_main_file_type_link(MAIN_FOLDER_INDEX_IPRP) | SCRIPT_INDEX_DISP_IPRP;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_IPRP_ENTER, file_type_iprp);
|
|
}
|
|
|
|
{
|
|
int file_type_iprpr = create_main_file_type_link(MAIN_FOLDER_INDEX_IPRPR) | SCRIPT_INDEX_DISP_IPRP;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_IPRPR_ENTER, file_type_iprpr);
|
|
}
|
|
|
|
{
|
|
int file_type = create_main_file_type_link(MAIN_FOLDER_INDEX_CHARGE) | SCRIPT_INDEX_DISP_HEADER;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_CHARGE_ENTER + UI_TXT_INDENT, file_type);
|
|
}
|
|
|
|
//--------------------------------------/
|
|
{
|
|
int file_type = create_main_file_type_link(MAIN_FOLDER_INDEX_DUPE) | SCRIPT_INDEX_DUPE_SEL_0;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_DUPE_ENTER, file_type);
|
|
}
|
|
|
|
{
|
|
int file_type = create_main_file_type_link(MAIN_FOLDER_INDEX_SETNAME) | SCRIPT_INDEX_LISTEN_SETNAME;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_SETNAME_ENTER, file_type);
|
|
}
|
|
|
|
{
|
|
int file_type = create_main_file_type_link(MAIN_FOLDER_INDEX_COLORGUIDE) | SCRIPT_INDEX_COLORGUIDE;
|
|
create_main_file_int(MAIN_FOLDER_INDEX_MAINMENU, UI_TXT_COLORGUIDE_ENTER, file_type);
|
|
}
|
|
|
|
set_main_folder_index_start(MAIN_FOLDER_RESERVE_INDEX);
|
|
|
|
//--------------------------------------/
|
|
//--------------------------------------/
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_IPRP_MENU, UI_TXT_IPRP_MENU_ADD_NORMAL, SCRIPT_INDEX_IPRP_SEL_1);
|
|
}
|
|
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_IPRPR_MENU, UI_TXT_IPRPR_MENU_REMOVE, SCRIPT_INDEX_IPRPR_SEL_1);
|
|
}
|
|
|
|
//--------------------------------------/
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_SETNAME, UI_TXT_SETNAME_MENU_ACCEPT, SCRIPT_INDEX_SETNAME_SEL_1);
|
|
create_main_file_int(MAIN_FOLDER_INDEX_SETNAME, UI_TXT_SETNAME_MENU_REENTER, SCRIPT_INDEX_LISTEN_SETNAME);
|
|
create_main_file_int(MAIN_FOLDER_INDEX_SETNAME, UI_TXT_SETNAME_MENU_DEFAULT, SCRIPT_INDEX_SETNAME_DEFAULT);
|
|
}
|
|
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_CHARGE_MENU, UI_TXT_CHARGE_MENU_SET, SCRIPT_INDEX_CHARGE_SEL_1);
|
|
}
|
|
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_DUPE, UI_TXT_DUPE_MENU_ACCEPT, SCRIPT_INDEX_DUPE_SEL_1);
|
|
}
|
|
}
|
|
|
|
//==========================================/
|
|
//item properties
|
|
//==========================================/
|
|
|
|
//==========================================/
|
|
void iprp_main(int iprp_main_row, int iprp_main_endrow)
|
|
//==========================================/
|
|
{
|
|
int folder_index = MAIN_FOLDER_INDEX_IPRP;
|
|
int file_type_menu = create_main_file_type_link(SCRIPT_INDEX_IPRP_SEL_0 | MAIN_FOLDER_INDEX_IPRP_MENU);
|
|
|
|
while(iprp_main_row <= iprp_main_endrow)
|
|
{
|
|
string subtype_strref = Get2DAString("itempropdef", "Name", iprp_main_row);
|
|
string subtype_resref = Get2DAString("itempropdef", "SubTypeResRef", iprp_main_row);
|
|
|
|
string costtable_resref = "";
|
|
string costtable_row = Get2DAString("itempropdef", "CostTableResRef", iprp_main_row);
|
|
if(costtable_row != "" && costtable_row != "0")
|
|
{
|
|
costtable_resref = Get2DAString("IPRP_COSTTABLE", "Name", StringToInt(costtable_row));
|
|
}
|
|
|
|
string paramtable_resref = "";
|
|
string paramtable_row = Get2DAString("itempropdef", "Param1ResRef", iprp_main_row);
|
|
if(paramtable_row != "")
|
|
{
|
|
paramtable_resref = Get2DAString("IPRP_PARAMTABLE", "TableResRef", StringToInt(paramtable_row));
|
|
}
|
|
|
|
int folder_target = 0;
|
|
if(subtype_resref != "")
|
|
{
|
|
folder_target = iprp_subtype_file(subtype_resref, costtable_resref, paramtable_resref, file_type_menu);
|
|
}
|
|
else if(costtable_resref != "" || paramtable_resref != "")
|
|
{
|
|
folder_target = iprp_cost_param1_file(costtable_resref, paramtable_resref, file_type_menu);
|
|
}
|
|
|
|
int file_type = create_main_file_type_link(folder_target, file_type_menu);
|
|
create_main_file_int(folder_index, GetStringByStrRef(StringToInt(subtype_strref)), file_type, iprp_main_row);
|
|
|
|
iprp_main_row++;
|
|
}
|
|
}
|
|
|
|
//==========================================/
|
|
int iprp_subtype_file(string subtype_resref, string costtable_resref, string paramtable_resref, int file_type_menu)
|
|
//==========================================/
|
|
{
|
|
int folder_index = GetLocalInt(FCB_HOST, MAIN_FOLDER_INDEX_LINK_ + subtype_resref + costtable_resref + paramtable_resref);
|
|
if(folder_index < 1)
|
|
{
|
|
folder_index = create_main_folder(subtype_resref + costtable_resref + paramtable_resref);
|
|
|
|
int folder_target = iprp_cost_param1_file(costtable_resref, paramtable_resref, file_type_menu);
|
|
//----------------------------------------//
|
|
int block = 0;
|
|
int subtype_range = GetLocalInt(FCB_HOST, subtype_resref + UI_TXT_UNDERSCORE + "0");
|
|
|
|
while(subtype_range > 0)
|
|
{
|
|
int subtype_endrow = FILTER_R1 & subtype_range;
|
|
int subtype_row = subtype_range >>> BITLEN_2DA_RANGE;
|
|
|
|
while(subtype_row <= subtype_endrow)
|
|
{
|
|
string subtype_strref = Get2DAString(subtype_resref, "Name", subtype_row);
|
|
if(subtype_strref != "")
|
|
{
|
|
int file_type = 0;
|
|
//param1 override
|
|
//----------------------------------------//
|
|
string paramtable_row = Get2DAString(subtype_resref, "Param1ResRef", subtype_row);
|
|
if(paramtable_row != "")
|
|
{
|
|
string paramtable_resref_override = Get2DAString("IPRP_PARAMTABLE", "TableResRef", StringToInt(paramtable_row));
|
|
int folder_target_override = iprp_cost_param1_file(costtable_resref, paramtable_resref_override, file_type_menu);
|
|
|
|
file_type = create_main_file_type_link(folder_target_override, file_type_menu);
|
|
}
|
|
//----------------------------------------//
|
|
else
|
|
{
|
|
file_type = create_main_file_type_link(folder_target, file_type_menu);
|
|
}
|
|
|
|
create_main_file_int(folder_index, GetStringByStrRef(StringToInt(subtype_strref)), file_type, subtype_row);
|
|
}
|
|
subtype_row++;
|
|
}
|
|
|
|
block++;
|
|
subtype_range = GetLocalInt(FCB_HOST, subtype_resref + UI_TXT_UNDERSCORE + IntToString(block));
|
|
}
|
|
}
|
|
|
|
return folder_index;
|
|
}
|
|
|
|
//==========================================/
|
|
int iprp_cost_param1_file(string costtable_resref, string paramtable_resref, int file_type_menu)
|
|
//==========================================/
|
|
{
|
|
int folder_index = GetLocalInt(FCB_HOST, MAIN_FOLDER_INDEX_LINK_ + costtable_resref + paramtable_resref);
|
|
if(folder_index < 1)
|
|
{
|
|
int folder_index_cost = 0;
|
|
int folder_index_param1 = 0;
|
|
|
|
//----------------------------------------//
|
|
if(paramtable_resref != "")
|
|
{
|
|
folder_index_param1 = GetLocalInt(FCB_HOST, MAIN_FOLDER_INDEX_LINK_ + paramtable_resref);
|
|
|
|
if(folder_index_param1 < 1)
|
|
{
|
|
folder_index_param1 = create_main_folder(paramtable_resref);
|
|
|
|
int block = 0;
|
|
int param1_range = GetLocalInt(FCB_HOST, paramtable_resref + UI_TXT_UNDERSCORE + "0");
|
|
|
|
while(param1_range > 0)
|
|
{
|
|
int param1_endrow = FILTER_R1 & param1_range;
|
|
int param1_row = param1_range >>> BITLEN_2DA_RANGE;
|
|
|
|
while(param1_row <= param1_endrow)
|
|
{
|
|
string param1_strref = Get2DAString(paramtable_resref , "Name", param1_row);
|
|
if(param1_strref != "")
|
|
{
|
|
create_main_file_int(folder_index_param1, GetStringByStrRef(StringToInt(param1_strref)), file_type_menu, param1_row);
|
|
}
|
|
param1_row++;
|
|
}
|
|
|
|
block++;
|
|
param1_range = GetLocalInt(FCB_HOST, paramtable_resref + UI_TXT_UNDERSCORE + IntToString(block));
|
|
}
|
|
}
|
|
|
|
folder_index = folder_index_param1;
|
|
}
|
|
|
|
//----------------------------------------//
|
|
if(costtable_resref != "")
|
|
{
|
|
folder_index_cost = create_main_folder(costtable_resref + paramtable_resref);
|
|
|
|
int block = 0;
|
|
int cost_range = GetLocalInt(FCB_HOST, costtable_resref + UI_TXT_UNDERSCORE + "0");
|
|
|
|
while(cost_range > 0)
|
|
{
|
|
int cost_endrow = FILTER_R1 & cost_range;
|
|
int cost_row = cost_range >>> BITLEN_2DA_RANGE;
|
|
|
|
while(cost_row <= cost_endrow)
|
|
{
|
|
string costtable_strref = Get2DAString(costtable_resref, "Name", cost_row);
|
|
if(costtable_strref != "")
|
|
{
|
|
int file_type = create_main_file_type_link(folder_index_param1, file_type_menu);
|
|
create_main_file_int(folder_index_cost, GetStringByStrRef(StringToInt(costtable_strref)), file_type, cost_row);
|
|
}
|
|
cost_row++;
|
|
}
|
|
|
|
block++;
|
|
cost_range = GetLocalInt(FCB_HOST, costtable_resref + UI_TXT_UNDERSCORE + IntToString(block));
|
|
}
|
|
|
|
folder_index = folder_index_cost;
|
|
}
|
|
}
|
|
|
|
return folder_index;
|
|
}
|
|
|
|
//==========================================/
|
|
//charge count
|
|
//==========================================/
|
|
|
|
//==========================================/
|
|
void chcnt_main()
|
|
//==========================================/
|
|
{
|
|
int file_type_menu = create_main_file_type_link(SCRIPT_INDEX_CHARGE_SEL_0 | MAIN_FOLDER_INDEX_CHARGE_MENU);
|
|
|
|
//make folders
|
|
//----------------------------------------//
|
|
int n = 1;
|
|
while(n <= ITEM_CHARGE_CNT_MAX)
|
|
{
|
|
create_main_file_int(MAIN_FOLDER_INDEX_CHARGE, IntToString(n) + UI_TXT_UNIT_CHARGE, file_type_menu, n);
|
|
|
|
n++;
|
|
}
|
|
}
|