I can figure this anti-leech.

[akash22]

Hi guys i cant figure this out so pls help me, iv been at it for a good 2 hours.


theyre both in the mainloop

they both have // looky looky here! so you can easily find them


procedure MainLoop;
var
i, Timer : Integer;
Judge, Judge2, RoundFin : Boolean;
myPath: TPointArray;
begin
StatsGuise('MainLoop');

if FindNormalRandoms then
if not LoggedIn then
Exit;

StatsGuise('Finding Judge');
repeat
MarkTime(Timer);
repeat

//Looky Looky Here!
ArrowDTM := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA=');

If FindDTM(ArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) Then
begin
Mouse(x, y, 5, 5, false);
if OptionsExist(['Wield'], Nothing) then
begin
ChooseOption('Wield');
end
end;


FreeDTM(ArrowDTM)
//You can stop looking! Read ahead!

if FindObjTPA(x, y, 1845548, 11, 2, 15, 15, 50, ['ition']) or
FindObjTPA(x, y, 2702911, 13, 2, 15, 15, 50, ['ition']) then
begin
Mouse(x, y, 5, 5, False);
Wait(200 + Random(150) + Laggy);


if OptionsExist(['mpete'], Nothing) then
begin
Judge := True;
ChooseOption('mpete');
end else
Judge2 := True;
end else
begin
Mouse(266, 136, 10, 30, False);
if WaitOption('mpete', 500) then
Judge := True;
end;
until((TimeFromMark(Timer) > 20000) or Judge or Judge2);




if TimeFromMark(Timer) > 20000 then
begin
if not InCords(2510, 2965, 2545, 2990) then
myPath := [Point(2554, 2927), Point(2542, 2935), Point(2534, 2947), Point(2524, 2955), Point(2515, 2963), Point(2515, 2982)];
SPS_WalkPath(myPath);
ClickNorth(1);
MakeCompass(35 + Random(5));

if FindObjTPA(x, y, 1845548, 11, 2, 15, 15, 50, ['ition']) or
FindObjTPA(x, y, 2702911, 13, 2, 15, 15, 50, ['ition']) then
Mouse(x, y, 5, 5, False);
Wait(200 + Random(150) + Laggy);
if WaitOption('to C', 500) then
Judge2 := True;
end;
until (Judge or Judge2)

StatsGuise('MainLoop');
Wait(800 + Random(150));

if Judge then
begin
KeyDown(49);
Wait(20+random(20));
KeyUp(49);
Wait(1500);
KeyDown(49);
Wait(20+random(20));
KeyUp(49);

Wait(800 + Random(150) + (Laggy * 2));
If PinScreen Then
begin
StatsGuise('Enter pin...');
InPin(Players[CurrentPlayer].Pin);
end;


end;

if not RightClickMethod then
begin
StatsGuise('Spamming Targets');
MarkTime(Timer);
repeat
if FindColorTolerance(x, y, 4310482, 230, 162, 296, 219, 11) then
MMouse(487, 42, 5, 5);
Wait(600);
if IsUpText('lose') then
ClickMouse2(True);

//Looky Looky Here!

ArrowDTM := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA=');

If FindDTM(ArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) Then
begin
Mouse(x, y, 5, 5, false);

if OptionsExist(['Wield'], Nothing) then
begin
ChooseOption('Wield');
end
end;
FreeDTM(ArrowDTM)

//Stop Here!

if FindObjEx(x, y, ['arget'], [5041405, 5238269], 7, 31, MSX1, MSY1, 375, 65) then
repeat
ClickMouse2(True);
Wait(RandomRange(15, 40));
if FindNPCChatText('orry', Nothing) or FindNPCChatText('ou''ve', Nothing) then
RoundFin := True; //^This part is very important!
until(not IsUpText('-at') or RoundFin);
until(RoundFin or (TimeFromMark(Timer) > 40000));

