since, most of the times, my DTMs don't work. I'm asking for a small favor. Can Somebody make me a DTM for a raw shark?
Printable View
since, most of the times, my DTMs don't work. I'm asking for a small favor. Can Somebody make me a DTM for a raw shark?
Here you are
SCAR Code:RawShark := DTMFromString('78DA63CC62626078C88002664DE867E007D28' +
'C40FC1F0818E3816A3E31A0014624124883D43C25A02619A8E626' +
'0135254035B708A8A900AA7946404D2550CD17FC6A000CED0F1C');
Just to make sure I ran it with this program:
And it worked :D your welcomeSCAR Code:program HereYouGo;
{.Include srl/srl.scar}
var
x, y, rawshark : integer;
Procedure Load;
Begin
RawShark := DTMFromString('78DA63CC62626078C88002664DE867E007D28' +
'C40FC1F0818E3816A3E31A0014624124883D43C25A02619A8E626' +
'0135254035B708A8A900AA7946404D2550CD17FC6A000CED0F1C');
End;
Procedure FindShark;
Begin
If FindDTM(rawshark, x, y, MIx1, MIy1, MIx2, MIy2) Then
Begin
Mouse(x, y, 5, 5, False);
Wait(125+random(132));
ChooseOption('rop');
End;
End;
Procedure Free;
Begin
FreeDTM(rawshark);
End;
begin
SetUpSRL;
Wait(2500+random(124));
Load;
FindShark;
Free;
end.