Manteau of Great Nature

Item ID 20747 Name Manteau of Great Nature
A manteau imbued with Earth spirit, Its protected by stone all the time.
_______________________
Decreases damage taken from Earth elemental attacks by 10%.
Increases damage taken from Fire elemental attacks by 10%.
Random chance to inflict Stone Curse status on attacker when wearer receivce physical attack.
_______________________
Refine Level +6:
Increases the rate of inflicting Stone Curse status based on Refine Level.
_______________________
Indestructible in battle
_______________________
Type: Garment
Defense: 10
Weight: 30
Armor Level: 1
_______________________
Requirement: None
Weapon Level 0 Identifier Manteau_Great_Nature
Attack 0 Type Armor
MATK 0 Equip Locations Garment
Defense 10 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 30 Min Equip Level 70
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@r = getrefine();
bonus2 bSubEle,Ele_Earth,10;
bonus2 bSubEle,Ele_Fire,-10;
if (.@r>=5)
   .@val = .@r;
bonus5 bAutoSpell,"NPC_WIDESTONE",2,5+.@val,BF_SHORT,0;
bonus bUnbreakableGarment;

Set Script
Charm Of Great Nature
Manteau of Great Nature 
bonus bMatk,50;
.@r = getequiprefinerycnt(EQI_GARMENT);
if (.@r >= 5) {
   .@val = 1;
   if (.@r >= 7)
      .@val += 4;
   bonus3 bAutoSpell,NPC_STONESKIN,8,.@val*10;
}
if (.@r >= 10)
   bonus bIntravision;