当前位置: 源码素材网 » VB源码 » 游戏编程 » 详情页

VB6.0专业扫雷游戏外挂

VB6.0源码实现专业的扫雷游戏外挂,谨以此程序送给我最爱的人--(☆莲☆),扫描选项:自动扫雷延时、自动扫雷、标记非雷区和雷区、大概 20 秒可以完成扫雷任务。部分代码分享:
  Private Sub Command1_Click()
   Dim hMine As Long '扫雷窗体的句柄
   Dim pMine As Long '扫雷窗体的进程柄
   Dim MineID As Long '扫雷窗体的进程ID
   Dim lpBuffer As Byte '用于读取内存中的内容
   Dim nSize As Long '读取的大小
   Dim lpNumberOfBytesRead As Long '已读取的字节数
   Dim S As String
   Dim Row, Col As Integer '行数、列数
   Dim mWidth, mHeight, mPlayType As Integer '雷的列数、行数、玩的模式
   Dim MineNum As Integer, mTime As Long '雷数
   '扫雷窗体上第一行第一列相对于这个窗体的偏移量,用于以后的鼠标自动点击
   Dim xOffset As Integer, yOffset As Integer
   Dim miBegin As Long, miHeight As Long, miWidth As Long, miStart As Long, miPlayType As Long
  
   '&H010052C0 玩的模式
   '&H010052C4 2K下是雷数起始地址
   '&H010052C8 2K下是雷区高度起始地址
   '&H010052CC 2K下是雷区宽度起始地址
   '&H01005721 2K下是雷区内容起始地址,依次是&H01005721+高*32+宽
   '&H01005A60 2K下是雷剩余个数
  
   '&H010056A0 玩的模式
   '&H01005330/56A4 XP下是雷数起始地址
   '&H01005338/56A8 XP下是雷区高度起始地址
   '&H01005334/56AC XP下是雷区宽度起始地址
   '&H01005361 XP下是雷区内容起始地址,依次是&H01005361+高*32+宽
   '&H01005194 XP下是雷剩余个数

  • 相关标签:扫雷游戏
  • 调试环境:VB6.0
  • 文件大小:9.22K
  • 资源评级:
  • 更新时间:2015-01-17
  • 相关链接:暂无演示

源码测试截图:

VB6.0专业扫雷游戏外挂运行截图

相似源码:扫雷游戏 VB源码下载:VB6.0专业扫雷游戏外挂 测试截图

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“VB6.0专业扫雷游戏外挂”源代码侵犯了您的权益,请尽快告诉我们。