找颜色，找到后执行“1搜”后命令1次，现在想让这个执行“1搜”50次后停止，应该怎么修改
GetColor = GetPixelColor(160, 770)
IfColor 160, 770, "F19A6D", 1 Then
MoveTo 747, 991 //1搜
Delay 500
LeftClick 1
Delay 500
MoveTo 964,968 //2搜
Delay 500
LeftClick 1
Delay 500
Rem a
MoveTo 947,573 //选
Delay 500
LeftClick 1
Delay 500
MoveTo 872,436 //5
Delay 500
LeftClick 1
Delay 500
FindColor 807,593,843,626,"6DFFFF",intw,inte
If intw > 0 And inte > 0 Then
MoveTo 959,739 //使用
Delay 500
LeftClick 1
Delay 500
MoveTo 49,138 //点空白
Delay 500
LeftClick 1
Delay 500
Goto a
End If
MoveTo 1248,894 //点2
Delay 500
LeftClick 1
Delay 500
MoveTo 962,482 //点出
Delay 500
LeftClick 1
Delay 500
End If