[Not For Sale] Diabolus Wing

Item ID 15476 Name [Not For Sale] Diabolus Wing
None
Weapon Level 0 Identifier Comp_Diabolus_Wing
Attack 0 Type Armor
MATK 0 Equip Locations Middle Headgear
Defense 2 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 30 Min Equip Level 100
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable No
Credit Price None Trade restriction Can't be dropped, Can't be traded with player, 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 
bonus bAllStats,5;

Set Script
Diabolus Armor
[Not For Sale] Diabolus Wing 
.@r = getequiprefinerycnt(EQI_ARMOR);
bonus bStr,8;
bonus bDex,4;
bonus bMaxHP,1350;
bonus bBaseAtk,15*min(12,.@r);
bonus2 bResEff,Eff_Stone,300*min(12,.@r);
bonus2 bResEff,Eff_Stun,300*min(12,.@r);
Diabolus Robe
[Not For Sale] Diabolus Wing 
.@r = getequiprefinerycnt(EQI_ARMOR);
bonus bMdef,25;
bonus bMaxSP,350;
bonus bDelayrate,-10;
bonus bMatk,15*min(12,.@r);
bonus bHealPower,2*min(12,.@r);
Diabolus Manteau
[Not For Sale] Diabolus Wing 
.@r = getequiprefinerycnt(EQI_GARMENT);
bonus bMaxHP,900;
bonus bLongAtkDef,10;
bonus2 bSubEle,Ele_Fire,2*min(12,.@r);
bonus2 bSubEle,Ele_Water,2*min(12,.@r);
bonus2 bSubEle,Ele_Wind,2*min(12,.@r);
Diabolus Boots
[Not For Sale] Diabolus Wing 
.@r = getequiprefinerycnt(EQI_SHOES);
bonus bMaxHP,100*(BaseLevel/3);
bonus bBaseAtk,12*min(12,.@r);
bonus bMatk,12*min(12,.@r);
Diabolus Ring
[Not For Sale] Diabolus Wing 
bonus bMaxHP,2000;
bonus bMaxSP,200;
bonus bHealPower,15;