Furious Lance

Item ID 530058 Name Furious Lance
An over spear imbued with the power of rage.
_______________________
Increases damage of Shield Shooting by 5%.
_______________________
Base Level at least 210:
ATK +4%, ATK +40.
_______________________
Base Level at least 220:
Increases damage of Shield Shooting by additional 5%.
_______________________
Base Level at least 230:
Increases Physical Damage against enemies of every size by 10%.
_______________________
Refine Level +7:
Increases Ranged Physical Damage by 10%.
_______________________
Refine Level +9:
Increases damage of Shield Shooting by additional 10%.
_______________________
Refine Level +10:
Decreases After Skill Delay by 10%.
_______________________
Refine Level +11:
Increases damage of Shield Shooting by additional 10%.
_______________________
When equipped with Furious Boots:
Increases damage of Shield Shooting by (the sum of refine level)% additionally.
_______________________
[Bonus by Grade]
[Grade D]: Ranged Physical Damage +15%.
[Grade C]: Damage of Shield Shooting +5%.
[Grade B]: Damage of Shield Shooting +10%.
[Grade A]: ATK +4%, P.ATK +4 per 2 Refine Levels.
_______________________
Type: One-Handed Spear
Attack: 260
Weight: 850
Weapon Level: 5
_______________________
Requirement:
Base Level 205
Imperial Guard
Weapon Level 5 Identifier Lance_Furious
Attack 260 Type Weapon - One-Handed Spear
MATK 0 Equip Locations Main Hand
Defense 0 Equippable Jobs Crusader
Range 3 Equip Gender Both (Male and Female)
Slots 2 Equip Upper None
Weight 850 Min Equip Level 205
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
Credit Price None Trade restriction None
Item Script 
.@g = getenchantgrade();
.@r = getrefine();
bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",5;
if (BaseLevel>=210) {
   bonus bAtkRate,4;
   bonus bBaseAtk,40;
}
if (BaseLevel>=220) {
   bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",5;
}
if (BaseLevel>=230) {
   bonus2 bAddSize,Size_All,10;
}
if (.@r>=7) {
   bonus bLongAtkRate,10;
   if (.@r>=9) {
      bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",10;
      if (.@r>=10) {
         bonus bDelayrate,-10;
         if (.@r>=11) {
            bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",10;
         }
      }
   }
}
if (.@g>=ENCHANTGRADE_D) {
   bonus bLongAtkRate,15;
   if (.@g>=ENCHANTGRADE_C) {
      bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",5;
      if (.@g>=ENCHANTGRADE_B) {
         bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",10;
         if (.@g>=ENCHANTGRADE_A) {
            bonus bPAtk,4*(.@r/2);
            bonus bAtkRate,4*(.@r/2);
         }
      }
   }
}

Set Script
Furious Crown (Imperial Guard)
Furious Lance 
bonus2 bAddRace,RC_All,10;
bonus2 bAddRace,RC_Player_Human,-10;
bonus2 bAddRace,RC_Player_Doram,-10;
Furious Shield
Furious Lance 
bonus2 bAddEle,Ele_All,5;
Furious Lance
Furious Boots 
.@sum = getequiprefinerycnt(EQI_HAND_R)+getequiprefinerycnt(EQI_SHOES);
bonus2 bSkillAtk,"IG_SHIELD_SHOOTING",.@sum;