[Not For Sale] Golden Wings

Item ID 480262 Name [Not For Sale] Golden Wings
None
Weapon Level 0 Identifier Comp_Golden_Wings_ROC
Attack 0 Type Armor
MATK 0 Equip Locations Garment
Defense 15 Equippable Jobs None
Range 0 Equip Gender Both (Male and Female)
Slots 1 Equip Upper None
Weight 0 Min Equip Level None
NPC Buy 0 Max Equip Level None
NPC Sell 0 Refineable Yes
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 
.@r = getrefine();
bonus2 bExpAddClass,Class_All,10;
bonus2 bDropAddClass,Class_All,10;
if (readparam(bStr) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bStr,.@r;
}
if (readparam(bAgi) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bAgi,.@r;
}
if (readparam(bVit) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bVit,.@r;
}
if (readparam(bInt) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bInt,.@r;
}
if (readparam(bDex) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bDex,.@r;
}
if (readparam(bLuk) >= 90) {
   bonus bAllStats,1;
   bonus bMaxHPrate,1;
   bonus bMaxSPrate,1;
   bonus bLuk,.@r;
}

Set Script
[Not For Sale] Golden Wings
1st Golden Ring 
.@r = getequiprefinerycnt(EQI_GARMENT);
bonus bMaxHPrate,.@r;
bonus bMaxSPrate,.@r;
bonus2 bSubEle,Ele_Neutral,(min(10,.@r));