找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 232|回复: 1

热血江湖外辅

[复制链接]

1793

主题

457

回帖

0

积分

管理员

积分
0
发表于 2013-8-26 14:50:09 | 显示全部楼层 |阅读模式
.版本 2
.支持库 iext
.支持库 xplib

.程序集 窗口程序集1

.子程序 _时钟1_周期事件
.局部变量 窗口句柄, 整数型
.局部变量 进程ID, 整数型
.局部变量 人物名称, 字节集

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
进程ID = 取窗口进程ID (窗口句柄)
标签2.标题 = 到文本 (读整型内存 (进程ID, 71312480))  ' 人物血量
标签4.标题 = 到文本 (读整型内存 (进程ID, 十六到十 (“04402464”)))  ' 人物魔法值
标签15.标题 = 到文本 (读字节集内存 (进程ID, 十六到十 (“04402464”), 人物名称, 20))  ' 人物名称

.子程序 _按钮1_被单击
.局部变量 计次值, 整数型

标签11.标题 = 到文本 (到数值 (标签11.标题) + 1)
计次值 = 到数值 (标签11.标题)
.如果 (计次值 = 5)
    信息框 (“只允许设置5个内容”, #信息图标, )
    标签11.标题 = “-1”
    超级列表框1.全部删除 ()
.否则
    .如果 (编辑框2.内容 ≠ “”)
        超级列表框1.插入表项 (计次值, 到文本 (计次值), , , , )
        超级列表框1.置标题 (计次值, 1, 编辑框2.内容)
        超级列表框1.置标题 (计次值, 2, 编辑框3.内容)
        超级列表框1.置标题 (计次值, 3, 组合框3.内容)
        .判断开始 (计次值 = 0)
            时钟2.时钟周期 = 到数值 (超级列表框1.取标题 (0, 2))
        .判断 (计次值 = 1)
            时钟3.时钟周期 = 到数值 (超级列表框1.取标题 (1, 2))
        .判断 (计次值 = 2)
            时钟4.时钟周期 = 到数值 (超级列表框1.取标题 (2, 2))
        .判断 (计次值 = 3)
            时钟5.时钟周期 = 到数值 (超级列表框1.取标题 (3, 2))
        .判断 (计次值 = 4)
            时钟6.时钟周期 = 到数值 (超级列表框1.取标题 (4, 2))
        .默认

        .判断结束

    .否则

    .如果结束

.如果结束


.子程序 _按钮2_被单击

超级列表框1.全部删除 ()
标签11.标题 = “-1”
时钟2.时钟周期 = 0
时钟3.时钟周期 = 0
时钟4.时钟周期 = 0
时钟5.时钟周期 = 0
时钟6.时钟周期 = 0

.子程序 _时钟2_周期事件
.局部变量 窗口句柄, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
.如果真 (0 ≠ 窗口句柄)
    输出文本 (窗口句柄, 超级列表框1.取标题 (0, 1))
    键盘按下 (窗口句柄, #回车键)
    键盘弹起 (窗口句柄, #回车键)
.如果真结束


.子程序 _时钟3_周期事件
.局部变量 窗口句柄, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
.如果真 (0 ≠ 窗口句柄)
    输出文本 (窗口句柄, 超级列表框1.取标题 (1, 1))
    键盘按下 (窗口句柄, #回车键)
    键盘弹起 (窗口句柄, #回车键)
.如果真结束


.子程序 _时钟4_周期事件
.局部变量 窗口句柄, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
.如果真 (0 ≠ 窗口句柄)
    输出文本 (窗口句柄, 超级列表框1.取标题 (2, 1))
    键盘按下 (窗口句柄, #回车键)
    键盘弹起 (窗口句柄, #回车键)
.如果真结束


.子程序 _时钟5_周期事件
.局部变量 窗口句柄, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
.如果真 (0 ≠ 窗口句柄)
    输出文本 (窗口句柄, 超级列表框1.取标题 (3, 1))
    键盘按下 (窗口句柄, #回车键)
    键盘弹起 (窗口句柄, #回车键)
.如果真结束


.子程序 _时钟6_周期事件
.局部变量 窗口句柄, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
.如果真 (0 ≠ 窗口句柄)
    输出文本 (窗口句柄, 超级列表框1.取标题 (4, 1))
    键盘按下 (窗口句柄, #回车键)
    键盘弹起 (窗口句柄, #回车键)
.如果真结束


.子程序 _按钮3_被单击

按钮4.禁止 = 假
按钮3.禁止 = 真
选择框1.禁止 = 真
编辑框5.禁止 = 真
时钟7.时钟周期 = 1000

.子程序 _时钟7_周期事件
.局部变量 低于血量, 整数型
.局部变量 当前血量, 整数型
.局部变量 当前魔法值, 整数型
.局部变量 低于魔法值, 整数型
.局部变量 窗口句柄, 整数型
.局部变量 进程ID, 整数型
.局部变量 红键名, 整数型
.局部变量 蓝键名, 整数型

窗口句柄 = 取窗体句柄 (“D3D Window”, “YB_OnlineClient”)
进程ID = 取窗口进程ID (窗口句柄)
当前血量 = 读整型内存 (进程ID, 71312480)
当前魔法值 = 读整型内存 (进程ID, 十六到十 (“04402464”))
.判断开始 (选择框1.选中 = 真)
    低于血量 = 到数值 (编辑框5.内容)
    .如果真 (低于血量 > 当前血量)
        键盘按下 (窗口句柄, #Ctrl键 + #C键)
    .如果真结束

.默认

.判断结束
低于血量 = 到数值 (编辑框1.内容)
.如果真 (低于血量 ≥ 当前血量)
    .判断开始 (0 = 组合框1.现行选中项)
        红键名 = #F1键
    .判断 (1 = 组合框1.现行选中项)
        红键名 = #F2键
    .判断 (2 = 组合框1.现行选中项)
        红键名 = #F3键
    .判断 (3 = 组合框1.现行选中项)
        红键名 = #F4键
    .判断 (4 = 组合框1.现行选中项)
        红键名 = #F5键
    .判断 (5 = 组合框1.现行选中项)
        红键名 = #F6键
    .判断 (6 = 组合框1.现行选中项)
        红键名 = #F7键
    .判断 (7 = 组合框1.现行选中项)
        红键名 = #F8键
    .判断 (8 = 组合框1.现行选中项)
        红键名 = #F9键
    .判断 (9 = 组合框1.现行选中项)
        红键名 = #F10键
    .判断 (10 = 组合框1.现行选中项)
        红键名 = #F11键
    .判断 (11 = 组合框1.现行选中项)
        红键名 = #F12键
    .默认

    .判断结束
    键盘按下 (窗口句柄, 红键名)
.如果真结束
低于魔法值 = 到数值 (编辑框4.内容)
.如果真 (低于魔法值 ≥ 当前魔法值)
    .判断开始 (0 = 组合框2.现行选中项)
        蓝键名 = #F1键
    .判断 (1 = 组合框2.现行选中项)
        蓝键名 = #F2键
    .判断 (2 = 组合框2.现行选中项)
        蓝键名 = #F3键
    .判断 (3 = 组合框2.现行选中项)
        蓝键名 = #F4键
    .判断 (4 = 组合框2.现行选中项)
        蓝键名 = #F5键
    .判断 (5 = 组合框2.现行选中项)
        蓝键名 = #F6键
    .判断 (6 = 组合框2.现行选中项)
        蓝键名 = #F7键
    .判断 (7 = 组合框2.现行选中项)
        蓝键名 = #F8键
    .判断 (8 = 组合框2.现行选中项)
        蓝键名 = #F9键
    .判断 (9 = 组合框2.现行选中项)
        蓝键名 = #F10键
    .判断 (10 = 组合框2.现行选中项)
        蓝键名 = #F11键
    .判断 (11 = 组合框2.现行选中项)
        蓝键名 = #F12键
    .默认

    .判断结束
    键盘按下 (窗口句柄, 蓝键名)
.如果真结束


.子程序 __启动窗口_创建完毕

XP风格 (#蓝色风格)

.子程序 _按钮4_被单击

时钟7.时钟周期 = 0
按钮4.禁止 = 真
按钮3.禁止 = 假
选择框1.禁止 = 假
编辑框5.禁止 = 假


http://yunpan.cn/QXMaBEbuVzciK

67

主题

115

回帖

0

积分

版主

积分
0
发表于 2013-8-27 09:17:50 | 显示全部楼层
: : : 好复杂的易语言。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

果子博客
扫码关注微信公众号

Archiver|手机版|小黑屋|风叶林

GMT+8, 2026-2-1 04:41 , Processed in 0.137828 second(s), 21 queries .

Powered by 风叶林

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表