|
复制到易语言就可以
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
进程ID = 进程_名取ID (“plantsvszombies.exe”)
.如果 (进程ID = 0)
结束 ()
.否则
.如果结束
基址1 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755E0C”))
基址2 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
基址3 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
基址4 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
基址5 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
基址6 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
基址7 = 内存_读整数型 (进程ID, 进制_十六到十 (“00755F28”))
.子程序 _选择框_阳光_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“868”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“5578”), 99999)
.子程序 _选择框_金钱_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“50”), 99999)
.子程序 _选择框_花肥_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“220”), 99999)
.子程序 _选择框_灭虫剂_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“224”), 99999)
.子程序 _选择框_巧克力_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“250”), 99999)
.子程序 _按钮1_被单击
.如果 (编辑框1.内容 = “”)
信息框 (“你还没用填数字”, 0, )
.否则
信息框 (“恭喜你,跳关成功!”, 0, )
.如果结束
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“4C”), 到整数 (编辑框1.内容))
延时 (200)
.子程序 _选择框_树肥料_被单击
偏移1 = 内存_读整数型 (进程ID, 基址1 + 进制_十六到十 (“950”))
内存_写整数型 (进程ID, 偏移1 + 进制_十六到十 (“258”), 99999)
|
|