【教程】授人与鱼不如授人与渔第一波

发个全屏吸物教程，求拉内部群
.版本 2
.子程序 吸物
.局部变量 触发地址, 整数型
.局部变量 次数, 整数型
.局部变量 怪物基址, 整数型
.局部变量 临时变量, 整数型
.局部变量 物品位置, 整数型
.局部变量 物品数量, 整数型
.局部变量 物品_X轴, 整数型
.局部变量 物品_Y轴, 整数型
VMP保护标记开始 ()
.如果真 (读内存代码 (进程取ID (“DNF.exe”), #人物基址) ≤ 0)
返回 ()
.如果真结束
.如果真 (读内存代码 (进程取ID (“DNF.exe”), #人物基址 ＋ “+B8”) ＝ 0)
返回 ()
.如果真结束
触发地址 ＝ 十六到十 (#人物基址)
物品位置 ＝ 读内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 触发地址) ＋ 十六到十 (“B8”))
.如果真 (物品位置 ＞ 0)
物品数量 ＝ (读内存整数型 (进程取ID (“DNF.exe”), 物品位置 ＋ 十六到十 (“C8”)) － 读内存整数型 (进程取ID (“DNF.exe”), 物品位置 ＋ 十六到十 (“C4”))) ÷ 4
.计次循环首 (物品数量, )
怪物基址 ＝ 读内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 物品位置 ＋ 十六到十 (“C4”)) ＋ 次数)
次数 ＝ 次数 ＋ 4
临时变量 ＝ 读内存整数型 (进程取ID (“DNF.exe”), 怪物基址 ＋ 十六到十 (“94”))
.如果真 (临时变量 ＝ 289)
物品_X轴 ＝ 读内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 触发地址) ＋ 十六到十 (“1A4”))
物品_Y轴 ＝ 读内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 触发地址) ＋ 十六到十 (“1A8”))
写内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 怪物基址 ＋ 十六到十 (“A8”)) ＋ 16, 物品_X轴)
写内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 怪物基址 ＋ 十六到十 (“A8”)) ＋ 20, 物品_Y轴)
写内存整数型 (进程取ID (“DNF.exe”), 读内存整数型 (进程取ID (“DNF.exe”), 怪物基址 ＋ 十六到十 (“A8”)) ＋ 24, 0)
.如果真结束
.计次循环尾 ()
.如果真结束
VMP保护标记结尾 ()