.版本 2
.支持库 spec
.子程序 吸物入包
.局部变量 人物数据, 整数型
.局部变量 OBJ偏移, 整数型
.局部变量 OBJ地址, 整数型
.局部变量 OBJ数据, 整数型
.局部变量 OBJ类型, 整数型
.局部变量 OBJ坐标X, 整数型
.局部变量 OBJ坐标Y, 整数型
.局部变量 一级偏移, 整数型
.局部变量 二级偏移, 整数型
汇编_写字节集 (#入包范围, { 144, 144 })
' 汇编_写字节集 (#入包范围, { 144, 144 })
一级偏移 = 汇编_读整数型 (#人物基址)
二级偏移 = 汇编_读整数型 (一级偏移 + 184)
.如果真 (二级偏移 = 0)
返回 ()
.如果真结束
人物数据 = 汇编_读整数型 (#人物基址)
OBJ偏移 = 汇编_读整数型 (人物数据 + #地图偏移)
.变量循环首 (汇编_读整数型 (OBJ偏移 + #开始偏移), 汇编_读整数型 (OBJ偏移 + #结束偏移) - 4, 4, OBJ地址)
OBJ数据 = 汇编_读整数型 (OBJ地址)
OBJ类型 = 汇编_读整数型 (OBJ数据 + asm_十六到十 (#类型偏移))
.如果真 (OBJ类型 = 289)
OBJ坐标X = 汇编_读整数型 (人物数据 + asm_十六到十 (#X坐标))
OBJ坐标Y = 汇编_读整数型 (人物数据 + asm_十六到十 (#Y坐标))
汇编_写整数型 (汇编_读整数型 (OBJ数据 + 168) + 16, OBJ坐标X)
汇编_写整数型 (汇编_读整数型 (OBJ数据 + 168) + 20, OBJ坐标Y)
.如果真结束
.变量循环尾 ()
延迟 (300)
汇编_写字节集 (#入包范围, { 116, 18 })
' 汇编_写字节集 (#入包范围, { 116, 18 })