SRL Archive - Research & Development Lounge

function CombineItemsDTM(var I1 : integer; var I2 : integer; rx, ry, x1, y1, x2, y2 : integer; left : boolean) : boolean;
var
  x, y : integer;
begin
  if FindDTM(I1, x, y, x1, y1, x2, y2) then
  begin
    result := true;
    mouse(x, y, rx, ry, left);
    wait(200 + random(150));
  end else
    exit;
  if FindDTM(I2, x, y, x1, y1, x2, y2) then
  begin
    mouse(x, y, rx, ry, left);
    wait(200 + random(150));
  end;
end;

This function clicks 2 dtms.
Returns true if they both were found or false if only 1 was found or none were found.

Use it like this

  CombineItemsDTM(DTM1, DTM2, 4, 4, MIX1, MIY1, MIX2, MIY2, true);

Enjoy :). :sasmokin:

Could be useful for firemaking and cooking! :)

Yes and fletching :D.