Hero Trade Mail

Item ID 15096 Name Hero Trade Mail
Honorable trade mail given to those who fought Satan Morocc. This mail enhances wearer abilities.
_______________________
MaxHP +5%
MaxSP +5%
ATK +10
MATK +10
MDEF +5
_______________________
Random chance to inflict Stun, Poison, Silence, Curse status on the target when dealing physical damage.
chance is increased depend on Refine Level.
_______________________
Base STR at least 90:
For each 2 Refine Levels:
STR +1
_______________________
Base INT at least 90:
For each 2 Refine Levels:
INT +1
_______________________
Base VIT at least 90:
For each 2 Refine Levels:
VIT +1
_______________________
Base AGI at least 90:
For each 2 Refine Levels:
AGI +1
_______________________
Base DEX at least 90:
For each 2 Refine Levels:
DEX +1
_______________________
Base LUK at least 90:
For each 2 Refine Levels:
LUK +1
_______________________
Type: Armor
Defense: 100
Weight: 50
Armor Level: 1
_______________________
Requirement:
Base Level 160
Mechanic and Genetic
Weapon Level 0 Identifier Hero_Trade_Mail
Attack 0 Type Armor
MATK 0 Equip Locations Armor
Defense 100 Equippable Jobs Merchant, Blacksmith, Alchemist
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper Upper, Third, Third Upper, Third Baby
Weight 50 Min Equip Level 160
NPC Buy 10 Max Equip Level None
NPC Sell 5 Refineable Yes
Credit Price None Trade restriction None
Item Script 
bonus bMaxHPrate,5;
bonus bMaxSPrate,5;
bonus bMatk,10;
bonus bBaseAtk,10;
.@r = getrefine();
if (readparam(bStr) >= 90)
   bonus bStr,.@r/2;
if (readparam(bInt) >= 90)
   bonus bInt,.@r/2;
if (readparam(bAgi) >= 90)
   bonus bAgi,.@r/2;
if (readparam(bVit) >= 90)
   bonus bVit,.@r/2;
if (readparam(bDex) >= 90)
   bonus bDex,.@r/2;
if (readparam(bLuk) >= 90)
   bonus bLuk,.@r/2;
.@c = (.@r+1)*30;
bonus2 bAddEff,Eff_Stun,.@c;
bonus2 bAddEff,Eff_Silence,.@c;
bonus2 bAddEff,Eff_Curse,.@c;
bonus2 bAddEff,Eff_Poison,.@c;

Set Script
Brooch of Hero
Hero Trade Mail 
.@r = getequiprefinerycnt(EQI_ARMOR);
bonus bAllStats,2*.@r;
bonus3 bAddEff,Eff_Stun,.@r*50,ATF_SHORT;
bonus3 bAddEff,Eff_Curse,.@r*50,ATF_SHORT;
bonus3 bAddEff,Eff_Poison,.@r*50,ATF_SHORT;
bonus3 bAddEff,Eff_Silence,.@r*50,ATF_SHORT; /* Unknow rates */