Poison Manteau

Item ID 20708 Name Poison Manteau
A mysterious manteau imbued with a strong poison.
_______________________
Decreases damage taken from Poison elemental by 5%.
Decreases damage taken from Plant race by 5%.
_______________________
When equipped with Poison Shield:
For each Refine Level of Poison Manteau:
Decreases damage taken from Plant race by 1%.

For each Refine Level of Poison Shield:
Increases Physical Damage against enemies of on Poison elemental by 1%
_______________________
When equipped with Poison Shoes:
Increases Physical Damage against enemies of Poison elemental by 5%.

For each Refine Level of Poison Manteau:
MaxHP +1% and MaxSP +1%.
_______________________
When VIP status active:
FLEE +20
_______________________
Type: Garment
Defense: 20
Weight: 70
Armor Level: 1
_______________________
Requirement:
Base Level 65
Weapon Level 0 Identifier Poison_Manteau
Attack 0 Type Armor
MATK 0 Equip Locations Garment
Defense 20 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 70 Min Equip Level 65
NPC Buy 20 Max Equip Level None
NPC Sell 10 Refineable Yes
Credit Price None Trade restriction None
Item Script 
bonus2 bSubEle,Ele_Poison,5;
bonus2 bSubRace,RC_Plant,-5;
if (vip_status(VIP_STATUS_ACTIVE)) {
   bonus bFlee,20;
}

Set Script
Poison Manteau
Poison Shield 
.@r_garment = getequiprefinerycnt(EQI_GARMENT);
.@r_shield = getequiprefinerycnt(EQI_HAND_L);
bonus2 bSubRace,RC_Plant,.@r_garment;
bonus2 bAddEle,Ele_Poison,.@r_shield;
bonus2 bMagicAddEle,Ele_Poison,.@r_shield;
Poison Shoes
Poison Manteau 
bonus2 bAddEle,Ele_Poison,5;
bonus2 bMagicAddEle,Ele_Poison,5;
.@r_garment = getequiprefinerycnt(EQI_GARMENT);
bonus bMaxHPrate,.@r_garment;
bonus bMaxSPrate,.@r_garment;