P.Age = 17
Sadj
= INT(RND * 6) + 1 - INT((-5 + (P.Age
- 20)) * (.15 + ((P.Age
- 17) / 100)) - .49) P.Strength = P.Strength + Sadj
Aadj
= INT(RND * 6) + 1 - INT((-8 + (P.Age
- 20)) * (.4 + ((P.Age
- 17) / 100)) - .49) P.Agility = P.Agility + Aadj
P.Luck
= P.Luck
+ INT(RND * 3) + INT(0 + (P.Age
- 25)) * (.4 + ((P.Age
- 17) / 50) + .49) P.Max_HP
= P.Max_HP
+ INT(RND * (10 - (P.Age
/ 10))) + 1 P.Max_MP
= P.Max_MP
+ INT(RND * (5 + (P.Age
/ 10))) P.Level = P.Level + 1
P.Age
= 17 + INT(P.Level
* 1.5 - .49)
PRINT i%%;
"-";
TAB(7); Sadj;
TAB(12); Aadj;
TAB(17); P.Age;
TAB(22); P.Strength;
TAB(27); P.Agility