Regia Hunting Mail

Item ID 15390 Name Regia Hunting Mail
Armor made by the Royal Family as a token of appreciation for hunters who excelled in hunting competitions.
_______________________
MaxHP +500
MaxSP +100
Increases Damage against monsters of Animal and Insect race by 7%.
_______________________
For each 3 Refine Levels:
MaxHP +50, MaxSP +20
_______________________
When equipped with Regia Hunting Manteau and Regia Hunting Boots:
Decreases Fixed Casting Time by 7%.
_______________________
Refine Level of Regia Hunting Mail, Regia Hunting Manteau and Regia Hunting Boots each is +9 or higher:
Decreases Fixed Casting Time by additional 5%.
_______________________
Type: Armor
Defense: 25
Weight: 90
Armor Level: 1
_______________________
Requirement:
Base Level 50
Weapon Level 0 Identifier Regia_Hunting_Mail
Attack 0 Type Armor
MATK 0 Equip Locations Armor
Defense 25 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 90 Min Equip Level 50
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@r = getrefine();
bonus bMaxHP,500+50*(.@r/3);
bonus bMaxSP,100+20*(.@r/3);
bonus2 bAddRace,RC_Insect,7;
bonus2 bMagicAddRace,RC_Insect,7;
bonus2 bAddRace,RC_Brute,7;
bonus2 bMagicAddRace,RC_Brute,7;

Set Script
Regia Hunting Mail
Regia Hunting Manteau
Regia Hunting Boots 
bonus bVariableCastrate,-7;
if (getequiprefinerycnt(EQI_ARMOR)+getequiprefinerycnt(EQI_GARMENT)+getequiprefinerycnt(EQI_SHOES) >= 9) {
   bonus bVariableCastrate,-5;
}
Regia Hunting Boots
Regia Hunting Mail 
bonus bLongAtkRate,7;
if (getequiprefinerycnt(EQI_SHOES)+getequiprefinerycnt(EQI_ARMOR) >= 9) {
   bonus bCritAtkRate,7;
}