Rebirth Crown

Item ID 15897 Name Rebirth Crown
One of the seven magical items that Mare possesses.
The witch's magical item gained a new form and soul through the princess's prayer.
The wearer's abilities blossom and they can draw forth glorious events from the future.
_______________________
MDEF +15
_______________________
For each Refine Level:
Increases resistance to Stone Curse status by 10%.
Decreases After Skill Delay by 3%.
_______________________
Refine Level +7:
Increases Magical Damage against monsters of every element by 15%.
Decreases Comet skill cooldown by 40 seconds.
_______________________
Refine Level +9:
Increases Magical Damage against monsters of every element by additional 15%.
Decreases Comet skill cooldown by additional 45 seconds.
_______________________
Refine Level +10:
For each 10 combined sum of base INT and DEX:
Increases Magical Damage with Neutral element by 1%.
When equipped by Warlock:
Enables the use of Level 1 Spider Web.
_______________________
When equipped with Lapine Shield:
The cooldown time reduction effect of Rebirth Crown's for Comet will not be activated.
_______________________
Type: Headgear
Defense: 12
Position: Upper
Weight: 60
Armor Level: 1
_______________________
Requirement:
Base Level 130
Weapon Level 0 Identifier Rebirth_Circlet
Attack 0 Type Armor
MATK 0 Equip Locations Upper Headgear
Defense 12 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 60 Min Equip Level 130
NPC Buy 20 Max Equip Level None
NPC Sell 10 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@r = getrefine();
bonus bMdef,15;
bonus2 bResEff,Eff_Stone,1000*.@r;
bonus bDelayrate,-3*.@r;
if (.@r>=7) {
   bonus2 bMagicAddEle,Ele_All,15;
   bonus2 bSkillCooldown,"WL_COMET",-40000;
}
if (.@r>=9) {
   bonus2 bMagicAddEle,Ele_All,15;
   bonus2 bSkillCooldown,"WL_COMET",-45000;
}
if (.@r>=10) {
  bonus2 bMagicAtkEle,Ele_Neutral,(readparam(bInt)+readparam(bDex))/10;
  if (eaclass()&EAJL_THIRD && BaseJob == Job_Wizard)
   skill "PF_SPIDERWEB",1;
}

Set Script
Lapine Shield
Rebirth Crown 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
if (.@r>=7)
   bonus2 bSkillCooldown,"WL_COMET",40000;
if (.@r>=9)
   bonus2 bSkillCooldown,"WL_COMET",45000;