.@r = getrefine();
bonus bUnbreakableGarment;
skill "WZ_HEAVENDRIVE",1;
bonus2 bSubRace,RC_Player_Human,5;
bonus2 bSubRace,RC_Player_Doram,5;
if (.@r>=7) {
   .@a = (readparam(bLuk)+readparam(bStr))/18;
   .@b = (readparam(bAgi)+readparam(bVit))/18;
   .@c = (readparam(bInt)+readparam(bDex))/18;
   .@bonus = (.@r>=12 ? 5 : 3);
   bonus bDelayRate,-.@a;
   bonus2 bSubEle,Ele_Holy,.@bonus*.@a;
   bonus2 bSubEle,Ele_Dark,.@bonus*.@a;
   bonus bAspdRate,.@b;
   bonus bMaxHPrate,(.@r>=12?2:1)*.@b;
   bonus2 bSubEle,Ele_Fire,.@bonus*.@b;
   bonus2 bSubEle,Ele_Water,.@bonus*.@b;
   bonus bVariableCastrate,-.@c;
   bonus2 bSubEle,Ele_Wind,.@bonus*.@c;
   bonus2 bSubEle,Ele_Earth,.@bonus*.@c;
}