苦命的矿工啊，多开密码输入器---不负责输入验证码

xin

先上代码，仔细看FAQ

FAQ：
有人问这是什么？ 答曰：autoit  http://www.autoitscript.com
如何运行之？ 答曰：下载 autoit v3 安装后，将下方代码另存为 XXX.au3 或者打开 SeciTe 复制粘贴，F5运行之 http://www.autoitscript.com/site/autoit/downloads/
为什么不用XXX编写？ 答曰：我不相信XXX的人品
我怕泄漏密码？ 答曰：自己看代码，不放心的用防火墙禁止联网，要不你就别用
有什么用？ 答曰：号多的明白，给其他人借用帐号时不用明确密码
联系作者：YY 找Lu`白猫
声明：不想被喷，喷子勿扰，不喜欢的请直接 Ctrl + W，右上角的 X 欢迎你

1. #include <GUIConstantsEx.au3>
   
2. #include <WindowsConstants.au3>
   
3. 
   
4. Global $name,$password
   
5. 
   
6. HotKeySet("{F1}", "_b1");快捷键
   
7. HotKeySet("{F2}", "_b2")
   
8. HotKeySet("{F3}", "_b3")
   
9. HotKeySet("{F4}", "_b4")
   
10. HotKeySet("{`}", "_exit")
    
11. _gui()
    
12. 
    
13. Func        _gui()
    
14.     local $msg,$button1,$button2,$button3,$button4,$button5
    
15.     GUICreate("EVE懒人",400,300) ; will create a dialog box that when displayed is centered
    
16.     GUISetState(@SW_SHOW) ; will display an empty dialog box
    
17. 
    
18.     GUICtrlCreateLabel("Hello world! ", 10, 10)
    
19. 
    
20.     $button1=GUICtrlCreateButton("1",30, 40, 70,25)
    
21.         GUICtrlCreateLabel("用户名1", 10, 70);输入名字，方便识别要启动的帐号
    
22. 
    
23.     $button2=GUICtrlCreateButton("2",30, 90, 70,25)
    
24.         GUICtrlCreateLabel("用户名2", 10, 120)
    
25. 
    
26.     $button3=GUICtrlCreateButton("3",30,140,70,25)
    
27.         GUICtrlCreateLabel("用户名3", 10, 170)
    
28. 
    
29.     $button4=GUICtrlCreateButton("4",30,190,70,25)
    
30.         GUICtrlCreateLabel("用户名4", 10, 220)
    
31. 
    
32.     $button5=GUICtrlCreateButton("START",30,240,70,25)
    
33.         GUICtrlCreateLabel("启动器", 10, 270)
    
34. 
    
35.         While 1
    
36.                 $msg=GUIGetMsg()
    
37.         Select
    
38.                 Case $msg=$GUI_event_close
    
39.                         ExitLoop
    
40.                 Case $msg=$button1
    
41.                         _p("用户名1","密码");调用函数_p，请修改用户名和密码
    
42.                 Case $msg=$button2
    
43.                         _p("用户名2","密码");调用函数_p，请修改用户名和密码
    
44.                 Case $msg=$button3
    
45.                         _p("用户名3","密码");调用函数_p，请修改用户名和密码
    
46.                 Case $msg=$button4
    
47.                         _p("用户名4","密码");调用函数_p，请修改用户名和密码
    
48.                 Case $msg=$button5
    
49.                         ShellExecute("EVE Online Launcher.lnk","",@DesktopDir)
    
50.         Endselect
    
51.         Wend
    
52. Endfunc
    
53. 
    
54. Func _p($name,$password);没事别动这部分
    
55.         WinActivate("EVE Online")
    
56.         WinActivate("Login");二级窗口一旦点开，即使关闭也是隐藏，so只有重开启动器时没有二级窗口
    
57.         Send("{ESC}");使用时，务必保证存着二级窗口（自己可见，不存在时手动点运行）
    
58.         Sleep(100)
    
59.         ControlFocus("[Class:wxWindowClassNR]","","");激活主窗口
    
60.         Send("{ENTER}");点“运行”
    
61.         controlfocus("Login","","");定位焦点
    
62.         sleep(2000)
    
63.         Controlsend("Login","","",$name);用户名
    
64.         sleep(100)
    
65.         ControlSend("Login","","","{TAB}");变换焦点
    
66.         sleep(100)
    
67.         ControlSend("Login","","",$password);密码
    
68.         sleep(100)
    
69.         ControlSend("Login","","","{TAB}")
    
70. Endfunc
    
71. 
    
