Try this:
Simba Code:
program Tuna;
{$i SRL\SRL.scar}
var
Tuna, X, Y: Integer;
begin
SetupSRL;
Tuna := DTMFromString('mwQAAAHic42RgYOABYjYg5gNiMSAWB2JBIOZggABGIOYGYhYgZoKKcUPVi0AxJxD3d3ZCVeDDhAEjERgOAEHKAoY=');
if FindDTM(Tuna, X, Y, MSX1, MSY1, MSX2, MSY2) Then
begin
MMouse(X, Y, 5, 5);
Wait(10+random(10))
If isUptext('aw tun') Then
begin
repeat
Wait(RandomRange(2500, 750));
writeln('Found Tuna, clicking on it.');
Mouse(X, Y, 0, 0, True);
Until(InvFull);
writeln('Inventory Full, stopping');
end;
end;
FreeDTM(Tuna);
end.