Auto Spell Shadow Armor

Item ID 24723 Name Auto Spell Shadow Armor
A suit of armor worn on top of normal armor for additional defense. Needs a complete set to have bonus effect.
_______________________
HIT +10
_______________________
For each 2 Refine Levels:
HIT +1
_______________________
Refine Level +9:
Perfect HIT +5%
_______________________
Type: Shadow Armor
_______________________
Requirement: None
Weapon Level 0 Identifier S_AutoSpell_Armor
Attack 0 Type Shadow Equipment
MATK 0 Equip Locations Shadow Armor
Defense 0 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 0 Equip Upper None
Weight 0 Min Equip Level None
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
Credit Price None Trade restriction None
Item Script
.@r = getrefine();
bonus bMaxHP,.@r*10;
bonus bHit,10+(.@r/2);
if (.@r>=9) {
   bonus bPerfectHitAddRate,5;
}

Set Script
Auto Spell Shadow Shield
Auto Spell Shadow Armor
Auto Spell Shadow Shoes
.@sum = getequiprefinerycnt(EQI_SHADOW_ARMOR)+getequiprefinerycnt(EQI_SHADOW_SHOES)+getequiprefinerycnt(EQI_SHADOW_SHIELD);
bonus bMatkRate,1;
if (.@sum >= 27) {
   bonus3 bAutoSpell,"HW_NAPALMVULCAN",5,80;
}
else if (.@sum >= 21) {
   bonus3 bAutoSpell,"HW_NAPALMVULCAN",3,40;
}