You put it in your walking procedure, you just need to declare it and then use it as a end else statement
Just remember this code should be sort of fitted in to the rest of your procedure.
Code:
procedure WalkToWillows;
var
x, y, RockDTM: Integer;
begin
RockDTM := DTMFromString('78DA633CCBC4C020CAC8800C224383C1344C9' +
'4F11C508D30AA1A370F0354351730CDF10EB2C3344702558D4F98' +
'09AA9AD340359268EEC95645557312A8461C558DB3AB0EAA9A534' +
'03522A86A1C1CAC485603004BED0DB8');
if FindDTM(RockDTM, x, y, MMX1, MMY1, MMX2, MMY2) then
begin
Mouse(x, y, 0, 0, True);
end;
end;
Sorry about standards :s