PUBG黑涩幽默0.2测试版/芯片级智能压枪

绝地求生芯片级智能压枪，调用了大漠收费版 所以源码抹去了注册码，全局钩子直接替换成某论坛模块的钩子就行，这玩意还不是很成熟存在许多问题，后期有更好的思路也会更新。

关于使用：插上usb上游戏直接打开软件就行

写到文件 (取运行目录 () ＋ “\yjs.dll”, #yjs) ' 写出键盘鼠标驱动
.如果 (写到文件 (取运行目录 () ＋ “\dmreg.dll”, #dmreg)) ' 写出大漠插件免注册文件
.如果 (写到文件 (取运行目录 () ＋ “\dm.dll”, #dm)) ' 写出大漠插件
SetDllPathA (取运行目录 () ＋ “\dm.dll”, 1) ' 免注册调用大漠插件
全局大漠.创建 () ' 创建对象
全局大漠.SetPath (取运行目录 () ＋ “\识别参数”) ' 设置全局路径
调试输出 (全局大漠.Ver (), 0, , )
.否则
信息框 (“错误代码201”, 0, “启动失败：”, )
结束 ()

.子程序 鼠标钩子接口, 逻辑型, , 键盘钩子接口,子程序有4个参数(窗口句柄,鼠标标识,鼠标横坐标,鼠标纵坐标).返回 真:拦截消息.返回假:放行消息。
.参数 窗口句柄, 整数型
.参数 鼠标标识, 整数型, , 移动=512,左键按下=513,左键弹起=514,更多见Win32消息ID值.在窗口标题或边框移动时=160
.参数 横坐标, 整数型
.参数 纵坐标, 整数型

.如果 (全局大漠.FindColor (896, 991, 933, 1029, “f4f4f4-101010”, 0.8, 0, a, b) ＝ 1) ' 射击模式识别
.如果 (全局大漠.CmpColor (920, 1014, “f7f6f5-101010”, 0.9) ＝ 0)
_启动窗口.组合框_射击模式.现行选中项 ＝ 0
.否则
.如果 (全局大漠.CmpColor (920, 1010, “f7f6f5-101010”, 0.9) ＝ 0)
_启动窗口.组合框_射击模式.现行选中项 ＝ 1
.否则
_启动窗口.组合框_射击模式.现行选中项 ＝ 2
.如果结束

.如果结束
状态判断 ＝ 全局大漠.FindPic (694, 987, 751, 1052, “203.bmp|202.bmp|201.bmp”, “000000”, 0.8, 0, a, b) ' 射击姿势识别
_启动窗口.组合框_姿势识别.现行选中项 ＝ 状态判断 ＋ 1
读取弹道数据 ()
射击许可 ＝ 真
.否则
射击许可 ＝ 假

_启动窗口.记录集1.打开 (_启动窗口.组合框_武器二.取项目文本 (武器2 ＋ 1), 2, )
_启动窗口.记录集1.到首记录 ()
.如果 (_启动窗口.组合框_瞄具一.取项目文本 (瞄具1 ＋ 1) ＝ “红点” 或 _启动窗口.组合框_瞄具一.取项目文本 (瞄具1 ＋ 1) ＝ “无瞄具” 或 _启动窗口.组合框_瞄具一.取项目文本 (瞄具1 ＋ 1) ＝ “全息”)
i ＝ “1倍镜”
.否则
i ＝ _启动窗口.组合框_瞄具二.取项目文本 (瞄具2 ＋ 1)
.如果结束
b ＝ _启动窗口.组合框_枪口二.取项目文本 (枪口2 ＋ 1) ＋ “--” ＋ _启动窗口.组合框_握把二.取项目文本 (握把2 ＋ 1) ＋ “--” ＋ _启动窗口.组合框_枪托二.取项目文本 (枪托2 ＋ 1) ＋ “--” ＋ _启动窗口.组合框_姿势识别.取项目文本 (_启动窗口.组合框_姿势识别.现行选中项) ＋ “--” ＋ i
.判断循环首 (_启动窗口.记录集1.尾记录后 ＝ 假)
_启动窗口.记录集1.读文本 (“弹道备注”, a)
.如果真 (a ＝ b)
_启动窗口.记录集1.读文本 (“弹道数据”, 压枪文本)
调试输出 (压枪文本)
跳出循环 ()
.如果真结束
_启动窗口.记录集1.到下一条 ()
.判断循环尾 ()