Full Tempest Shadow Earring

Item ID 24665 Name Full Tempest Shadow Earring
A sacred earring which is believed to protect its wearer. It also draws the wearer's potential abilities.
_______________________
Ignores magical defense of enemies of all race, except Players, by 5%.
_______________________
For each 2 Refine Levels:
Ignores magical defense of enemies of all race, except Players, by additional 1%.
_______________________
Refine Level +10:
Increases Magical Damage against monsters of every race, except Players, by 3%.
_______________________
When equipped with Full Tempest Shadow Pendant:
MATK +2%

Total Refine Level of entire set at least +18:
Ignores magical defense of enemies of all race, except Players, by 100%.
_______________________
Type: Shadow Earring
_______________________
Requirement: None
Weapon Level 0 Identifier S_FullTemp_Earring
Attack 0 Type Shadow Equipment
MATK 0 Equip Locations Shadow Accessory Right (Earring)
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;
bonus2 bIgnoreMdefRaceRate,RC_All,5+(.@r/2);
bonus2 bIgnoreMdefRaceRate,RC_Player_Human,-5-(.@r/2);
bonus2 bIgnoreMdefRaceRate,RC_Player_Doram,-5-(.@r/2);
if (.@r>=10) {
   bonus2 bMagicAddRace,RC_All,3;
   bonus2 bMagicAddRace,RC_Player_Human,-3;
   bonus2 bMagicAddRace,RC_Player_Doram,-3;
}

Set Script
Full Tempest Shadow Earring
Full Tempest Shadow Pendant 
.@sum = getequiprefinerycnt(EQI_SHADOW_ACC_R)+getequiprefinerycnt(EQI_SHADOW_ACC_L);
bonus bMatkRate,2;
if (.@sum >= 18) {
   bonus2 bIgnoreMdefRaceRate,RC_All,100;
   bonus2 bIgnoreMdefRaceRate,RC_Player_Human,-100;
   bonus2 bIgnoreMdefRaceRate,RC_Player_Doram,-100;
}