72. Func _b1()
    
73.         _p("用户名1","密码");快捷键调用的func，请自行修改用户名和密码
    
74. EndFunc
    
75. 
    
76. Func _b2()
    
77.         _p("用户名2","密码");快捷键调用的func，请自行修改用户名和密码
    
78. EndFunc
    
79. 
    
80. Func _b3()
    
81.         _p("用户名3","密码");快捷键调用的func，请自行修改用户名和密码
    
82. EndFunc
    
83. 
    
84. Func _b4()
    
85.         _p("用户名4","密码");快捷键调用的func，请自行修改用户名和密码
    
86. EndFunc
    
87. 
    
88. Func _exit()
    
89.         local $f=ProcessExists("launcher.exe")
    
90.         ConsoleWrite($f)
    
91.         If $f<>0 Then
    
92.                 If ProcessClose($f)=0 Then
    
93.                         MsgBox(0,"ERROR","Failed to close EVE launcher, code: "&@error)
    
94.                 EndIf
    
95.         EndIf
    
96.         Exit 0
    
97. EndFunc

复制代码

使用说明
1 本人只有4个号所以只做了4个按钮，4个快捷键，分别对应F1-F4
2 键盘TAB上方，1左边的`为退出的快捷键，顺路会终结launcher.exe
3 使用“启动器”这个按钮的要求：桌面存在“EVE Online Launcher.lnk”的快捷方式，请自己检查
4 关于密码：
                    1. 标有用户名的地方就是你输入用户名的地方，同理密码
                    2. 标有“用户名1”-“用户名4”的目的是为了你自己识别应启动哪个号用的
                    3. 稍微有点编程基础的都看得懂吧
5 如果遇到密码输不上去，请自行修改【ControlFocus("[Class:wxWindowClassNR]","","");激活主窗口】中的【[Class:wxWindowClassNR]】
6 脚本中都使用了延迟【sleep（“100”）】，延迟不够的，请自行修改，单位ms
7 关于AU3部分的问题请自行Google，脚本方面欢迎讨论

登录/注册后可看大图

xin

验证码请自己手动输吧，输错了在按遍F1就行了

这验证码人输还有错的时候 别说自动了

编辑帖子请小心，搞不好代码就没了

登录/注册后可看大图

珈蓝乾闼婆

顶一顶，看一看~

珈蓝魂灬殇

狂顶一个，话说为啥我的不是板凳啊，纠结只拿到地板

aquariusls

不明觉厉...

xin

还有挖矿自动拖矿的就是不太成熟

zyc_nn

借给别人时不用明确说密码？

直接发脚本？

xin

zyc_nn 发表于 9-17-2012 22:48

                               
登录/注册后可看大图

借给别人时不用明确说密码？

直接发脚本？

不是发脚本 直接发打包的EXE 输入密码的时候模拟输入乱码什么的 多少能增加点知道密码的难度 （不知道记录键盘的软件能否记录到这点没测试） 要是TC密码支持汉字什么的 就完全没有问题喽

上边的图上就是输的汉字 用户名2 密码

zyc_nn

xin 发表于 9-18-2012 10:50

                               
登录/注册后可看大图

不是发脚本 直接发打包的EXE 输入密码的时候模拟输入乱码什么的 多少能增加点知道密码的难度 （不知道记录 ...

反汇编……

xin

刚试了下 随便找来2个 keylogger 全局钩子 貌似没有获得controlsend的数据 能获得普通send

至于反汇编0.0 就像矛盾一样 没有输赢 不过那就远了

而且说明你的仇恨值已经大过天了 这样的号还给不信任的人用是想干什么

这东西原本的来源就是 我家电力网络问题 总掉线 掉线时迅速上号用的 （3开刷怪你懂得）

而且那讨厌的验证码 经常错误 减少重复劳动就动动脑子喽

PS加了一个音箱上用的滤波器后，掉线少了很多

zyc_nn

xin 发表于 9-18-2012 14:06

                               
登录/注册后可看大图

刚试了下 随便找来2个 keylogger 全局钩子 貌似没有获得controlsend的数据 能获得普通send

至于反汇编0. ...

其实咱觉得每次验证码的时间比输密码还长……

火奴上尉

原创技术？

电工啊。 ：）：）

xin

火奴上尉 发表于 9-18-2012 21:14

                               
登录/注册后可看大图

原创技术？

电工啊。 ：）：）

非电工 爱好而已

必定原创啊

迷失灬果兒

外挂【????】

xin

源码都放出来 还说是外挂 可怜啊