Old Casket of Protection

Item ID 18983 Name Old Casket of Protection
An old, abandoned crown of guardian that emanates a mysterious aura.
_______________________
All Basic Stats +1
MDEF +5
_______________________
For each Refine Level:
ATK +4
_______________________
For each 2 Refine Levels:
MaxHP +1%
MaxSP +1%
Increases damage of Cannon Spear by 20%.
Increases damage of Overbrand by 15%.
_______________________
For each 5 Refine Levels:
ASPD +1
_______________________
Type: Headgear
Defense: 10
Position: Upper
Weight: 10
Armor Level: 1
Enchantable: Yes
_______________________
Requirement:
Base Level 170
Royal Guard
Weapon Level 0 Identifier Old_Protect_Of_Crown
Attack 0 Type Armor
MATK 0 Equip Locations Upper Headgear
Defense 10 Equippable Jobs Crusader
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper Third, Third Upper, Third Baby
Weight 10 Min Equip Level 170
NPC Buy 10 Max Equip Level None
NPC Sell 5 Refineable Yes
Credit Price None Trade restriction Can't be dropped, Can't be traded with player, Can't be sold to NPC, Can't be put in Cart, Can't be put in Guild Storage, Can't be attached in Mail, Can't be auctioned
Item Script 
.@r = getrefine();
bonus bAllStats,1;
bonus bMdef,5;
bonus bBaseAtk,4*.@r;
bonus bAspd,(.@r/5);
bonus bMaxHPrate,(.@r/2);
bonus bMaxSPrate,(.@r/2);
bonus2 bSkillAtk,"LG_CANNONSPEAR",20*(.@r/2);
bonus2 bSkillAtk,"LG_OVERBRAND",15*(.@r/2);
bonus2 bSkillAtk,"LG_OVERBRAND_BRANDISH",(.@r/2)*15;

Set Script
Old Detachment Ring
Old Casket of Protection 
bonus2 bSkillAtk,"LG_CANNONSPEAR",70;
Subject Cape (Range)
Old Casket of Protection 
.@r = getequiprefinerycnt(EQI_GARMENT);
bonus bLongAtkRate,2*(.@r/2);
bonus2 bSkillAtk,"LG_BANISHINGPOINT",3*(.@r/2);
if (.@r>=12)
   bonus2 bAddSize,Size_All,5;
Record of Swordsman
Old Casket of Protection 
bonus2 bSkillCooldown,"LG_EARTHDRIVE",-2200;
Great Fallen Manteau
Old Casket of Protection 
.@r = getequiprefinerycnt(EQI_GARMENT);
bonus2 bSkillAtk,"LG_EXEEDBREAK",15*(.@r/2);
if (.@r >= 12)
   bonus2 bSkillCooldown,"LG_KINGS_GRACE",-15000;
Record of Wrath (Swordman)
Old Casket of Protection 
bonus bStr,20;
bonus bCritical,15;
bonus2 bSkillCooldown,"LG_CANNONSPEAR",-500;
Old Casket of Protection
[Not for Sale] Record of Swordsman 
bonus2 bSkillCooldown,"LG_EARTHDRIVE",-2200;
Old Casket of Protection
Record of Swordsman 2 
bonus bShortAtkRate,3*getequiprefinerycnt(EQI_HEAD_TOP);
Old Casket of Protection
[Not For Sale] Record of Swordsman 2 
bonus bShortAtkRate,3*getequiprefinerycnt(EQI_HEAD_TOP);
Old Casket of Protection
Record of Swordsman
Record of Swordsman 2 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bAtkRate,6*(.@r/3);
bonus2 bSkillAtk,"LG_EARTHDRIVE",10*(.@r/3);
Old Casket of Protection
[Not for Sale] Record of Swordsman
Record of Swordsman 2 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bAtkRate,6*(.@r/3);
bonus2 bSkillAtk,"LG_EARTHDRIVE",10*(.@r/3);
Old Casket of Protection
Record of Swordsman
[Not For Sale] Record of Swordsman 2 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bAtkRate,6*(.@r/3);
bonus2 bSkillAtk,"LG_EARTHDRIVE",10*(.@r/3);
Old Casket of Protection
[Not for Sale] Record of Swordsman
[Not For Sale] Record of Swordsman 2 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus bAtkRate,6*(.@r/3);
bonus2 bSkillAtk,"LG_EARTHDRIVE",10*(.@r/3);
Old Casket of Protection
Fallen Warrior's Shield
Record of Swordsman 
.@r = getequiprefinerycnt(EQI_HEAD_TOP)+getequiprefinerycnt(EQI_HAND_L);
if (getskilllv("LG_SHIELDPRESS") == 10)
   bonus bDelayrate,-30;
if (getskilllv("LG_OVERBRAND") >= 1)
   bonus bDelayrate,30;
if (.@r>=18) {
   bonus2 bSkillAtk,"LG_EARTHDRIVE",25;
   bonus2 bSkillAtk,"LG_SHIELDPRESS",25;
}
if (.@r>=21)
   bonus2 bSkillCooldown,"LG_EARTHDRIVE",-500;
Old Casket of Protection
Fallen Warrior's Shield
[Not for Sale] Record of Swordsman 
.@r = getequiprefinerycnt(EQI_HEAD_TOP)+getequiprefinerycnt(EQI_HAND_L);
if (getskilllv("LG_SHIELDPRESS") == 10)
   bonus bDelayrate,-30;
if (getskilllv("LG_OVERBRAND") >= 1)
   bonus bDelayrate,30;
if (.@r>=18) {
   bonus2 bSkillAtk,"LG_EARTHDRIVE",25;
   bonus2 bSkillAtk,"LG_SHIELDPRESS",25;
}
if (.@r>=21)
   bonus2 bSkillCooldown,"LG_EARTHDRIVE",-500;
Old Casket of Protection
Fallen Protect Manteau 
bonus2 bHPDrainRate,20,4;
bonus2 bSPDrainRate,10,2;
if (getequiprefinerycnt(EQI_HEAD_TOP)>=11)
   bonus2 bSkillCooldown,"LG_CANNONSPEAR",-500;
Old Casket of Protection
Document Swordsman 
.@r = getequiprefinerycnt(EQI_HEAD_TOP);
bonus2 bSkillCooldown,"LG_EARTHDRIVE",-2500;
bonus2 bAddRace,RC_All,4*(.@r/2);
bonus2 bSkillAtk,"LG_EARTHDRIVE",30*(.@r/2);
Old Casket of Protection
Old Detachment Ring 
bonus2 bSkillAtk,"LG_EARTHDRIVE",60;
Old Casket of Protection
Tristan Imperial Cape-LT 
.@r = getequiprefinerycnt(EQI_GARMENT);
bonus2 bSkillAtk,"LG_BANISHINGPOINT",25*(.@r/3);
bonus2 bSkillAtk,"LG_CANNONSPEAR",25*(.@r/3);
if (.@r>=13)
   bonus2 bSkillCooldown,"LG_CANNONSPEAR",-1500;