bonus bStr,5;
bonus bLuk,5;
bonus bMdef,10;
bonus2 bSubEle,Ele_Ghost,5;
bonus2 bSubEle,Ele_Holy,5;
bonus2 bSubRace,RC_Angel,5;
bonus2 bSubRace,RC_Formless,5;
.@r = getrefine();
.@s = (readparam(bStr)+readparam(bLuk))/20;
if (.@r>=7) {
   bonus bCritAtkRate,5;
   if (.@r>=8) {
      bonus bAspdRate,.@s;
      bonus bCritical,.@s;
      if (.@r>=9) {
         bonus bCritAtkRate,5;
      }
   }
}