SRL Archive - OSR Help

I used the code below for a bot for a browser game. This was the code I used in srl-5. Is there anyone that can help me with srl-6 by telling me what I need to change to make this code work?

This has nothing to do with runescape. Just a bot that moves the mouse around and clicks.

Edit: I do know to change ClickMouse2 to ClickMouse. Really just need the new globals and the new Mouse command.

[PHP]program FarmingVills;
{$define srl5}
{$loadlib sps}
{$i srl/srl.simba}
{$i sps/sps.simba}

procedure FarmVillages;

begin
Mouse(660, 259, Random(15), Random(10), True); //Dranagaky
Wait((500 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(630, 313, Random(15), Random(10), True); //Dragav
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(553, 283, Random(15), Random(10), True); //Kosnarho
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(587, 490, Random(15), Random(10), True); //Konosstriae
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(668, 502, Random(15), Random(10), True); //Gavpsiginos
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(803, 478, Random(15), Random(10), True); //Ithnos
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(150 + Random(200));
Mouse(300, 20, Random(10), Random(10), True); //jump to next cityisland
Wait(150 + Random(200));
Mouse(145, 182, Random(5), Random(5), True);

Wait(500 + Random(1500));

Mouse(805, 310, Random(10), Random(10), True); //Roshyaegi
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(625, 305, Random(10), Random(10), True); //Aeta
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(580, 265, Random(10), Random(10), True); //Ithko
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(480, 305, Random(10), Random(10), True); //Thosrosae
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(370, 350, Random(10), Random(10), True); //Rosgakosrho
Wait((250 + Random(250)));
ClickMouse2(True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(300, 20, Random(10), Random(10), True); //jump to next cityisland
Wait(150 + Random(200));
Mouse(145, 182, Random(5), Random(5), True);

Wait(150 + Random(200));

end;

procedure LootVillages;

begin
Mouse(660, 259, Random(15), Random(10), True); //Dranagaky
Wait((500 + Random(250)));
Mouse(720, 270, Random(20), Random(20), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(630, 308, Random(15), Random(10), True); //Dragav
Wait((250 + Random(250)));
Mouse(690, 323, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(553, 283, Random(15), Random(10), True); //Kosnarho
Wait((250 + Random(250)));
Mouse(613, 293, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(587, 490, Random(15), Random(10), True); //Konosstriae
Wait((250 + Random(250)));
Mouse(647, 500, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(668, 497, Random(15), Random(10), True); //Gavpsiginos
Wait((250 + Random(250)));
Mouse(730, 507, Random(10), Random(10), True)
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(803, 478, Random(15), Random(10), True); //Ithnos
Wait((250 + Random(250)));
Mouse(863, 488, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(150 + Random(200));
Mouse(300, 20, Random(10), Random(10), True); //jump to next cityisland
Wait(150 + Random(200));
Mouse(145, 182, Random(5), Random(5), True);

Wait(500 + Random(1500));

Mouse(805, 310, Random(10), Random(10), True); //Roshyaegi
Wait((250 + Random(250)));
Mouse(865, 320, Random(10), Random(10), True)
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(1500));

Mouse(625, 305, Random(10), Random(10), True); //Aeta
Wait((250 + Random(250)));
Mouse(685, 315, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(580, 265, Random(10), Random(10), True); //Ithko
Wait((250 + Random(250)));
Mouse(640, 275, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(480, 305, Random(10), Random(10), True); //Thosrosae
Wait((250 + Random(250)));
Mouse(540, 315, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(370, 350, Random(10), Random(10), True); //Thosrosae
Wait((250 + Random(250)));
Mouse(430, 360, Random(10), Random(10), True);
Wait((500 + Random(250)));
Mouse(307, 385, Random(60), Random(5), True);

Wait(500 + Random(500));

Mouse(300, 20, Random(10), Random(10), True); //jump to next cityisland
Wait(150 + Random(200));
Mouse(145, 182, Random(5), Random(5), True);

Wait(150 + Random(200));
end;

begin
SetupSRL;
repeat
Mouse(29, -100, Random(5), Random(5), True);
Wait(500);
Mouse(785, 72, Random(10), Random(10), True);
Wait(500);
//FarmVillages;
LootVillages;
Mouse(699, -90, Random(5), Random(5), True);
Wait(270000 + Random(45000));
until(False);
end.[/PHP]

ClickMouse2(true) > fastClick(MOUSE_LEFT); or fastClick(MOUSE_RIGHT);
// mouse has been changed to use a TPoint.. (and to click)
mouse(point(500 + random(50), 100 + random(100)), MOUSE_LEFT);
// else if you just want to move
mouse(point(500 + random(50), 100 + random(100));

Thanks for the quick answer. I noticed there was no comment about the new globals. Is there anywhere I can find them?

Is it just {$i srl-6/srl.simba} and {$i sps-6/sps.simba}?

From: Avenaei
Thanks for the quick answer. I noticed there was no comment about the new globals. Is there anywhere I can find them?

Is it just {$i srl-6/srl.simba} and {$i sps-6/sps.simba}?

Well there is no updated sps currently and judging by your script you don't need it, the only include you will need is {$i srl-6/srl.simba}

Thanks that answered all my questions.