if TimeFromMark(Timer) > 40000 then
begin
if not InCords(2510, 2965, 2545, 2990) then
myPath := [Point(2554, 2927), Point(2542, 2935), Point(2534, 2947), Point(2524, 2955), Point(2515, 2963), Point(2515, 2982)];
SPS_WalkPath(myPath);
ClickNorth(1);
MakeCompass(35 + Random(5));
end;
end;

if RightClickMethod then
begin
StatsGuise('Shooting Targets');
for i := 1 to 10 do
begin
if FindObjEx(x, y, ['arget'], [5041405, 5238269], 7, 31, MSX1, MSY1, 375, 65) then
ClickMouse2(False);
Wait(200 + Random(150));
ChooseOptionEx('arget', 'object');
Wait(2400 + Random(150) + Laggy);
MMouse(487, 42, 3, 3);
Wait(550 + Random(150) + Laggy);
if IsUpText('lose') then
ClickMouse2(True);
end;

if FindObjTPA(x, y, 1845548, 11, 2, 15, 15, 50, ['ition']) or
FindObjTPA(x, y, 2702911, 13, 2, 15, 15, 50, ['ition']) then
Mouse(x, y, 5, 5, False);
WaitOption('to C', 500);
end;

end;



The problem is when i try running the script, it does one round at the range guild but then it logs out

[YoHoJo]

That means it's working!
Hoooooray!!!!

[akash22]

What?

[stuartroad]

Is this the ranged guild one. I also struggled with it. Just keep trying and you will find it!

Goodluck.

[akash22]

The problem is i dont really know how to make a script

[YoHoJo]

The point of antileech is to stop people who don't know how to do basic scripting from using the script.

The script maker only want people who know very basic scripting knowledge to be able to use it.

Edit:
My name is Aakash too!

[akash22]

Ahhh so can you give me a link where i could know how to script? i tried finding but i get a headache lol.

[YoHoJo]

http://villavu.com/forum/forumdisplay.php?f=191
Beginners tutorials should be all the info you need.

[akash22]

Can this video of yours help me? http://www.youtube.com/watch?v=pMMejhyjGwI

[YoHoJo]

No, that is a bit TOO basic.

[akash22]

maybe this one? http://www.youtube.com/watch?v=qfumZWrm_DE&feature=fvwrel

[YoHoJo]

A bit maybe, but that's more for making a specific script.
You just need to learn basic syntax and stuff.

Sorry it seems so hard and all, it really isn't. Just takes some time/hours to learn but it's worth it in the end.

Scripting is fun, and feels great! Just take it slow, take a breath, start from scratch and work your way up, it's fun and easy!

[akash22]

Ok ill try but the anti leech in the script is in these two codings right?

1: ArrowDTM := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA=');

If FindDTM(ArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) Then
begin
Mouse(x, y, 5, 5, false);
if OptionsExist(['Wield'], Nothing) then
begin
ChooseOption('Wield');
end
end;


FreeDTM(ArrowDTM)


2:
ArrowDTM := DTMFromString('mggAAAHicY2NgYOACYhEgFgBiXiDmYIAAZi gN4vMDsTCUdtEA6WDCwCIM2AEjDgwBAGIcASA=');

If FindDTM(ArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) Then
begin
Mouse(x, y, 5, 5, false);

if OptionsExist(['Wield'], Nothing) then
begin
ChooseOption('Wield');
end
end;
FreeDTM(ArrowDTM)

[akash22]

Someone please link me to a guide that is easy to understand i seriously cant understand anything please help

[Element17]

First use Simba tags when posting code, and dude just read some tuts in the beginner section and intermediate. The point of anti-leech is to keep lechers from running the script. It looks like it is serving its purpose. Your honestly not trying that hard mate. You want us to fix the anti-leech for you...not going to happen that would defeat the whole purpose. Keep reading and you will get it.

[Mr Stoj]

glanced over it, took 10 seconds to spot what is wrong, take 1 day learning something and forever you shall be rewarded.
trust me if you learn to script you can make much better ones that are public