Monarch's Crown

Item ID 400486 Name Monarch's Crown
None
Weapon Level 0 Identifier Coroa_Monarca_BR
Attack 0 Type Armor
MATK 0 Equip Locations Upper Headgear
Defense 30 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 10 Min Equip Level 1
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@r = getrefine();
bonus bMaxHPrate,5;
bonus bMaxSPrate,5;
bonus2 bAddRace,RC_Demon,10+(.@r/2);
bonus2 bAddRace,RC_Undead,10+(.@r/2);
bonus2 bAddEle,Ele_Ghost,10+(.@r/2);
bonus2 bAddEle,Ele_Undead,10+(.@r/2);
bonus2 bMagicAddRace,RC_Demon,10+(.@r/2);
bonus2 bMagicAddRace,RC_Undead,10+(.@r/2);
bonus2 bMagicAddEle,Ele_Ghost,10+(.@r/2);
bonus2 bMagicAddEle,Ele_Undead,10+(.@r/2);
if (.@r>=7) {
   bonus bAtkRate,5;
   bonus bMatkRate,5;
}
if (.@r>=9)
   bonus bVariableCastrate,-10;
if (.@r>=11)
   bonus bDelayrate,-15;

Set Script
Royal Guardian Ring
Monarch's Crown 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bDelayrate,-2*(.@r/4);
if (.@r>=7) {
   bonus bMaxHPrate,10;
   bonus bMaxSPrate,10;
   if (.@r>=9) {
       bonus bAtkRate,5;
       bonus bMatkRate,5;
       if (.@r>=11) {
           bonus bFixedCast,-500;
       }
   }
}
Monarch's Crown
Monarch's Swords 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bDelayrate,-10;
if (.@r>=7) {
   bonus2 bAddEle,Ele_Ghost,15;
   bonus2 bAddEle,Ele_Undead,15;
   bonus2 bMagicAddEle,Ele_Ghost,15;
   bonus2 bMagicAddEle,Ele_Undead,15;
}
if (.@r>=9) {
   bonus2 bAddRace,RC_Demon,15;
   bonus2 bAddRace,RC_Undead,15;
   bonus2 bMagicAddRace,RC_Demon,15;
   bonus2 bMagicAddRace,RC_Undead,15;
}
if (.@r>=11) {
   bonus2 bAddSize,Size_Medium,15;
   bonus2 bAddSize,Size_Large,15;
   bonus2 bMagicAddSize,Size_Medium,15;
   bonus2 bMagicAddSize,Size_Large,15;
}