[Данные, строки] Как составить цикл?

$orders =5
dim $s[$orders]
$c = 0
for $i= $c to $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   ;if $d=17658687  ;здесь нужно заново начать цикл,только чтобы с не изменилось, также не изменилось номер повторения
 
   $c = $c+1
Next

$orders =5
dim $s[$orders]
$c = 0
$i=0
While $i<= $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   if $d<>17658687 then ;здесь нужно заново начать цикл,только чтобы с не изменилось, также не изменилось номер повторения
    $c = $c+1
    $i+=1
   endif
WEnd

For $i = 1 to 10
    If $i = 7 Then ContinueLoop
    MsgBox(0, "The value of $i is:", $i)
Next

$orders =5
dim $s[$orders]
$error =0
$c = 0
While $c<= $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   if $d<>17658687 and $error <1 then 
   ContinueLoop
   $error=$error+1
   endif
Send("Hello world")
$c = $c+1
WEnd

$orders =5
dim $s[$orders]
$error =0
$c = 0
While $c<= $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   if $d=17658687 and $error <1 then
    $error=1 ; цвет тот, это ошибка, проверим то же самое ещё разок, но не более
   else
    $c = $c+1 ; цвет не тот, всё в порядке, проверяем следующий итем
   endif
Send("Hello world")
WEnd

$orders =5
dim $s[$orders]
$error =-1
$c = 0
While $c<= $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   if $d=17658687 and $error <> $c then
    $error=$c ; цвет тот, это ошибка, проверим то же самое ещё разок, но не более
   else
    $c = $c+1 ; цвет не тот, всё в порядке, проверяем следующий итем
   endif
Send("Hello world")
WEnd

$orders =5
dim $s[$orders]
$error =-1
$c = 0
While $c<= $orders
   $n = ControlListView("[TITLE:EVE ;]", _
   "","WindowsForms10.SysListView32.app.0.378734a1", "Finditem" , $s[$c])
   $d= PixelGetcolor(x,y)
   if $d=17658687 and $error <> $c then
    $error=$c ; цвет тот, это ошибка, проверим то же самое ещё разок, но не более
   else
    $c = $c+1 ; цвет не тот, всё в порядке, проверяем следующий итем
   endif
Send("Hello world")
WEnd