Re: [-AI-] 想請問一下這程式裡的程式碼用途

作者: MoJi (戰神)   2017-12-26 15:07:42
大概想了一下雛形
註解!部分應該是我目前有疑惑的
Dim $interval = 480
Dim $isLoop=1
;!單獨滑鼠右鍵觸發、單獨滑鼠下滾觸發或單獨LSHIFT觸發
;用Capslock會依目前是否亮燈決定是否成功跑!
HotKeySet("{RBUTTON}", "StartClick")
HotKeySet("{F10}", "Terminate")
;!除了上面的exit方式外希望有個暫停程式運作(含偵測)的,要用時按一下又繼續的,
;有查到用pause/break當開關,但希望是可以用其他鍵而不只限定於pause
;(因為可能會同時開多個-AI-來用)!
While 1
Sleep(60000) ;!這裡面的數值填大填小有啥差別?!
WEnd
Func Terminate()
Exit 0
EndFunc
Func StartClick()
$isLoop = 1-$isLoop ;以同一按鍵來做切換狀態的開關
While (1-$isLoop) ;檢查是否執行迴圈
Send("{LSHIFT}")
Sleep (1500)
$time=0
While $time<=10
If($isLoop==1) Then ;檢查是否跳過迴圈
ExitLoop(2)
EndIf
$time+=1
Send("{Space down}")
Sleep ($interval)
Send("{Space up}")
Sleep ($interval*9/8)
WEnd
WEnd
EndFunc
ps.
還有就是a按下時連點a,放開時結束....
AHK有getkeystate可以偵測按件是否按下a來判斷
ai有嗎?想把連點也加進去
※ 引述《MoJi (戰神)》之銘言:
: 感覺autohotkey很難達成我的需求
: 所以想換AI來用
: 上網找了一下範例
: 想請問一下
: http://tw-eric-su.blogspot.tw/2010/02/blog-post.html
: (這部落格已經荒廢...直接貼應該沒關係吧?)
: 這個小範例裡的這段程式碼用途是?
: While 1
: Sleep(60000)
: WEnd
: ps.另外想問一下熱鍵可以怎麼設(HotKeySet)
: 找到的範例幾乎都是用esc、F1~F9、普通按鍵
: 我想要用的是LSHFT(有找到文章說shif不能設)、滑鼠右鍵或下滾輪

Links booklink

Contact Us: admin [ a t ] ucptt.com