Thx Hitech, I work on this last year but never finish it.
Notice you were missing a few Mods on Items
sub Check_hci
if %Sash
{
gosub property %sashid yesno %hci
if %return = yes 2
gosub property %sashid number %hci
set %mod_amount %mod_amount + %number1
}
if %apron
{
gosub property %apronid yesno %hci
if %return = yes 2
gosub property %apronid number %hci
set %mod_amount %mod_amount + %number1
}
sub Check_StamRegen
if %Sash
{
gosub property %sashid yesno %StamRegen
if %return = yes 2
gosub property %sashid number %StamRegen
set %mod_amount %mod_amount + %number1
}
sub Check_Str
if %earRings
{
gosub property %earRingsid yesno %Str
if %return = yes 2
gosub property %earRingsid number %Str
set %mod_amount %mod_amount + %number1
}
sub Check_Int
if %robe
{
gosub property %robeid yesno %Int
if %return = yes 2
gosub property %robeid number %Int
set %mod_amount %mod_amount + %number1
}
sub Check_Hp
if %robe
{
gosub property %robeid yesno %Hp
if %return = yes 2
gosub property %robeid number %Hp
set %mod_amount %mod_amount + %number1
}
sub Check_Stam
if %Sash
{
gosub property %sashid yesno %Stam
if %return = yes 2
gosub property %sashid number %Stam
set %mod_amount %mod_amount + %number1
}
if %Shoes
{
gosub property %shoesid yesno %Stam
if %return = yes 2
gosub property %shoesid number %Stam
set %mod_amount %mod_amount + %number1
}
And
sub Set_variables
set %shoes_types nvi_tvi_
set %earRings_types HJG_xxxxx_
set %robe_types FWL_AWL_