Im trying to learn scripting and am trying to get the script to equip hatchet using DTM, it won't do anything and will give Successfully executed.
Code
program Chopper;
{$i SRL\SRL.scar}
var
x,y, Hatchet:integer;
begin
ClearDebug;
SetupSRL;
Hatchet:= DTMFromString('mbQAAAHicY2VgYLBiYmBwBmIHILYDYgsgfg sUvwHFd4H4AxDnBwowFIcIMMQ68zKE2fMw+FpwM2ADjFgwGAAA mHwJNw==');
if FindDTM(Hatchet,x, y, MIX1, MIY1, MIX2, MIY2) then
begin
Mouse(x, y, 4, 4, False);
ChooseOption ('ield');
Writeln ('Found Hatchet in inventory, wielding it');
end;
FreeDTM(Hatchet)
end.


Reply With Quote









