djkristoph Posted October 17, 2011 Share Posted October 17, 2011 hi, i search command for loop ok lets go, i write script to search pixel: ths is my code program New; var x,y:integer; procedure click; begin if not(findcolor(x,y,79071,680,270,1900,1000)) then //i went if complete go to next search color, if not complete loop this command begin if not(findcolor(x,y,879127,8,8,1900,1000)) then KeyDown(32); if (findcolor(x,y,879127,8,8,1900,1000)) then KeyUp(32); if (findcolor(x,y,7708856,8,8,1900,1000)) then KeyDown(27); KeyUp(27); end; end; begin repeat click; until false end. Quote Link to comment Share on other sites More sharing options...
Neron Posted October 17, 2011 Share Posted October 17, 2011 [scar] program New; var x,y:integer; procedure click; begin if not(findcolor(x,y,79071,680,270,1900,1000)) then //i went if complete go to next search color, if not complete loop this command repeat if not(findcolor(x,y,879127,8,8,1900,1000)) then begin KeyDown(32); break; end; if (findcolor(x,y,879127,8,8,1900,1000)) then begin KeyUp(32); break; end; if (findcolor(x,y,7708856,8,8,1900,1000)) then begin KeyDown(27); //wait(sometime); KeyUp(27); break; end; until(false); end;[/scar] break - will leave loop, And after if statment you must add begin - end if you have more then one statment Quote Link to comment Share on other sites More sharing options...
djkristoph Posted October 17, 2011 Author Share Posted October 17, 2011 hmm ok, how is a code , I give example: if done procedure1 go to procedure2, i error procedure1 loop procedure 1 Hmm i cant run script:) where add begin and end. i added end. and have error Line 29: [Error] (29:1): 'BEGIN' expected in script Quote Link to comment Share on other sites More sharing options...
Neron Posted October 19, 2011 Share Posted October 19, 2011 hmm ok, how is a code , I give example: if done procedure1 go to procedure2, i error procedure1 loop procedure 1 Hmm i cant run script:) where add begin and end. i added end. and have error Line 29: [Error] (29:1): 'BEGIN' expected in script procedure has no value you must use function you mean if function1 = true go to procedure2 if function1 = false loop function1? [scar] repeat until(function1 = true); function2 [/scar] same thing [scar] repeat until(function1); function2 [/scar] Quote Link to comment Share on other sites More sharing options...
Dravepere Posted Monday at 01:06 AM Share Posted Monday at 01:06 AM But one thing that doesn t come to mind when you hear the name of one of Queen s most popular neighborhoods is pizza priligy for pe Conjugated linoleic acid biosynthesis by human derived Bifidobacterium species Quote Link to comment Share on other sites More sharing options...