1.想用VB做一个自动打怪程序
2.为什么用VB写游戏连发程序用sendkeys不生效
想用VB做一个自动打怪程序
很简单
1个timer控件,打怪interval=,一个按钮控件````用vb6.0
算了,给你个代码自己去研究吧.....
Dim x As Integer
Private Sub Command1_Click()
Timer1.Interval = IIf(Timer1.Interval = 0, , 0) '一秒钟一次
Command1.Caption = IIf(Command1.Caption = "结束", "开始", "结束")
End Sub
Private Sub Timer1_Timer()
x = x + 1: If x = Then x = 0
If x Mod = 0 Then SendKeys "1" '小键盘上的数字1
If x Mod 8 = 0 Then SendKeys "3"
If x Mod 6 = 0 Then SendKeys "2"
End Sub
前提是你的游戏必须有焦点啊,这样发送的键子才能让你的游戏收到````
为什么用VB写游戏连发程序用sendkeys不生效
不是被HOOK了,而是源码s游被无视了。
如果是戏打尖顶针指标源码DirectX游戏一般你会失败,因为DirectX的打怪游戏为了追求最少的按键延迟,会用DirectInput库:它是源码s游换汇app源码会绕过Windows消息——直接读取端口的。
而用SendKeys只是戏打源码猫和老鼠给Windows发送消息罢了(Key_Event也是),他根本不睬你:)。打怪只有真正的源码s游对端口的读写才有用。(按键精灵就是戏打)
推荐你搜索下“WINIO”。这是打怪一个端口读写的DLL,他的源码s游例子里面有VB的例子。
(注意:用WINIO必须编译以后用,戏打否则会报初始化失败的打怪苹果 源码街错误)