Description of GetAllLevels:
Simba Code:
procedure GetAllLevels;
Bsy: WT-Fakawi & ZephyrsFury
Description: Sets all 25 skilllevels to Players.Level[1..25]
* 1 8 15
* 2 9 16
* 3 10 17
* 4 11 18
* 5 12 19
* 6 13 20
* 7 14 21
* 22 23 24
* 1 = attack
* 2 = strength
* 3 = defence
* 4 = range
* 5 = prayer
* 6 = magic
* 7 = runecrafting
* 8 = hitpoints
* 9 = agility
* 10 = herblore
* 11 = thieving
* 12 = crafting
* 13 = fletching
* 14 = slayer
* 15 = mining
* 16 = smithing
* 17 = fishing
* 18 = cooking
* 19 = firemaking
* 20 = woodcutting
* 21 = farming
* 22 = construction
* 23 = hunting
* 24 = summoning
* 25 = dungeoning
This is the debug script i ran
Simba Code:
Program Rawr;
{$i SRL\SRL.scar}
Var
I : Integer;
procedure DeclarePlayers;
Begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := '';
Players[0].Pass := '';
Players[0].Nick := '';
Players[0].Active := True;
Players[0].Level[8] := 88;
End;
Begin
Cleardebug;
SetupSRL;
DeclarePlayers;
GetAllLevels;
for I := 0 to 25 do
Begin
Writeln( 'Skill ' + IntToStr( i) + ' is ' + inttostr(Players[CurrentPlayer].Level[i]) + '.');
End;
End.
And here are the result

BTW This is my mates account, I just asked him to log in for me and he is not aware of this.:P