一个导出报表的程序分享

53524983

.版本 2
.支持库 iext3
.支持库 iext2
.支持库 eAPI
.支持库 spec

.程序集 窗口程序集1

.子程序 _简单超文本框1_自定义超链接被单击
.参数 标识文本, 文本型



.子程序 _启动按钮_被单击

启动按钮.禁止 ＝ 真
系统选择夹.禁止子夹 (0, 真)
系统选择夹.禁止子夹 (1, 假)
系统选择夹.禁止子夹 (2, 假)
系统选择夹.禁止子夹 (3, 假)
系统选择夹.禁止子夹 (4, 假)
系统选择夹.禁止子夹 (5, 假)
系统选择夹.现行子夹 ＝ 1

.子程序 _退出按钮_被单击

销毁 ()


.子程序 _超级按钮_被单击

_启动窗口.位置 ＝ 0
.判断开始 (超级按钮.标题 ＝ “启动萝卜”)
    超级按钮.标题 ＝ “暂停萝卜”
    保护有效框选中 ()
    回城有效框选中 ()
    被动技能有效框选中 ()
    主动技能有效框选中 ()
    召唤保护有效框 ()
    发言有效框选中 ()

.判断 (超级按钮.标题 ＝ “暂停萝卜”)
    红时钟.时钟周期 ＝ 0
    蓝时钟.时钟周期 ＝ 0
    主技能时钟.时钟周期 ＝ 0
    被动时钟1.时钟周期 ＝ 0
    被动时钟2.时钟周期 ＝ 0
    被动时钟3.时钟周期 ＝ 0
    被动时钟4.时钟周期 ＝ 0
    召唤时钟.时钟周期 ＝ 0
    发言时钟.时钟周期 ＝ 0
    超级按钮.标题 ＝ “启动萝卜”
.默认

.判断结束


.子程序 _红时钟_周期事件
.局部变量 红颜色
.局部变量 红键, 字节型
.局部变量 红x
.局部变量 红y

.如果 (红值框.现行选中项 ＝ 0)
    红x ＝ 27
    红y ＝ 43
.否则
    .如果 (红值框.现行选中项 ＝ 1)
        红x ＝ 17
        红y ＝ 51
    .否则
        .如果 (红值框.现行选中项 ＝ 2)
            红x ＝ 9
            红y ＝ 70
        .否则
            .如果 (红值框.现行选中项 ＝ 3)
                红x ＝ 15
                红y ＝ 92
            .否则

            .如果结束

        .如果结束

    .如果结束

.如果结束
红颜色 ＝ 取点_ (取设备场景_ (0), 红x, 红y)
.如果 (红药框.现行选中项 ＝ 0)
    红键 ＝ #键1
.否则
    .如果 (红药框.现行选中项 ＝ 1)
        红键 ＝ #键2
    .否则
        .如果 (红药框.现行选中项 ＝ 2)
            红键 ＝ #键3
        .否则
            .如果 (红药框.现行选中项 ＝ 3)
                红键 ＝ #键4
            .否则

            .如果结束

        .如果结束

    .如果结束

.如果结束
.判断开始 (红颜色 ＝ 0)
    模拟按键 (红键, , )

.默认

.判断结束


.子程序 _蓝时钟_周期事件
.局部变量 蓝颜色
.局部变量 蓝键, 字节型
.局部变量 蓝x
.局部变量 蓝y

.如果 (红值框.现行选中项 ＝ 0)
    蓝x ＝ 61
    蓝y ＝ 42
.否则
    .如果 (红值框.现行选中项 ＝ 1)
        蓝x ＝ 74
        蓝y ＝ 52
    .否则
        .如果 (红值框.现行选中项 ＝ 2)
            蓝x ＝ 78
            蓝y ＝ 69
        .否则
            .如果 (红值框.现行选中项 ＝ 3)
                蓝x ＝ 76
                蓝y ＝ 85
            .否则

            .如果结束

        .如果结束

    .如果结束

.如果结束
蓝颜色 ＝ 取点_ (取设备场景_ (0), 蓝x, 蓝y)
.如果 (蓝药框.现行选中项 ＝ 0)
    蓝键 ＝ #键1
.否则
    .如果 (蓝药框.现行选中项 ＝ 1)
        蓝键 ＝ #键2
    .否则
        .如果 (蓝药框.现行选中项 ＝ 2)
            蓝键 ＝ #键3
        .否则
            .如果 (蓝药框.现行选中项 ＝ 3)
                蓝键 ＝ #键4
            .否则

            .如果结束

        .如果结束

    .如果结束

.如果结束
.判断开始 (蓝颜色 ＝ 0)
    模拟按键 (蓝键, , )

.默认

.判断结束


.子程序 _被动时钟1_周期事件

