Kardui Robe

Item ID 15169 Name Kardui Robe
A robe of Lapine King. Contains Lapine magic.
_______________________
MDEF +5
MATK +10
_______________________
Decreases damage taken from Demi-Human race by 1%.
_______________________
Refine Level +7:
Decreases damage taken from Demi-Human race by 2%.
_______________________
Refine Level +8:
Decreases damage taken from Demi-Human race by 2%.
Kardui's Robe becomes indestructible in battle.
_______________________
Refine Level +9:
Decreases damage taken from Demi-Human race by 2%.
When equipped with Angelring Card:
Prevents Frozen status.
_______________________
When equipped with Lapine Staff:
For each Refine Level of weapon:
MATK +3
_______________________
Refine Level of Kardui's Robe is +7 or higher:
For each Refine Level of Lapine Staff:
MATK +2
_______________________
Refine Level of Kardui's Robe is +8 or higher:
For each Refine Level of Lapine Staff:
MATK +2
_______________________
Type: Armor
Defense: 60
Weight: 80
Armor Level: 1
_______________________
Requirement:
Base Level 90
Weapon Level 0 Identifier Kardui_Robe
Attack 0 Type Armor
MATK 0 Equip Locations Armor
Defense 60 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 80 Min Equip Level 90
NPC Buy 20 Max Equip Level None
NPC Sell 10 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@r = getrefine();
bonus bMatk,10;
bonus bMdef,5;
bonus2 bSubRace,RC_DemiHuman,1;
bonus2 bSubRace,RC_Player_Human,1;
if (.@r>=7) {
   bonus2 bSubRace,RC_DemiHuman,2;
   bonus2 bSubRace,RC_Player_Human,2;
}
if (.@r>=8) {
   bonus2 bSubRace,RC_DemiHuman,2;
   bonus2 bSubRace,RC_Player_Human,2;
   bonus bUnbreakableArmor;
}
if (.@r>=9) {
   bonus2 bSubRace,RC_DemiHuman,2;
   bonus2 bSubRace,RC_Player_Human,2;
}

Set Script
Kardui Robe
Laphine Staff 
.@r = getequiprefinerycnt(EQI_HAND_R);
.@b = getequiprefinerycnt(EQI_ARMOR);
bonus bMatk,(.@r*(.@b >= 8 ? 7 : (.@b >= 7 ? 5 : 3 )));
Kardui Robe
Laphine Staff 
.@r = getequiprefinerycnt(EQI_HAND_R);
.@b = getequiprefinerycnt(EQI_ARMOR);
bonus bMatk,(.@r*(.@b >= 8 ? 7 : (.@b >= 7 ? 5 : 3 )));
Kardui Robe
Angeling Card 
if (getequiprefinerycnt(EQI_ARMOR) >= 9) {
   bonus2 bResEff,Eff_Freeze,10000;
}