有图有真相..折腾我几天..施工中 半成品[劲舞团无敌外挂]
数天前..被某玩劲舞女生耻笑节奏感差..天生不能打perfect。。于是乎

拙劣但有效的方法...这些网络游戏 ..基本读不了内存 惟有如此 ..截图大法
尚在施工中..自动按键就要好了..
本来要对QQ炫舞下手的..无奈腾讯大仙要检测WinIo.dll
于是对劲舞团下手









  

  



核心部分就一个在截图中查找图像的函数..来自于按键精灵的dll

Option Explicit
Private Declare Function FindPic Lib "QMDispatch" () As Long
等等声明
。。。
SetWindowPos Me.hwnd, A, 834, 116, 0, 0, b
            hw = FindWindow(vbNullString, "劲舞团")
SetWindowPos hw, HWND_NOTOPMOST, 0, 0, 1024, 768, SWP_SHOWWINDOW
。。。
Private Sub Timer1_Timer()
.....
    Picture3.Cls
    '定义空格常数
      Const VK_SPACE As Long = &H20
Dim pos As Long
  Dim QMDispatchObj As Object
  Set QMDispatchObj = CreateObject("QMDispatch.QMFunction")
       BitBlt Picture2.hDC, 0, 0, 108, 12, Picture3.hDC, 0, 0, vbSrcCopy '复制节拍到picture2
  pos = QMDispatchObj.FindPic(875, 240, 983, 253, App.Path & "\Image\ball.bmp", 0.65) '寻找ball
Label1.Caption = Str(Int(pos / 8192))
If Abs(pos / 8192 - 946.6) < 2 Then '若到perfect点
MyKeyDown VK_SPACE '从端口模拟按下空格
MyKeyUp VK_SPACE
.。。然后调用另外写了一个判断方向的函数
End If
........
End Sub


用了QMDispatch.dll  WinIo.dll。。
QMDispatch.dll 这个东西得注册..
里面的findpic函数的用法是
Set QMDispatchObj = CreateObject("QMDispatch.QMFunction")
pos = QMDispatchObj.FindPic(左边X, 上边Y, 右边X, 下边Y, 路径, 相似度)
X= Int(pos / 8192)
Y=pos Mod 8192
+1500  科创币    我说要有光   2009-08-09    分享原创的成果
来自 科创茶话
 
2009-8-9 20:45:05
1楼
话说这个程序是LZ自己写的?
折叠评论
加载评论中,请稍候...
折叠评论
2楼
要是下载的话还敢发到KC上么- -! [s:94]
折叠评论
加载评论中,请稍候...
折叠评论
3楼
呵呵,LZ好用不,感觉怎么样
折叠评论
加载评论中,请稍候...
折叠评论
带火星的木条(作者)
4楼
引用第1楼點蒼于2009-08-09 20:45发表的  :
话说这个程序是LZ自己写的?

当然自己写的..p率还不够 自动按键实施中。。
折叠评论
加载评论中,请稍候...
折叠评论
5楼
完全无视AU
我还以为是CF呢
折叠评论
加载评论中,请稍候...
折叠评论
6楼
完全鄙视棒子游戏……
折叠评论
加载评论中,请稍候...
折叠评论
7楼
先赞扬下LZ```   开源加分```
折叠评论
加载评论中,请稍候...
折叠评论
带火星的木条(作者)
8楼
添上了核心部分.. 其他部分零零碎碎的..
折叠评论
加载评论中,请稍候...
折叠评论
9楼
这个工具用途很大
虽然技术比较简单,但是看得出楼主是用心做的,并且创意满分。

有了这个楼主不怕找不到女朋友了。





授予楼主“劲舞天王”称号。
折叠评论
加载评论中,请稍候...
折叠评论
10楼
自动按键  完全可行还简单  多年前帮人写过  好象是作了 10个图就 ok 了

哪时的 按键精灵好象才 4。多的板本吧
折叠评论
加载评论中,请稍候...
折叠评论
2009-9-3 22:30:34
2009-9-3 22:30:34
11楼
啊……有GF的人。。。
折叠评论
加载评论中,请稍候...
折叠评论
2009-10-22 19:35:04
2009-10-22 19:35:04
12楼
求楼主帮我, 我困在这两天了。
我的已是半成品,就不会发送键盘消息。
一定联系我,我QQ:40288193  ,给它发个消息,谢谢了。
折叠评论
加载评论中,请稍候...
折叠评论
13楼
有图为证,我做了这两天了,
图片识别就一天,但这个输入实在没办法了。
不知道是不是那几个API不行,还是我查找窗口不对。

折叠评论
加载评论中,请稍候...
折叠评论
2009-11-3 08:53:31
2009-11-3 08:53:31
14楼
引用第13楼noonoo1于2009-10-22 19:43发表的  :
有图为证,我做了这两天了,
图片识别就一天,但这个输入实在没办法了。
不知道是不是那几个API不行,还是我查找窗口不对。


游戏有反外挂保护,直接发送按键是无效的,像LZ那样直接写IO端口或者模拟一个键盘。
折叠评论
加载评论中,请稍候...
折叠评论

想参与大家的讨论?现在就 登录 或者 注册

ID:{{user.uid}}
{{user.username}}
{{user.info.certsName}}
{{user.description}}
{{format("YYYY/MM/DD", user.toc)}}注册,{{fromNow(user.tlv)}}活动
{{submitted?"":"投诉"}}
请选择违规类型:
{{reason.description}}
支持的图片格式:jpg, jpeg, png