here try this instead (copy'ed from my powercutter)
SCAR Code:
procedure DeclarePlayers;
begin
SRLPlayerForm(True, ['Use Sleeps', 'Use Responder'],
['Mouse Speed', 'Sleep How Often(minuets)', 'How Long To Sleep(minuets)'],
['Type Of Tree', 'SRL ID', 'SRL PASSWORD', 'Run Away Direction'], []);
Mousespeed := Players[CurrentPlayer].Integers[0];
SRLID := Players[CurrentPlayer].Strings[1];
SRLPassword := Players[CurrentPlayer].Strings[2];
end;
And make this you main loop:
SCAR Code:
begin
Credits;
SetupSRL;
//ScriptID := '?' No script id?!?!
DeclarePlayers; //Does SRLForm in Declare instead
DeclareDTMSAndBitmaps;
If not LoggedIn then LoginPlayer;
SetupRS;
OpeningBank;
Withdrawal;
repeat
SetupFletching;
FindKnife;
AbsentLogs;
Fletching;
Depositing;
i:=i+1;
if i mod 10 = 0 then
Proggie;
b:=b+1;
until((b=(Players[CurrentPlayer].Integers[0])));
FreeDTMS;
Exit;
TerminateScript;
end.
and also remove "MARKING" from your script caus you dont use it and it just says the hint thing which gets annoying to some people.
Like the script btw. Hope it gets as good as foot's