万象OL免刷 云百度免刷

免⁹²¹²¹⁸⁴¹º(921218410) 19:28:15
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=D:\autoit3\Aut2Exe\Icons\NIS.ico
#AutoIt3Wrapper_outfile=刷卡助手.exe
#AutoIt3Wrapper_Res_Description=适用于 万象OL免届刷 网吧的收银机
#AutoIt3Wrapper_Res_Fileversion=0.0.0.3
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=p
#AutoIt3Wrapper_Res_LegalCopyright=小女子不才的，水平很次献丑了。

问题反馈QQ:921218410

#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
Global $Paused
HotKeySet(\"{PGUP}\", \"zanting\")
HotKeySet(\"{PGDN}\", \"tuichu\")
HotKeySet(\"{END}\", \"chongshu\")
While 1
$i = 0
While $i <= 10000
winwaitactive(\"请输入临时卡用户资料\",\"临时卡用户资料\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:2]\") 
Send(\"0\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:1]\") 
Send(\"0\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TComboBox;INSTANCE:1]\") 
send(\"{DOWN}\")
send(\"{enter}\")
MouseWheel(\"up\", 4)
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:5]\") 
send(\"henan\")
send(\"{space}\")
send(\"{space}\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:7]\") 
#Region --- CodeWizard generated code Start ---
;SpashText features: Title=No, Text=Yes, Width=230, Height=20, Left=450, Top=0, Center justified text, Fontname=楷体_GB2312, Font size=12, Font weight=400
SplashTextOn(\"\",\"现在已经刷了\"& $i &\"张卡\",\"230\",\"20\",\"450\",\"0\",1,\"楷体_GB2312\",\"12\",\"400\")
#EndRegion --- CodeWizard generated code End ---
$i = $i + 1
WinActivate ( \"激活临时卡\",\"标准上机\" )
winwaitactive(\"激活临时卡\",\"标准上机\")
WEnd
WEnd
Func zanting()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('脚本已被“暂停”',0,0)
WEnd
ToolTip(\"\")
EndFunc

Func tuichu()
Exit 0
EndFunc
Func chongshu()
winwaitactive(\"请输入临时卡用户资料\",\"临时卡用户资料\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:2]\") 
Send(\"0\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:1]\") 
Send(\"0\")
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TComboBox;INSTANCE:1]\") 
send(\"{DOWN}\")
send(\"{enter}\")
MouseWheel(\"up\", 2)
ControlClick(\"请输入临时卡用户资料\",\"临时卡用户资料\",\"[class:TEdit;INSTANCE:5]\") 
send(\"henan\")
send(\"{space}\")
send(\"{space}\")
winwaitactive(\"激活临时卡\",\"标准上机\")
EndFunc

转载于:https://my.oschina.net/u/3566609/blog/1023586