SRL Archive - First Scripts

i need help this is my first scrip and im a real bigginer i will accept all help.

currently i need to find how to get coord for find the judge.


[PHP]program RangedMinigame;

var
numberOfPoint : Integer;
TimeRuning : integer;
judge : integer;

procedure findjudge;


begin
judge := BitmapFromString(10, 18, 'beNpjYMAEVVUtDDiAo7Xi2oY' +
'oXLLmRjIWWoKY4m2V5l5OclEhVm72Mk420uVZBnCpjDjt1Ggtbzf9' +
'xjRuIOlop5UYoQGX3dQcExEuvbiBrzCSEygFtH1lXSRcdktrLFC2L' +
'pnbz8PQw0kPaDuy2/zdeWOThID2Ai0FIhFeJjtLbrhsQpRQRjCntZ' +
'Gcub6Mka40UBYiDnTG8hY+CNvDUc/VTtveSgOrZ4FSQARUg1UWKC7' +
'kqCIdpo8llPRlxPy08chKBukCZYGuwpSFCNprS2qpiuKS1ZAWNFLC' +
'IgvUBWG46ctgylpriKELAQCe0DUk');
end;

procedure ClickOnJudge;

var
x, y :integer ;

begin
FindBitmapToleranceIn(judge, x, y ,


end;


Procedure proggries;

begin
Writeln('<<<<you have gained ' + inttostr(numberOfPoint) + 'point>>>> ') ;
Writeln('<<<<this is writed by FrancisHelie>>>>');
Writeln('<<<<<worked for ' + inttostr(timeruning) + 'minutes>>>>' ) ;

end;

begin proggries;


end.[/PHP]

program RangedMinigame;
{.include SRL/SRL.scar}

var
  numberOfPoint : Integer;
  judge : integer;

const
  JudgeColor = 00000; //change this to the color
  JudgeName = 'udge'; //the name of judge, NOT capitals

procedure AntiRandom;
begin
  if(not LoggedIn)then exit;
  FindNormalRandoms;
end;

procedure ClickOnJudge;
var
  x, y : integer;
begin
  if(not LoggedIn)then exit;
  AntiRandom;
  if(FindObj(x, y, JudgeName, JudgeColor, 10))then
  begin
    Mouse(x, y, 5, 5, True);
  end else
    Writeln('Could not find Judge');
end; 


Procedure proggries;
begin
  Writeln('<<<<you have gained ' + inttostr(numberOfPoint) + 'point>>>> ') ;
  Writeln('<<<<this is written by FrancisHelie>>>>');
  Writeln('<<<<<worked for ' + TimeRunning) ;
end;

begin 
  SetupSRL;
  ClearDebug;
  ActivateClient;
  ClickOnJudge; 
  Proggies;
end. 

(I didnt compile that, but it should be all good)

^^ That cleans up the standards
umm you have a long way to go, but good to see you are trying

also, a good start could also be adding DeclarePlayers procedure (look it up), adding MakeCompass('n'); (or something), setting angle with SetAngle(True); and adding failsafes and login

Bitmap is bad idea in this, because it constantly changes

i think this should be in scripting help

You can report the post to have it moved. Or at least that's how most forums do it.