1 .@r = getrefine();
2 if (.@r>=8 && .@r<=10)
3 .@i=5+.@r;
4 else if (.@r>=11 && .@r<=13)
5 .@i=5+(.@r*3);
6 else if (.@r>13)
7 .@i=42;
8 bonus bVariableCastrate,-10-.@i;