Manteau of Great Nature

.@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;