1 .@r = getrefine();

2 .@val = 3*(.@r/2);

3 bonus2 bAddEle,Ele_Dark,(20+.@val);

4 bonus2 bAddRace,RC_Demon,(20+.@val);

5 bonus2 bAddRace,RC_Undead,(20+.@val);

6 bonus2 bSubRace,RC_Demon,(10+.@val);

7 bonus2 bSubEle,Ele_Undead,(10+.@val);

8 bonus2 bSubEle,Ele_Dark,(10+.@val);

9 bonus bHPGainValue,50;

10 bonus bSPGainValue,(.@r/2);

11 bonus2 bAddEff2,Eff_Confusion,1000;