Hey, so I was wondering how to keep trying to click a DTM until it successfully sees the uptext (rightclick).
Basically I'm trying to climb an obstacle, and it often recognises it, but misclicks so it doesn't bring up the option to climb.
I have a backup DTM, but it won't use it if it actually see the first DTM and misclicks.
Any help would be greatly appreciated
Here's what I have so far:
Code:procedure ClickObstacle2; var x, y, Obstacle2DTM, Obstacle2Backup :Integer; begin Wait(RandomRange(1200, 500)); Obstacle2DTM := DTMFromString('mVAEAAHicE2BgYHgGxD+AmI2RgeErkP4FxO+B+DcQqwDFNIBYFYhvA/nXgZgLyGYBYgFGiDw7EM8Gis8B4rlAPA+IZwHxdCB+BTVDkRHCBtHbgPQOIN4HxPeB+Mm9owztrY1Y8Z1r++D4/s2DDPdu7GdYtXQSw+rlUxjWrpjK8OrxKQZJoBmUYEYKMToAAF+NMyk='); Obstacle2Backup :=DTMFromString('mVAEAAHicE2BgYHgLxOyMDAzmQKwFxD+AfAEg/RdICwFpXiB+BGRfAeKHQMwI5PMD8RcgWxRIvwDSDUDMBmSfAdKNUFwNxHOBeA4QnwViVqA8JxBLALEkEIsBsRQQP7l3lKG9tZHh3o39YAxiw/DaFVMZVi+fwnD/5kGw3ItHJ1DkQfg/0GxJCjAjhRgdAACvVy8l'); If FindDTM(Obstacle2DTM, x, y, MSX1, MSY1, MSX2, MSY2) then begin Mouse(x, y, 1, 1, false); WaitOption('Climb', 1000); StatsGuise('Found Obstacle 2'); end else If FindDTM(Obstacle2Backup, x, y, MSX1, MSY1, MSX2, MSY2) then begin Mouse(x, y, 1, 1, false); WaitOption('Climb', 1000); StatsGuise('Found O2 Backup'); end else begin WriteLn('couldnt climb obstacle'); TerminateScript; end; FreeDTM(Obstacle2DTM); FreeDTM(Obstacle2Backup); end;



Reply With Quote





.





