1599470498 发表于 2016-8-16 19:57:07

5875875785785875678

2872493071 发表于 2016-8-19 19:17:59

.版本 2

.参数 对象地址, 整数型
.参数 物品地址, 整数型, , 地址段
.局部变量 物品EBP, 整数型
.局部变量 拾取EBP, 整数型

物品EBP ＝ 十六到十 (#物品栏)
拾取EBP ＝ 十六到十 (#拾取CALL)
置入代码 ({ 96, 139, 181, 8, 0, 0, 0, 139, 54, 139, 141, 252, 255, 255, 255, 139, 12, 49, 255, 181, 12, 0, 0, 0, 139, 133, 248, 255, 255, 255, 255, 208, 97 })

.子程序 _时钟2_周期事件
.局部变量 a, 整数型
.局部变量 i, 整数型
.局部变量 tmp, 整数型
.局部变量 mType, 整数型
.局部变量 eNumArray, 整数型
.局部变量 countMax, 整数型

eNumArray ＝ 内存操作.读整数 (内存操作.读整数 (十六到十 (#人物基址)) ＋ 180)
.如果真 (eNumArray ≤ 0)
    返回 ()
.如果真结束
countMax ＝ (内存操作.读整数 (eNumArray ＋ 180) － 内存操作.读整数 (eNumArray ＋ 176)) ÷ 4
.计次循环首 (countMax, )
    a ＝ 内存操作.读整数 (eNumArray ＋ 176)
    tmp ＝ 内存操作.读整数 (a ＋ i)
    i ＝ i ＋ 4
    mType ＝ 内存操作.读整数 (tmp ＋ 140)
    .如果真 (mType ≠ 289)
      到循环尾 ()
    .如果真结束
    love拾取 (十六到十 (#人物基址), tmp)
.计次循环尾 ()

lengmo 发表于 2017-3-6 11:20:15

谢谢分享谢谢分享谢谢谢谢你,辛苦了

sinzlin 发表于 2017-6-20 15:53:21

这个很不错，看下效果。

sanye 发表于 2017-8-27 09:37:01

111111111111111

和森 发表于 2017-9-6 14:37:37

自动更新自动更新自动更新自动更新自动更新

蓝色的天空 发表于 2018-10-1 13:30:44

看看看看看看看看看看看看看看

a3562162a 发表于 2018-10-2 00:21:53

支持楼主，支持看流星社区，以后我会经常来！

tel66668 发表于 2020-2-19 10:29:57

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk

总有刁民想害朕 发表于 2020-2-22 23:07:00

dyecwnonidoppewidj jiewdjiow
页: 1 2 3 4 [5]
查看完整版本: [易语言纯源码]单文件自动更新自动运行删除原程序。