呵呵,楼主你要的三个脚本我全部给你测试出来了:
这是第一个,很遗憾,由于不停的敲击左键,其中已经有了左键弹起的动作,所以不能用左键弹起的动作来结束狂击,只能改用中键单击来停止脚本,这是一个多线程的脚本,所以比较长:
BeginThread "Thread1"
Sub Thread1
WaitClick Click
SetEnv "apple","1"
If Click=32769
x=GetEnv("apple")
BeginThread "Thread2"
While x=1
LeftClick 1
x=GetEnv("apple")
EndWhile
EndIf
Gosub Thread1
Return
Sub Thread2
WaitClick Click
If Click=32777
SetEnv "apple","2"
EndIf
Gosub Thread2
Return
Click后面的是左键按下的按键码,下面这个复杂一点,是按下1秒以上并且再弹起来才能执行左键不停单击:
Rem start
WaitClick Click
//下面这句是截取系统当前时间,单位:毫秒
Plugin Time1 = GetSysInfo.GetTime()
If Click=32769
Else
Goto start
EndIf
WaitClick Click
//下面是截取第二遍系统时间
Plugin Time2 = GetSysInfo.GetTime()
//下面是判断,如果第二时间大于等于第一时间+1000毫秒,则执行:
If Click=32770 and Time2 >= Time1 + 1000
While 1
LeftClick 1
EndWhile
Else
//否则重来
Goto start
EndIf
OK,第三个脚本就是在第二个的基础上增加不停的按7,8,这要用到多线程操作:
BeginThread "Thread1"
BeginThread "Thread2"
While 1
KeyPress 55,1
KeyPress 56,1
EndWhile
Sub Thread1
WaitClick Click
SetEnv "apple","1"
Plugin Time1 = GetSysInfo.GetTime()
If Click=32769
Else
Gosub Thread1
EndIf
WaitClick Click
Plugin Time2 = GetSysInfo.GetTime()
If Click=32770 and Time2 >= Time1 + 1000
x=GetEnv("apple")
While x=1
LeftClick 1
x=GetEnv("apple")
EndWhile
Else
EndIf
Gosub Thread1
Return
Sub Thread2
WaitClick Click
If Click=32777
SetEnv "apple","2"
EndIf
Gosub Thread2
Return
温馨提示:答案为网友推荐,仅供参考