1 .@r = getrefine();

2 bonus bUnbreakableGarment;

3 skill "WZ_HEAVENDRIVE",1;

4 bonus2 bSubRace,RC_Player_Human,5;

5 bonus2 bSubRace,RC_Player_Doram,5;

6 if (.@r>=7) {

7 .@a = (readparam(bLuk)+readparam(bStr))/18;

8 .@b = (readparam(bAgi)+readparam(bVit))/18;

9 .@c = (readparam(bInt)+readparam(bDex))/18;

10 .@bonus = (.@r>=12 ? 5 : 3);

11 bonus bDelayRate,-.@a;

12 bonus2 bSubEle,Ele_Holy,.@bonus*.@a;

13 bonus2 bSubEle,Ele_Dark,.@bonus*.@a;

14 bonus bAspdRate,.@b;

15 bonus bMaxHPrate,(.@r>=12?2:1)*.@b;

16 bonus2 bSubEle,Ele_Fire,.@bonus*.@b;

17 bonus2 bSubEle,Ele_Water,.@bonus*.@b;

18 bonus bVariableCastrate,-.@c;

19 bonus2 bSubEle,Ele_Wind,.@bonus*.@c;

20 bonus2 bSubEle,Ele_Earth,.@bonus*.@c;

21 }