Protect Feathers

Item ID 19024 Name Protect Feathers
A beautiful yet incredible head protector.
_______________________
MDEF +2
Decreases damage taken from player by 2%.
_______________________
Increases After Attack Delay by 5%.
_______________________
Base VIT at least 108:
Decreases damage taken from Players by 2%.
Increases After Attack Delay by 5%.
_______________________
Base VIT at least 120:
MaxHP +3%
MDEF +3
_______________________
When equipped with Feather Beret:
Increases Attack Speed (decreases After Attack Delay by 5%).
If Feather Beret Refined to +7 or higher:
Increases Attack Speed (decreases After Attack Delay by 5%).
If Feather Beret Refined to +9:
MaxHP +5%
_______________________
Type: Headgear
Defense: 0
Position: Middle
Weight: 50
Armor Level: 1
Refineable: No
_______________________
Requirement:
Base Level 70
Weapon Level 0 Identifier Protect_Feathers
Attack 0 Type Armor
MATK 0 Equip Locations Middle Headgear
Defense 0 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 0 Equip Upper None
Weight 50 Min Equip Level 70
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable No
Credit Price None Trade restriction None
Item Script 
bonus2 bSubRace,RC_Player_Doram,2;
bonus2 bSubRace,RC_Player_Human,2;
bonus bAspdRate,5;
.@vit = readparam(bVit);
if (.@vit >= 108) {
   bonus2 bSubRace,RC_Player_Doram,3;
   bonus2 bSubRace,RC_Player_Human,3;
   bonus bAspdRate,5;
   if (.@vit >= 120) {
      bonus bMaxHPrate,3;
      bonus bMdef,3;
   }
}

Set Script
Feather Beret
Protect Feathers 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
if (.@r >= 7)
   bonus bAspdRate,5;
   if (.@r >= 9)
      bonus bMaxHPrate,5;
Protect Feathers
Cloth of Protection 
bonus bMdef,5;
bonus bDef,50;
bonus bAspdRate,5;
bonus bVit,5;
bonus2 bSubRace,RC_Player_Human,3;
if (readparam(bVit) >= 108) {
   bonus bMdef,5;
   bonus bDef,50;
   bonus bAspdRate,5;
   bonus bVit,5;
}
if (readparam(bVit) >= 120) {
   bonus bMdef,10;
   bonus bDef,100;
   bonus bVit,10;
}
Protect Feathers
Cloth of Protection
Protect Feather Shield 
bonus2 bSubSkill,"WL_CRIMSONROCK",30;
bonus2 bSubSkill,"NC_ARMSCANNON",30;
bonus2 bSubSkill,"RA_ARROWSTORM",30;
bonus2 bSubSkill,"SR_HELLGATE",30;
bonus2 bSubSkill,"SU_LUNATICCARROTBEAT",30;
bonus2 bSubSkill,"SU_CN_METEOR",30;