Search the Community

@Wanted i made a rune sudoku solver but like it really slow heres a piece so you can understand i did this 81 times for each of the 81 squares but it puts more then one rune in the same row or column because it so fast it does not see that it just clicked 1 square in the row and it takes a little for the rune to appear so i put wait 700mill sec and up to wait 1 whole second but then it will take to long to complete the puzzle like i know theres a better way to make scar check each row column and box and i know wanted made a sudoku script so could you help me here thanks program sudoku; var mind, fire: TSCARBitmap; x, y: Integer; begin mind := TSCARBitmap.Create('kuyiuknjhiuyt8487ywhsiduyig=='); fire := TSCARBitmap.Create('ksujdgfljksdglzjdjghldfjghgfh=='); If FindBitmap(x, y, mind, 118, 8, 445, 39) or //accross //1st box FindBitmap(x, y, mind, 118, 8, 150, 335) or // down FindBitmap(x, y, mind, 118, 8, 223, 113)Then //box begin writeln('found mindA1'); movemouse(28, 110); clickmouse(28, 110, false); end else begin writeln('did not find mindA1'); movemouse(28, 110); clickmouse(28, 110, false); //on mind rune movemouse(127, 22); wait(200); clickmouse(127, 22, false); // add wait 700mil seconds after box clicks wait(700) end; //complete If FindBitmap(x, y, mind, 118, 8, 445, 39) or //2nd box FindBitmap(x, y, mind, 155, 8, 186, 335) or FindBitmap(x, y, mind, 118, 8, 223, 113)Then begin writeln('found mindA2'); end else begin writeln('did not find mindA2'); movemouse(167, 25); wait(200); clickmouse(167, 25, false); wait(700) end; //complete If FindBitmap(x, y, mind, 118, 8, 445, 39) or //3rd box FindBitmap(x, y, mind, 192, 8, 224, 335) or FindBitmap(x, y, mind, 118, 8, 223, 113)Then begin writeln('found mindA3'); end else begin writeln('did not find mindA3'); movemouse(213, 25); wait(200); clickmouse(213, 25, false); wait(700) end; //complete