易语言教程_易语言源码_易语言写挂_易语言论坛_看流星社区

 找回密码
 注册
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
零基础辅助入门教学 原创 高清 专业课程售后(每日解答)
赞助广告位 请点击这里联系站长 QQ20209081
赞助广告位 请点击这里联系站长 QQ20209081
赞助广告位 请点击这里联系站长 QQ20209081
查看: 1642|回复: 9

自动搜索特征码来定位地址的DLL,附带VB调用源代码。

[复制链接]
发表于 2011-8-5 09:51:24 | 显示全部楼层 |阅读模式
不好意思,之前编写的时候,由于疏忽,竟然缩小了搜索的范围,所以现在重新上传了,需要的朋友可以重新下载一下,这次我做过充分的测试了,精确度和CE一样

下面是XP下蜘蛛纸牌的范例,只是作一个功能演示,并没有其它作用

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal Classname As String, ByVal WindowName As String) As Long
Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function ScanTZ Lib "mem.dll" (ByVal hProcess As Long, ByVal s As String) As Long
Private Const PROCESS_ALL_ACCESS = &H1F0FFF

Dim hwnd As Long, pid As Long, hProc As Long

Sub Main()
hwnd = FindWindow(vbNullString, "蜘蛛")
GetWindowThreadProcessId hwnd, pid
hProc = OpenProcess(PROCESS_ALL_ACCESS, False, pid)

MsgBox Hex(ScanTZ(hProc, "1C210300")) '查找特征码

CloseHandle (hProc)
End Sub

得到了这个地址就很方便了,游戏内存是动态分配的,但是相对于一些地址的位移差是不变的
比如
第1次搜索特征码A1C4FC8B008B401C
地址定位到400000,血的地址是410000,那么她们的位移差就是10000,
第2次搜索特征码A1C4FC8B008B401C
地址定位到500000,那么血的地址就是500000+10000就是了,

举个VB例子
dim i as long,u as long 'u表示血的地址
i=ScanTZ(hProc, "A1C4FC8B008B401C")  
u=i+&H10000 '这样就得到准确血的地址了
当然你要早到正确的特征码(不要问我怎么找特征码,这个去查论坛的相关贴)

'关于应用,在举个例子
'比如征途的体力什么的是按照人物的名称的Unicode来定位的
'比如人物名称"广海游戏"他的UNicode是B9E3BAA3D3CECFB7
dim i as long,u as long 'u表示血的地址,i表示内存人物名称地址
i=ScanTZ(hProc, "B9E3BAA3D3CECFB7") '假设血的地址和人物名称相差&H10000
u=i+&H10000 '这样就得到准确血的地址了

mem.dll和VB调用源代码在附件里,dll很小的,支持其它语言调用的

游客,如果您要查看本帖隐藏内容请回复
发表于 2011-10-25 19:31:38 | 显示全部楼层
回复 1# 没有不可能


   怎么使用呢
发表于 2013-4-17 18:58:28 | 显示全部楼层
看看啊啊啊啊啊啊
发表于 2013-9-15 17:24:42 | 显示全部楼层
dsddddddddddddd
发表于 2014-2-23 19:17:48 | 显示全部楼层
发表于 2016-2-17 20:20:53 | 显示全部楼层
dsddddddddddddd
发表于 2016-5-10 22:36:22 | 显示全部楼层
本帖隐藏的内容需要回复才可以浏览
发表于 2017-11-7 11:46:26 | 显示全部楼层
666,终于有VB版的查找特征码的啦。感谢感谢!!!
发表于 2018-1-18 08:17:21 | 显示全部楼层
來學習學習



点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|看流星社区  |网站地图

GMT+8, 2018-10-16 23:42 易语言论坛 易语言导航

Powered by 看流星社区 X3.2

©2011-2016 最好的辅助编程技术论坛

快速回复 返回顶部 返回列表