按鍵精靈if循環語句

doifcolor cx,cy,col,0 //如果找到色，cx,cy就是此色的坐標（兩者都會大于0），沒找到，就是-1,-1end ifdelay 200 //大至每0.2秒判斷一次，以減小資源占用。

loop until cx >0 and cy>0 //找到色就結束循環，沒找到繼續循環，直到找到為止。如果一直找不到，就會面為死循環。

//moveto cx,cy //鼠標移到到色點。// “do 循環體 loop until 循環結束條件”// 循環語句。

當until后的條件成立時，不再循環，而繼續執行下一條語句。

按鍵精靈循環語句

圖會自己持續移動嗎？不會移動簡單點，

rem ks

VBSCall FindPic(680,82,780,143,"d:\xpm\圖*",0.9,intX,intY)

If intX>0 and intY>0

Moveto intX,intY

Delay 500

rightClick 1

else

goto ks

endif

----你用到 rem goto語法，，，還有找圖語法， VBSCall FindPic(680,82,780,143,"d:\xpm\圖*",0.9,intX,intY),,intX,intY多次使用沒關系的。

按鍵精靈跳出循環語句

//跳出循環可以用到rem-goto命令

//既然是循環內跳出，你要有的條件啊，比如滿足什么情況跳出

i=0 //設置一個變量賦值為0

While i>10 //當變量大于10的時候條件滿足跳出循環

IfColor 458, 562, "4A69", 0 Then

Call *ick(Hwnd, 458, 562)

End If

//你的條件判斷語句也有問題

// if x=100 //判斷條件

//LeftClick 1 //滿足條件執行的語句

//End If //判斷結束

i=i+1 //讓變量+1

Wend

goto 跳轉

rem 跳轉

IfColor 497,317,"F0F3C",0 Then

Call *ick(Hwnd, 497, 317)

End If

//以上代碼可以直接用了

按鍵精靈怎么循環

這樣問法鬼理你！！！！

你的找圖沒寫完整路徑（除非圖片在按鍵精靈目錄下），如圖片在D盤下就這樣寫

VBSCall FindPic(1,1,1023,767,"D:\*",0.9,x,y)

當然也可以把圖片放到附件里方法例子里有不再說明注要是如下的：

VBSCall FindPic(1,1,1023,767,"Attachment:\*",1,X,Y)

找字要相似度1才能更準確的找到你要的字（如果是白色的字幾乎找到的可能性為0）

按鍵精靈7的例子里有個找多點顏色的方法找字比找圖好

當然最好是下載個文字識別的插件（圖形識別）下載地址如下（要先注冊）：

http://***?tid=82638

以下是源碼，（注意┍ │ ┕ 這些符號是我為說明而加上的用時不必寫入）

1.標記循環如下：

┍ Rem start

│

┕ Goto start

上面中間放上你要循環的語句，標記循環也就是在一個地方做個標記，然后在另一個地方無條件的返回到標記處重復運行（一般用于無限循環）如上面的是做個標記start 后面再跳到這個標記start再運行

2.次數循環如下：

┎ For 10

│

┖ EndFor

上面的10也就是循環10次的意思，同樣中間也是放上你要循環的語句.

3.條件循環如下

┎ While X=Y

│

┖ EndWhile

中部加上你要循環的語句這句的意思是當X等于Y時循環中間的語句（X.Y可以是變量）

以上的循環可以相互交叉使用達到你要的效果比如下面的是當X=Y時循環10次按A鍵一次按B（也就是按10次A后按1次B這樣不停的按）在按A鍵10次中如果X不等于Y了則跳到標記start 再等到X=Y 再循環10次A和1次B

Rem start

While X=Y

For 10

If X<>Y

Goto start

EndIf

KeyPress 65,1

EndFor

KeyPress 66,1

EndWhile

Goto start

按鍵精靈循環語句

圖會自己持續移動嗎？不會移動簡單點，rem ks VBSCall FindPic(680,82,780,143,"d:\xpm\圖*",0.9,intX,intY) If intX>0 and intY>0 Moveto intX,intY Delay 500 rightClick 1else goto ksendif----你用到 rem goto語法，，，還有找圖語法， VBSCall FindPic(680,82,780,143,"d:\xpm\圖*",0.9,intX,intY),,intX,intY多次使用沒關系的。

求按鍵精靈循環語句

Dim sngNowTimeDim blnResult1, blnResult2sngNowTime = TimerRem A區blnResult1 = Timer - sngNowTime >= 5blnResult2 = Timer + sngNowTime - SecondPerDay >= 5 and sngNowTime > TimerIf blnResult1 = True Xor blnResult2 = True MessageBox 時間到，循環結束了，進入B循環 sngNowTime = Timer Goto B區EndIf MessageBox 我會被循環5秒，這里可以插入你的操作！Goto A區Rem B區blnResult1 = Timer - sngNowTime >= 6blnResult2 = Timer + sngNowTime - SecondPerDay >= 6 and sngNowTime > TimerIf blnResult1 = True Xor blnResult2 = True MessageBox 時間到，循環結束。

EndScript EndIf MessageBox 我會被循環6秒，這里可以插入你的操作！Goto B區按照我的示例，試試看~。

關于按鍵精靈如何寫出IF語句持續幾秒則怎樣怎樣

For 10//循環10次

Delay 1000//延遲1秒

FindPic 0,0,1024,768,"Attachment：\神盾.bmp",0.9,intX,intY

If intX > 0 And intY > 0 Then

//找到圖執行命令

Else//否則

MoveTo 0, 0//鼠標移動到坐標0.0

LeftClick 1//點擊一次

End If//條件結束

Next//循環結束

//10秒鐘執行10次找圖

轉載請注明出處華閱文章網 » 按鍵精靈if循環語句

按鍵精靈if循環語句