rxcom 发表于 2015-12-1 12:37:07

刚学，搞了个基址类，大家给给意思。

.版本 2

.子程序 _敌方金钱_被单击
.局部变量 X, 整数型
.局部变量 偏移1, 文本型

A1 ＝ 进程名取ID (“Game.exe”)
.计次循环首 (7, X)
    C11 ＝ 内存_读整数 (A1, 转换十六到十 (“00A1A5AC”))
    偏移1 ＝ 转换十到十六 (X × 4)
    C11 ＝ C11 ＋ 转换十六到十 (偏移1)
    C11 ＝ 内存_读整数 (A1, C11)
    C11 ＝ C11 ＋ 转换十六到十 (“24C”)
    C22 ＝ 内存_读整数 (A1, C11)
    .如果真 (C22 ＝ 0)
      到循环尾 ()

    .如果真结束
    内存_写整数 (A1, C11, 1)
.计次循环尾 ()



.子程序 _时钟2_周期事件

读敌方金钱 ()


.子程序 读敌方金钱
.局部变量 X, 整数型

.计次循环首 (7, X)
    .如果真 (X ＝ 1)
      标签3.标题 ＝ “1.敌方金钱：” ＋ 取敌方金钱 (“4”)
    .如果真结束
    .如果真 (X ＝ 2)
      标签4.标题 ＝ “2.敌方金钱：” ＋ 取敌方金钱 (“8”)
    .如果真结束
    .如果真 (X ＝ 3)
      标签5.标题 ＝ “3.敌方金钱：” ＋ 取敌方金钱 (“C”)
    .如果真结束
    .如果真 (X ＝ 4)
      标签6.标题 ＝ “4.敌方金钱：” ＋ 取敌方金钱 (“10”)
    .如果真结束
    .如果真 (X ＝ 5)
      标签7.标题 ＝ “5.敌方金钱：” ＋ 取敌方金钱 (“14”)
    .如果真结束
    .如果真 (X ＝ 6)
      标签8.标题 ＝ “6.敌方金钱：” ＋ 取敌方金钱 (“18”)
    .如果真结束
    .如果真 (X ＝ 7)
      标签9.标题 ＝ “7.敌方金钱：” ＋ 取敌方金钱 (“1C”)
    .如果真结束

.计次循环尾 ()


.子程序 取敌方金钱, 文本型, 公开
.参数 偏移1, 文本型

C11 ＝ 内存_读整数 (A1, 转换十六到十 (“00A1A5AC”))' 敌方金钱基址
C11 ＝ C11 ＋ 转换十六到十 (偏移1)
C11 ＝ 内存_读整数 (A1, C11)
C11 ＝ C11 ＋ 转换十六到十 (“24C”)
C22 ＝ 内存_读整数 (A1, C11)
.如果真 (C22 ≠ 0)
    返回 (到文本 (C22))
.如果真结束
返回 (“无”)


heikulou 发表于 2015-12-1 14:23:51

难得给力的好帖子，顶楼主。

张小呆 发表于 2015-12-1 15:47:46

虽然看不懂 但是还是顶楼主

q245673955 发表于 2015-12-1 20:29:54


感谢楼主，支持楼主-支持 海。
页: [1]
查看完整版本: 刚学，搞了个基址类，大家给给意思。