SRL Archive - General Botting Help

program Mcoal;
{$i srl/srl.simba}
var
  clickcontinue: Integer;
function isInvFull(): Boolean;
var
x,y: Integer;
begin
  result := findColorTolerance(X, Y, 2636860, 684, 426, 734, 465, 5);
end;

procedure MineCoal();
var
  X,Y : Integer;
begin
  if FindColorTolerance(X, Y, 2175281, 127, 122, 367, 282, 5) then
  begin
    mmouse(x, y, 1, 1);
    wait(250);
    ClickMouse(X, Y, mouse_Left)
    wait(11300);
  end;
end;

procedure LessGo ();
begin
  if FindBitmapToleranceIn(clickcontinue, X, Y, 187, 439, 344, 459, 145) then
  begin
    mmouse(x, y,1,1);
    wait(250);
    ClickMouse(X, Y, mouse_Left)
  end;
end;



procedure Empty();
var
  X,Y: Integer;
begin
    TypeSend('::empty');
    wait(300);
    movemouse  (260, 380);
    wait(400);
    clickMouse2(MOUSE_LEFT);
  end;


begin
  SetupSRL;
  MouseSpeed := 15;
  clickcontinue := BitmapFromString(6, 7, 'meJxbdPjKfwYGCFp0+MoiMHfOwSsQ' +
        'BBGEkHAuhAEn4SrhsmiCEIQsDkcA7CFKVQ==');
  Repeat
    if not isInvFull() then
      MineCoal
    else
      LessGo;
      Empty;
    wait(1000);
  Until(False); //Infinite loop
  FreeBitmap(clickcontinue);
end.                      

For some reason I get this error below, could someone please guide me through my troubles?

[Error] C:\Simba\Scripts\Mcoal.simba(5:3): Duplicate identifier 'clickcontinue' at line 5

Clickcontinue is a name of a function.

Rename your variable.

There is already a function in SRL5 called clickContinue (hence the duplicate error). Just change the name of your bitmap and it should work.

E: Ninjaed you punk