SCAR Code:
program Dropper;
{.include srl/srl.scar}
var
Tuna,x,y: integer;
NotFind : Boolean;
begin
Tuna := DTMFromString( '78DA637463606038CF800296CC9CC9C00FA41' +
'981F83F1030FA01196719D000231209A40381C405026AAC80 C42D' +
'026A2C80C445FC6A00B3840B5E');
SetupSRL;
repeat
if FindDTM(Tuna, x, y, MIX1, MIY1, MIX2, MIY2) then
begin
Mouse(x,y,4,4,false);
ChooseOption('rop');
Wait(1000);
end else
NotFind := True;
until NotFind;
end.
Erm, guys, it really isn't that hard... 
Edit: He has tuna AND Swordies in his inventory, not ONLY tunas, as far as I got it, secondly, why load a DTM when it is already declared? Thirdly, no Standards = epic fail, by posting on a help thread you are setting giving an example from which people will/might learn...