.如果 (被动技能框1.现行选中项 ＝ 0)
    模拟按键 (#F5键, , )
.否则
    .如果 (被动技能框1.现行选中项 ＝ 1)
        模拟按键 (#F6键, , )
    .否则
        .如果 (被动技能框1.现行选中项 ＝ 2)
            模拟按键 (#F7键, , )
        .否则
            .如果 (被动技能框1.现行选中项 ＝ 3)
                模拟按键 (#F8键, , )
            .否则
                .如果 (被动技能框1.现行选中项 ＝ 4)
                    模拟按键 (#键5, , )
                .否则
                    .如果 (被动技能框1.现行选中项 ＝ 5)
                        模拟按键 (#键6, , )
                    .否则
                        .如果 (被动技能框1.现行选中项 ＝ 6)
                            模拟按键 (#键7, , )
                        .否则
                            .如果 (被动技能框1.现行选中项 ＝ 7)
                                模拟按键 (#键8, , )
                            .否则

                            .如果结束

                        .如果结束

                    .如果结束

                .如果结束

            .如果结束

        .如果结束

    .如果结束

.如果结束



.子程序 _被动时钟4_周期事件

.如果 (被动技能框4.现行选中项 ＝ 0)
    模拟按键 (#F5键, , )
.否则
    .如果 (被动技能框4.现行选中项 ＝ 1)
        模拟按键 (#F6键, , )
    .否则
        .如果 (被动技能框4.现行选中项 ＝ 2)
            模拟按键 (#F7键, , )
        .否则
            .如果 (被动技能框4.现行选中项 ＝ 3)
                模拟按键 (#F8键, , )
            .否则
                .如果 (被动技能框4.现行选中项 ＝ 4)
                    模拟按键 (#键5, , )
                .否则
                    .如果 (被动技能框4.现行选中项 ＝ 5)
                        模拟按键 (#键6, , )
                    .否则
                        .如果 (被动技能框4.现行选中项 ＝ 6)
                            模拟按键 (#键7, , )
                        .否则
                            .如果 (被动技能框4.现行选中项 ＝ 7)
                                模拟按键 (#键8, , )
                            .否则

                            .如果结束

                        .如果结束

                    .如果结束

                .如果结束

            .如果结束

        .如果结束

    .如果结束

.如果结束


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

.如果 (被动技能框2.现行选中项 ＝ 0)
    模拟按键 (#F5键, , )
.否则
    .如果 (被动技能框2.现行选中项 ＝ 1)
        模拟按键 (#F6键, , )
    .否则
        .如果 (被动技能框2.现行选中项 ＝ 2)
            模拟按键 (#F7键, , )
        .否则
            .如果 (被动技能框2.现行选中项 ＝ 3)
                模拟按键 (#F8键, , )
            .否则
                .如果 (被动技能框2.现行选中项 ＝ 4)
                    模拟按键 (#键5, , )
                .否则
                    .如果 (被动技能框2.现行选中项 ＝ 5)
                        模拟按键 (#键6, , )
                    .否则
                        .如果 (被动技能框2.现行选中项 ＝ 6)
                            模拟按键 (#键7, , )
                        .否则
                            .如果 (被动技能框2.现行选中项 ＝ 7)
                                模拟按键 (#键8, , )
                            .否则

                            .如果结束

                        .如果结束

                    .如果结束

                .如果结束

            .如果结束

        .如果结束

    .如果结束

.如果结束


.子程序 _被动时钟3_周期事件

.如果 (被动技能框3.现行选中项 ＝ 0)
    模拟按键 (#F5键, , )
.否则
    .如果 (被动技能框3.现行选中项 ＝ 1)
        模拟按键 (#F6键, , )
    .否则
        .如果 (被动技能框3.现行选中项 ＝ 2)
            模拟按键 (#F7键, , )
        .否则
            .如果 (被动技能框3.现行选中项 ＝ 3)
                模拟按键 (#F8键, , )
            .否则
                .如果 (被动技能框3.现行选中项 ＝ 4)
                    模拟按键 (#键5, , )
                .否则
                    .如果 (被动技能框3.现行选中项 ＝ 5)
                        模拟按键 (#键6, , )
                    .否则
                        .如果 (被动技能框3.现行选中项 ＝ 6)
                            模拟按键 (#键7, , )
                        .否则
                            .如果 (被动技能框3.现行选中项 ＝ 7)
                                模拟按键 (#键8, , )
                            .否则

                            .如果结束

                        .如果结束

                    .如果结束

                .如果结束

            .如果结束

        .如果结束

    .如果结束

.如果结束


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

系统选择夹.现行子夹 ＝ 0


.子程序 _回城时钟_周期事件
.局部变量 红h颜色
.局部变量 h键, 字节型
.局部变量 红hx
.局部变量 红hy
.局部变量 蓝h颜色
.局部变量 蓝hx
.局部变量 蓝hy

.如果 (红回城框.现行选中项 ＝ 0)
    红hx ＝ 27
    红hy ＝ 43

.否则
    .如果 (红回城框.现行选中项 ＝ 1)
        红hx ＝ 17
        红hy ＝ 51

    .否则

    .如果结束

.如果结束

.如果 (蓝回城框.现行选中项 ＝ 0)
    蓝hx ＝ 27
    蓝hy ＝ 43

.否则
    .如果 (红回城框.现行选中项 ＝ 1)
        蓝hx ＝ 17
        蓝hy ＝ 51

    .否则


    .如果结束

.如果结束
蓝h颜色 ＝ 取点_ (取设备场景_ (0), 蓝hx, 蓝hy)
红h颜色 ＝ 取点_ (取设备场景_ (0), 红hx, 红hy)
.判断开始 (红h颜色 ＝ 0 或 蓝h颜色 ＝ 0)
    模拟按键 (#键0, , )

.默认

.判断结束


.子程序 _主技能时钟_周期事件

模拟按键 (#F2键, , )
延迟 (到整数 (技能持续编辑框1.内容) × 1000)
模拟按键 (#F3键, , )
延迟 (到整数 (技能持续编辑框2.内容) × 1000)
模拟按键 (#F4键, , )
延迟 (到整数 (技能持续编辑框3.内容) × 1000)



.子程序 _召唤时钟_周期事件
.局部变量 红z颜色
.局部变量 z键, 字节型
.局部变量 红zx
.局部变量 红zy

.如果 (红回城框.现行选中项 ＝ 0)
    红zx ＝ 27
    红zy ＝ 43

.否则
    .如果 (红回城框.现行选中项 ＝ 1)
        红zx ＝ 17
        红zy ＝ 51

    .否则
        .如果 (红回城框.现行选中项 ＝ 2)
            红zx ＝ 17
            红zy ＝ 51
        .否则

        .如果结束

    .如果结束

.如果结束
红z颜色 ＝ 取点_ (取设备场景_ (0), 红zx, 红zy)
.判断开始 (红z颜色 ＝ 0)
    .判断开始 (技能恢复框.选中 ＝ 真)
        模拟按键 (#F9键, , )
    .默认

    .判断结束
    .判断开始 (休息恢复框.现行选中项 ＝ 0)
        模拟按键 (#Ctrl键, , )
        延迟 (5 × 1000 × 60)
        模拟按键 (#Ctrl键, , )
    .判断 (休息恢复框.现行选中项 ＝ 1)
        模拟按键 (#Ctrl键, , )
        延迟 (10 × 1000 × 60)
        模拟按键 (#Ctrl键, , )
    .判断 (休息恢复框.现行选中项 ＝ 2)
        模拟按键 (#Ctrl键, , )
        延迟 (15 × 1000 × 60)
        模拟按键 (#Ctrl键, , )
    .默认

    .判断结束

.默认

.判断结束


.子程序 召唤物技能

.判断开始 (召唤物技能框1.选中 ＝ 真)
    模拟按键 (#Ctrl键, , )
.判断 (召唤物技能框2.选中 ＝ 真)
    模拟按键 (#Ctrl键, , )
.判断 (召唤物技能框3.选中 ＝ 真)
    模拟按键 (#Ctrl键, , )
.默认

.判断结束


.子程序 _发言时钟_周期事件

模拟按键 (#回车键, , )
模拟按键 (取随机数 (48, 90), , )
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )

.子程序 保护有效框选中

.判断开始 (保护有效框.选中 ＝ 真)
    红时钟.激活 ()
    蓝时钟.激活 ()

    红时钟.时钟周期 ＝ 500
    蓝时钟.时钟周期 ＝ 500
.默认

.判断结束


.子程序 回城有效框选中

.判断开始 (回城有效框.选中 ＝ 真)
    回城时钟.激活 ()
    回城时钟.时钟周期 ＝ 500
.默认

.判断结束


.子程序 被动技能有效框选中

.判断开始 (被动技能有效框.选中 ＝ 真)
    被动时钟1.激活 ()
    被动时钟1.时钟周期 ＝ 到整数 (被动技能框编辑框1.内容) × 1000
    被动时钟2.激活 ()
    被动时钟2.时钟周期 ＝ 到整数 (被动技能框编辑框2.内容) × 1000
    被动时钟3.激活 ()
    被动时钟3.时钟周期 ＝ 到整数 (被动技能框编辑框3.内容) × 1000
    被动时钟4.激活 ()
    被动时钟4.时钟周期 ＝ 到整数 (被动技能框编辑框4.内容) × 1000
.默认

.判断结束


.子程序 主动技能有效框选中

.判断开始 (主动技能有效框.选中 ＝ 真)
    主技能时钟.激活 ()
    主技能时钟.时钟周期 ＝ 到整数 (技能持续编辑框1.内容) × 1000 ＋ 到整数 (技能持续编辑框2.内容) × 1000 ＋ 到整数 (技能持续编辑框3.内容) × 1000 ＋ 1000
.默认

.判断结束


.子程序 召唤保护有效框

.判断开始 (召唤保护有效框.选中 ＝ 真)
    召唤时钟.激活 ()
    召唤时钟.时钟周期 ＝ 500
    召唤物技能 ()
.默认

.判断结束


.子程序 发言有效框选中

.判断开始 (发言有效框.选中 ＝ 真)
    延迟 (5000)
    发言时钟.激活 ()
    发言时钟.时钟周期 ＝ 到整数 (发言间隔框.内容) × 1000
.默认

.判断结束

panjie86

看不懂,眼花

lazy111

晕了~~~~~~~~~~~