1 .@r

2 =

3 getrefine();

4 bonus

5 bMaxHPrate,20;

6 bonus

7 bMaxSPrate,5;

8 bonus

9 bVit,12;

10 bonus

11 bAspdRate,3*(.@r/2);

12 bonus

13 bVariableCastrate,-3*(.@r/2);

14 bonus2

15 bAddRace,RC_Dragon,7*(.@r/3);

16 bonus2

17 bMagicAddRace,RC_Dragon,7*(.@r/3);

18 if

19 (.@r

20 =11)

21 {

22 bonus

23 bFixedCast,-200;

24 bonus2

25 bAddSize,Size_Medium,6;

26 bonus2

27 bMagicAddSize,Size_Medium,6;

28 bonus2

29 bAddSize,Size_Large,6;

30 bonus2

31 bMagicAddSize,Size_Large,6;

32 }