Simba Code:
procedure SmartDrop;
var
logdtm, x, y: integer;
begin
if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
NextPlayer(false);
Writeln('using Dtm (smart way) slower though but more accurate');
logdtm := DTMFromString('78DA63CC63626078C880029A536D18FE03694' + '620FE0F048C054035EF18D000231209A463816A9E135093015473' + '87809A3222D45413B60B0046720E26');
gametab(4);
repeat
if finddtm(logdtm, x, y, 550, 203, 731, 464) then
begin
Mouse(x, y, 3, 3, false);
begin
wait(random(400) + 100);
chooseoption('Drop')
else
waitoption('Destroy');
MMouse(374, 400);
Mouse(0, 0, true);
wait(1200 + random(1000));
end;
until (not (finddtm(logdtm, x, y, 550, 203, 731, 464)));
freedtm(logdtm);
end;
I meant you can make a DTM for the regular logs, and it will pick up the Special aswell, if you get the same color like if Log1 (Regular) is 1523083, find to see if that is a color on the Log2(Special) so it will pick up the special..
But if you want, you can USE ACA for the Log and SpecialLog
As for the ELSE Error.. I think you have to add a Begin End;
Like This.. Try this Code
Simba Code:
procedure SmartDrop;
var
logdtm, x, y: integer;
begin
if not (LoggedIn) or not (Players[CurrentPlayer].Active) then
NextPlayer(false);
Writeln('using Dtm (smart way) slower though but more accurate');
logdtm := DTMFromString('78DA63CC63626078C880029A536D18FE03694' + '620FE0F048C054035EF18D000231209A463816A9E135093015473' + '87809A3222D45413B60B0046720E26');
gametab(4);
repeat
if finddtm(logdtm, x, y, 550, 203, 731, 464) then
begin
Mouse(x, y, 3, 3, false);
begin
wait(random(400) + 100);
chooseoption('Drop')
else
Begin
waitoption('Destroy');
MMouse(374, 400);
Mouse(0, 0, true);
wait(1200 + random(1000));
end;
end;
until (not (finddtm(logdtm, x, y, 550, 203, 731, 464)));
freedtm(logdtm);
end;