[Rental] Gaia Shield

Item ID 28917 Name [Rental] Gaia Shield
A shield created from the power of Earth.
There are various effects depending on the user.
_______________________
MDEF +10
_______________________
Increases damage taken from Earth elemental attacks by 10%.
_______________________
Increases Damage on Earth elemental by 5%.
_______________________
Refine Level +6:
Increases damage taken from Earth elemental attacks by additional 15%.
Increases Damage on Earth elemental by additional 10%.
_______________________
Refine Level +8:
Base STR at least 90:
ATK +50

Base AGI at least 90:
Increases Attack Speed (decreases After Attack Delay by 5%).

Base VIT at least 90:
Increases recovery amount gained from Healing skills and items by 10%.

Base INT at least 90:
MATK +30

Base DEX at least 90:
Decreases Variable Casting Time by 5%.

Base LUK at least 90:
Increases Critical Damage by 5%
_______________________
Indestructible in battle
_______________________
Can only be sold to NPC's.
_______________________
Type: Shield
Defense: 150
Weight: 200
Armor Level: 1
_______________________
Requirement:
Base Level 90
Weapon Level 0 Identifier JP_Shield01_L
Attack 0 Type Armor
MATK 0 Equip Locations Off Hand
Defense 150 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 0 Equip Upper None
Weight 200 Min Equip Level 90
NPC Buy 20 Max Equip Level None
NPC Sell 10 Refineable Yes
Credit Price None Trade restriction Can't be dropped, Can't be traded with player, Can't be put in Cart, Can't be put in Storage, Can't be put in Guild Storage, Can't be attached in Mail, Can't be auctioned
Item Script 
.@r = getrefine();
bonus bUnbreakableShield;
bonus bMdef,10;
bonus2 bSubEle,Ele_Earth,10;
bonus2 bAddEle,Ele_Earth,5;
bonus2 bMagicAddEle,Ele_Earth,5;
if (.@r>=6) {
   bonus2 bSubEle,Ele_Earth,15;
   bonus2 bAddEle,Ele_Earth,10;
   bonus2 bMagicAddEle,Ele_Earth,10;
}
if (.@r>=8) {
   if (readparam(bStr)>=90) {
      bonus bBaseAtk,50;
   }
   if (readparam(bAgi)>=90) {
      bonus bAspdRate,5;
   }
   if (readparam(bVit)>=90) {
      bonus bHealPower2,10;
      bonus bAddItemHealRate,10;
   }
   if (readparam(bInt)>=90) {
      bonus bMatk,30;
   }
   if (readparam(bDex)>=90) {
      bonus bVariableCastrate,-5;
   }
   if (readparam(bLuk)>=90) {
      bonus bCritAtkRate,5;
   }
}