bigjosh0315
2010-02-11 12:56:45
This says "Did not examine trout" when it did, and I can't figure out why… help? 0.o
Function FindTrout: Boolean;
var
Trout: Integer;
begin
Trout := DTMFromString('78DA639CCCC4C0F09C01054C9F3891E13F906' +
'604E2FF40C0D80D54F382010D30814946288F1164CE43026AA601' +
'F9B709A85908E45F27A06609907F8F809A1940FE4B026ABA80FC0' +
'FF8D50000283A12AA');
result := FindDTM(Trout, X, Y, MIX1, MIY1, MIX2, MIY2);
if result then
begin
Mouse(X, Y, 3, 3, false);
Wait(200 + random(100));
ChooseOption('Examine');
wait(2000 + random(50));
if (not (inchat('I should try'))) then
writeln('Did not examine trout…')
else
writeln('Succesfully examined trout!');
end else
begin
writeln('Did not find raw trout in inventory…');
TerminateScript;
end;
end;