看了教程自己做出个武林的小挂，运行十来分钟就自动关闭，求解！

chaoshjh

看了教程自己做出个武林外传的小挂，但是运行十来分钟就会自动关闭，求解！
另外，我的挂里面功能也不算多呀，只有自动选怪、放技能、加血、打坐、保存配置，为什么辅助会这么卡呢？是因为我的代码效率不够高？希望高手能够帮忙检查一下我的代码感激不尽


附件里奉上易语言源文件，另外安全起见，把源码也贴上来把。

武林.rar (221.74 KB, 下载次数: 37)

2010-11-7 20:00 上传

点击文件名下载附件


下面是易语言源码：

1

2

.版本 2

.程序集 窗口程序集1
.程序集变量 组合框X, 组合框, , "0"

.子程序 __启动窗口_创建完毕
.局部变量 组件寻找句柄, 整数型
.局部变量 计次, 整数型
.局部变量 计次1, 整数型

模块** ()
提升进程权限 (-1)
窗口句柄 ＝ 取窗体句柄 (“QElementClient Window”, “Element Client”)
.如果真 (窗口句柄 ≠ 0)
    进程ID ＝ 取窗口进程ID (窗口句柄)
    进程句柄 ＝ 打开进程 (进程ID)
    ' 人物基址初始化——————————————————————————————————————————————————————
    人物.基址 ＝ 读内存整数型 (进程ID, 十六到十 (#基址))
    人物.一级基址 ＝ 读内存整数型 (进程ID, 人物.基址 ＋ 十六到十 (“1c”))
    人物.二级基址 ＝ 读内存整数型 (进程ID, 人物.一级基址 ＋ 十六到十 (“24”))
    人物.名称 ＝ 到文本 (转换Unicode转Ansi (读内存字节集 (进程ID, 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“470”)) ＋ 十六到十 (“0”))))
    人物.怪物选中状态基址 ＝ 人物.二级基址 ＋ 十六到十 (“8e4”)
    _启动窗口.标题 ＝ 人物.名称
    ' 怪物基址初始化——————————————————————————————————————————————————————
    怪物.基址 ＝ 人物.基址
    怪物.一级基址 ＝ 人物.一级基址
    怪物.二级基址 ＝ 读内存整数型 (进程ID, 怪物.一级基址 ＋ 十六到十 (“8”))
    怪物.三级基址 ＝ 读内存整数型 (进程ID, 怪物.二级基址 ＋ 十六到十 (“20”))
    怪物.首地址 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“18”))
    怪物.数组最大数量 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“24”))
    怪物.数量 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“14”))
    ' 技能基址初始化——————————————————————————————————————————————————————
    技能.基址 ＝ 人物.基址
    技能.一级基址 ＝ 人物.一级基址
    技能.二级基址 ＝ 人物.二级基址
    技能.人物技能数 ＝ 读内存整数型 (进程ID, 技能.二级基址 ＋ 十六到十 (“a8c”))
    技能.首地址 ＝ 读内存整数型 (进程ID, 技能.二级基址 ＋ 十六到十 (“a88”))
    .计次循环首 (技能.人物技能数, 计次)
        技能.数组ID ＝ 读内存整数型 (进程ID, 技能.首地址 ＋ (计次 － 1) × 4)
        技能.剩余冷却时间 ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“c”))
        技能.ID ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“8”))
        技能.名偏移1 ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“4”))
        技能.名偏移2 ＝ 读内存整数型 (进程ID, 技能.名偏移1 ＋ 十六到十 (“4”))
        技能.名偏移3 ＝ 读内存整数型 (进程ID, 技能.名偏移2 ＋ 十六到十 (“76”))
        技能.名偏移4 ＝ 读内存字节集 (进程ID, 技能.名偏移3 ＋ 十六到十 (“0”))
        技能.名称 ＝ 到文本 (转换Unicode转Ansi (技能.名偏移4))
        选择列表框1.加入项目 (技能.名称, 技能.ID)
    .计次循环尾 ()
    ' 判断自动攻J的类型—————————————————————————————————————————————————————
    .如果 (单选框_快捷栏.选中 ＝ 真)
        分组框1.禁止 ＝ 假
        分组框3.禁止 ＝ 真
    .否则
        分组框3.禁止 ＝ 假
        分组框1.禁止 ＝ 真
    .如果结束
    ' 其他初始化—————————————————————————————————————————————————————————
    刷新人物血蓝 ()
    人物.打坐状态 ＝ 假
    置托盘图标 (#托盘图标, 人物.名称)
    注册热键程序 (0, #F5键, &_按钮_开始_被单击)
    注册热键程序 (0, #F6键, &_按钮_暂停_被单击)
    注册热键程序 (0, #Home键, &呼出_隐藏辅助)
    ' 初始化技能栏组合框项目
    组件寻找句柄 ＝ 寻找组件 (分组框1, , “组合框”, , )
    .计次循环首 (取找到组件数目 (组件寻找句柄), 计次)
        加入成员 (组合框X, 取所找到组件 (组件寻找句柄, 计次 － 1))
    .计次循环尾 ()
    读取配置 ()
.如果真结束


.子程序 刷新人物血蓝

人物.当前血 ＝ 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“260”))
人物.最大血 ＝ 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“27c”))
人物.当前蓝 ＝ 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“264”))
人物.最大蓝 ＝ 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“280”))

.子程序 选怪

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Mov_EAX (十六到十 (“089AFE24”))
汇编.Push_EAX ()
汇编.Mov_EDX (十六到十 (#选怪CALL))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ (), )


.子程序 选最近怪
.局部变量 计次, 整数型
.局部变量 最近距离, 整数型
.局部变量 怪物ID, 整数型

最近距离 ＝ 100
.计次循环首 (怪物.数组最大数量, 计次)
    怪物.数组ID ＝ 读内存整数型 (进程ID, 怪物.首地址 ＋ (计次 － 1) × 4)
    .如果真 (怪物.数组ID ＞ 0)
        怪物.地址 ＝ 读内存整数型 (进程ID, 怪物.数组ID ＋ 十六到十 (“4”))
        怪物.ID ＝ 读内存整数型 (进程ID, 怪物.地址 ＋ 十六到十 (“11c”))
        怪物.距离 ＝ 绝对取整 (读内存小数型 (进程ID, 怪物.地址 ＋ 十六到十 (“248”)))
        怪物.类型 ＝ 读内存整数型 (进程ID, 怪物.地址 ＋ 十六到十 (“b4”))
        .如果真 (怪物.类型 ＝ 6)
            .如果真 (最近距离 ＞ 怪物.距离)
                最近距离 ＝ 怪物.距离
                怪物ID ＝ 怪物.ID
            .如果真结束

        .如果真结束

    .如果真结束

.计次循环尾 ()
汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“20”))
汇编.Add_ECX (十六到十 (“0d4”))
汇编.Mov_EAX (怪物ID)
汇编.Push_EAX ()
汇编.Mov_EDX (十六到十 (#ID选怪CALL))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())

.子程序 普通攻J

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Push (十六到十 (“-1”))
汇编.Push (0)
汇编.Push (0)
汇编.Push (0)
汇编.Mov_EDX (十六到十 (#普通攻JCALL))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())


.子程序 F快捷栏
.参数 键码, 整数型

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (#F快捷栏变量))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“0c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (键码 × 4)
汇编.Mov_EDX_DWORD_Ptr_ECX ()
汇编.Mov_EDX_DWORD_Ptr_EDX_Add (十六到十 (“8”))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())

.子程序 快捷栏
.参数 键码, 整数型

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (#快捷栏变量))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“0c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (键码 × 4)
汇编.Mov_EDX_DWORD_Ptr_ECX ()
汇编.Mov_EDX_DWORD_Ptr_EDX_Add (十六到十 (“8”))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())

.子程序 打坐
.参数 参数, 整数型, , “1为打坐，0为取消打坐”

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Push (参数)
汇编.Mov_EDX (十六到十 (#打坐CALL))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())

.子程序 技能
.参数 技能ID, 整数型

汇编.置代码 (代码)
汇编.Mov_ECX_DWORD_Ptr (十六到十 (#基址))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“1c”))
汇编.Mov_ECX_DWORD_Ptr_ECX_Add (十六到十 (“24”))
汇编.Push (十六到十 (“-1”))
汇编.Push (0)
汇编.Push (0)
汇编.Push (技能ID)
汇编.Mov_EDX (十六到十 (#技能CALL))
汇编.Call_EDX ()
汇编.ret ()
汇编.调用函数 (进程ID, 汇编.取代码_ ())

.子程序 _时钟_自动打怪_周期事件
.局部变量 计次, 整数型
.局部变量 F快捷栏状态, 整数型
.局部变量 快捷栏状态, 整数型

人物.怪物选中状态 ＝ 读内存整数型 (进程ID, 人物.怪物选中状态基址)
.如果真 (选择框_自动寻怪.选中 ＝ 真)  ' 自动寻怪选中，则判断是否已经选中怪物，已选则跳过，未选则选怪
    .判断开始 (人物.怪物选中状态 ＝ 0)
        .如果 (选择框_选最近怪.选中 ＝ 真)
            选最近怪 ()
        .否则
            选怪 ()
        .如果结束

    .默认
        .如果 (单选框_快捷栏.选中 ＝ 真)
            .计次循环首 (5, 计次)  ' 判断已经选中了怪物才去初始化要使用的技能，无选中怪物则不初始化，避免浪费资源
                .判断开始 (组合框X [计次].现行选中项 ≠ -1 且 组合框1.现行选中项 ≠ 0)
                    .判断开始 (组合框X [计次].现行选中项 ≤ 8)
                        F快捷栏 (组合框X [计次].现行选中项 － 1)
                    .默认
                        快捷栏 (组合框X [计次].现行选中项 － 9)
                    .判断结束
                    延时 (200)
                .默认

                .判断结束

            .计次循环尾 ()

        .否则
            .计次循环首 (选择列表框1.取项目数 (), 计次)
                .判断开始 (选择列表框1.是否被选中 (计次 － 1))
                    技能 (选择列表框1.取项目数值 (计次 － 1))
                    延时 (300)
                .默认

                .判断结束

            .计次循环尾 ()
        .如果结束

    .判断结束

.如果真结束


.子程序 _按钮_开始_被单击

时钟_自动打怪.时钟周期 ＝ 1000
按钮_开始.禁止 ＝ 真
按钮_暂停.禁止 ＝ 假
单选框_快捷栏.禁止 ＝ 真
单选框_技能列表.禁止 ＝ 真
分组框1.禁止 ＝ 真
分组框2.禁止 ＝ 真
分组框3.禁止 ＝ 真

.子程序 _按钮_暂停_被单击

时钟_自动打怪.时钟周期 ＝ 0
按钮_开始.禁止 ＝ 假
按钮_暂停.禁止 ＝ 真
分组框1.禁止 ＝ 假
分组框2.禁止 ＝ 假
分组框3.禁止 ＝ 假
单选框_快捷栏.禁止 ＝ 假
单选框_技能列表.禁止 ＝ 假


.子程序 _时钟_刷新人物血蓝_周期事件

刷新人物血蓝 ()
.如果真 (选择框_血量保护.选中 ＝ 真)  ' 判断人物保护功能是否开启，开启则进行人物保护
    .如果真 (编辑框1.内容 ≠ “” 且 组合框1.现行选中项 ≠ -1 且 组合框1.现行选中项 ≠ 0)
        .如果真 (绝对取整 (人物.当前血 ÷ 人物.最大血 × 100) ＜ 到数值 (编辑框1.内容))
            .如果 (组合框1.现行选中项 ≤ 8)
                F快捷栏 (组合框1.现行选中项 － 1)
            .否则
                快捷栏 (组合框1.现行选中项 － 9)
            .如果结束

        .如果真结束

    .如果真结束

.如果真结束
.如果真 (选择框_蓝量保护.选中 ＝ 真)
    .如果真 (编辑框2.内容 ≠ “” 且 组合框2.现行选中项 ≠ -1 且 组合框2.现行选中项 ≠ 0)
        .如果真 (绝对取整 (人物.当前蓝 ÷ 人物.最大蓝 × 100) ＜ 到数值 (编辑框2.内容))
            .如果 (组合框2.现行选中项 ≤ 8)
                F快捷栏 (组合框2.现行选中项 － 1)
            .否则
                快捷栏 (组合框2.现行选中项 － 9)
            .如果结束

        .如果真结束

    .如果真结束

.如果真结束
.判断开始 (选择框_血量打坐.选中 ＝ 真 或 选择框_蓝量打坐.选中 ＝ 真)
    .如果真 (时钟_打坐.时钟周期 ＝ 0)
        时钟_打坐.时钟周期 ＝ 300
    .如果真结束

.默认
    时钟_打坐.时钟周期 ＝ 0
.判断结束


.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型

.判断开始 (操作类型 ＝ 2)
    可视 ＝ 取反 (可视)
    .如果 (可视 ＝ 真)
        位置 ＝ 0
    .否则

    .如果结束

.默认

.判断结束


.子程序 _按钮_刷新窗口句柄_被单击
.局部变量 组件寻找句柄, 整数型
.局部变量 计次, 整数型
.局部变量 计次1, 整数型

窗口句柄 ＝ 取窗体句柄 (“QElementClient Window”, “Element Client”)
.如果真 (窗口句柄 ≠ 0)
    进程ID ＝ 取窗口进程ID (窗口句柄)
    进程句柄 ＝ 打开进程 (进程ID)
    ' 人物基址初始化——————————————————————————————————————————————————————
    人物.基址 ＝ 读内存整数型 (进程ID, 十六到十 (#基址))
    人物.一级基址 ＝ 读内存整数型 (进程ID, 人物.基址 ＋ 十六到十 (“1c”))
    人物.二级基址 ＝ 读内存整数型 (进程ID, 人物.一级基址 ＋ 十六到十 (“24”))
    人物.名称 ＝ 到文本 (转换Unicode转Ansi (读内存字节集 (进程ID, 读内存整数型 (进程ID, 人物.二级基址 ＋ 十六到十 (“470”)) ＋ 十六到十 (“0”))))
    人物.怪物选中状态基址 ＝ 人物.二级基址 ＋ 十六到十 (“8e4”)
    _启动窗口.标题 ＝ 人物.名称
    ' 怪物基址初始化——————————————————————————————————————————————————————
    怪物.基址 ＝ 人物.基址
    怪物.一级基址 ＝ 人物.一级基址
    怪物.二级基址 ＝ 读内存整数型 (进程ID, 怪物.一级基址 ＋ 十六到十 (“8”))
    怪物.三级基址 ＝ 读内存整数型 (进程ID, 怪物.二级基址 ＋ 十六到十 (“20”))
    怪物.首地址 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“18”))
    怪物.数组最大数量 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“24”))
    怪物.数量 ＝ 读内存整数型 (进程ID, 怪物.三级基址 ＋ 十六到十 (“14”))
    ' 技能基址初始化——————————————————————————————————————————————————————
    技能.基址 ＝ 人物.基址
    技能.一级基址 ＝ 人物.一级基址
    技能.二级基址 ＝ 人物.二级基址
    技能.人物技能数 ＝ 读内存整数型 (进程ID, 技能.二级基址 ＋ 十六到十 (“a8c”))
    技能.首地址 ＝ 读内存整数型 (进程ID, 技能.二级基址 ＋ 十六到十 (“a88”))
    .计次循环首 (技能.人物技能数, 计次)
        技能.数组ID ＝ 读内存整数型 (进程ID, 技能.首地址 ＋ (计次 － 1) × 4)
        技能.剩余冷却时间 ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“c”))
        技能.ID ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“8”))
        技能.名偏移1 ＝ 读内存整数型 (进程ID, 技能.数组ID ＋ 十六到十 (“4”))
        技能.名偏移2 ＝ 读内存整数型 (进程ID, 技能.名偏移1 ＋ 十六到十 (“4”))
        技能.名偏移3 ＝ 读内存整数型 (进程ID, 技能.名偏移2 ＋ 十六到十 (“76”))
        技能.名偏移4 ＝ 读内存字节集 (进程ID, 技能.名偏移3 ＋ 十六到十 (“0”))
        技能.名称 ＝ 到文本 (转换Unicode转Ansi (技能.名偏移4))
        选择列表框1.加入项目 (技能.名称, 技能.ID)
    .计次循环尾 ()
    ' 判断自动攻J的类型—————————————————————————————————————————————————————
    .如果 (单选框_快捷栏.选中 ＝ 真)
        分组框1.禁止 ＝ 假
        分组框3.禁止 ＝ 真
    .否则
        分组框3.禁止 ＝ 假
        分组框1.禁止 ＝ 真
    .如果结束
    ' 其他初始化—————————————————————————————————————————————————————————
    刷新人物血蓝 ()
    人物.打坐状态 ＝ 假
    置托盘图标 (#托盘图标, 人物.名称)
    注册热键程序 (0, #F5键, &_按钮_开始_被单击)
    注册热键程序 (0, #F6键, &_按钮_暂停_被单击)
    注册热键程序 (0, #Home键, &呼出_隐藏辅助)
    ' 初始化技能栏组合框项目
    组件寻找句柄 ＝ 寻找组件 (分组框1, , “组合框”, , )
    .计次循环首 (取找到组件数目 (组件寻找句柄), 计次)
        加入成员 (组合框X, 取所找到组件 (组件寻找句柄, 计次 － 1))
    .计次循环尾 ()
    读取配置 ()
.如果真结束


.子程序 _编辑框1_内容被改变

.判断开始 (到数值 (编辑框1.内容) ＞ 100 或 取文本长度 (编辑框1.内容) ＞ 3)
    编辑框1.内容 ＝ “”
.默认

.判断结束


.子程序 _编辑框2_内容被改变

.判断开始 (到数值 (编辑框2.内容) ＞ 100 或 取文本长度 (编辑框1.内容) ＞ 3)
    编辑框2.内容 ＝ “”
.默认

.判断结束


.子程序 _按钮_隐藏窗口_被单击

可视 ＝ 假

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

参数 ＝ 到数值 (编辑框_调试.内容)
打坐 (参数)

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

F快捷栏 (0)

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

快捷栏 (0)

.子程序 呼出_隐藏辅助

可视 ＝ 取反 (可视)

.子程序 _时钟_打坐_周期事件

.判断开始 (选择框_蓝量打坐.选中 ＝ 真 且 选择框_血量打坐.选中 ＝ 假)
    .判断开始 (编辑框4.内容 ≠ “” 且 绝对取整 (人物.当前蓝 ÷ 人物.最大蓝 × 100) ＜ 到数值 (编辑框4.内容))
        .如果真 (人物.怪物选中状态 ＝ 0 且 人物.打坐状态 ＝ 假)
            选择框_自动寻怪.选中 ＝ 假
            人物.打坐状态 ＝ 真
            打坐 (1)
        .如果真结束

    .判断 (编辑框4.内容 ≠ “” 且 人物.当前蓝 ＝ 人物.最大蓝 且 人物.打坐状态 ＝ 真)
        人物.打坐状态 ＝ 假
        打坐 (0)
        选择框_自动寻怪.选中 ＝ 真
    .默认

    .判断结束

.判断 (选择框_血量打坐.选中 ＝ 真 且 选择框_蓝量打坐.选中 ＝ 假)
    .判断开始 (编辑框3.内容 ≠ “” 且 绝对取整 (人物.当前血 ÷ 人物.最大血 × 100) ＜ 到数值 (编辑框3.内容))
        .如果真 (人物.怪物选中状态 ＝ 0 且 人物.打坐状态 ＝ 假)
            选择框_自动寻怪.选中 ＝ 假
            人物.打坐状态 ＝ 真
            打坐 (1)
        .如果真结束

    .判断 (编辑框3.内容 ≠ “” 且 人物.当前血 ＝ 人物.最大血 且 人物.打坐状态 ＝ 真)
        人物.打坐状态 ＝ 假
        打坐 (0)
        选择框_自动寻怪.选中 ＝ 真
    .默认

    .判断结束

.判断 (选择框_血量打坐.选中 ＝ 真 且 选择框_蓝量打坐.选中 ＝ 真)
    .判断开始 (绝对取整 (人物.当前血 ÷ 人物.最大血 × 100) ＜ 到数值 (编辑框3.内容) 或 绝对取整 (人物.当前蓝 ÷ 人物.最大蓝 × 100) ＜ 到数值 (编辑框4.内容))
        .如果真 (人物.怪物选中状态 ＝ 0 且 人物.打坐状态 ＝ 假)
            选择框_自动寻怪.选中 ＝ 假
            人物.打坐状态 ＝ 真
            打坐 (1)
        .如果真结束

    .判断 (人物.当前血 ＝ 人物.最大血 且 人物.当前蓝 ＝ 人物.最大蓝 且 人物.打坐状态 ＝ 真)
        人物.打坐状态 ＝ 假
        打坐 (0)
        选择框_自动寻怪.选中 ＝ 真
    .默认

    .判断结束

.默认

.判断结束


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

载入 (窗口1, , 真)

.子程序 _单选框_快捷栏_被单击

.如果 (单选框_快捷栏.选中 ＝ 真)
    分组框1.禁止 ＝ 假
    分组框3.禁止 ＝ 真
.否则
    分组框3.禁止 ＝ 假
    分组框1.禁止 ＝ 真
.如果结束


.子程序 _单选框_技能列表_被单击

.如果 (单选框_快捷栏.选中 ＝ 真)
    分组框1.禁止 ＝ 假
    分组框3.禁止 ＝ 真
.否则
    分组框3.禁止 ＝ 假
    分组框1.禁止 ＝ 真
.如果结束


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

写入配置 ()

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

读取配置 ()

.子程序 写入配置
.局部变量 计次, 整数型
.局部变量 配置内容, 文本型
.局部变量 目录, 文本型

配置内容 ＝ “”
清除数组 (人物配置)
' 读取配置信息
加入成员 (人物配置, 到文本 (选择框_自动寻怪.选中))
加入成员 (人物配置, 到文本 (选择框_选最近怪.选中))
加入成员 (人物配置, 到文本 (单选框_快捷栏.选中))
加入成员 (人物配置, 到文本 (单选框_技能列表.选中))
.计次循环首 (取数组成员数 (组合框X), 计次)
    加入成员 (人物配置, 到文本 (组合框X [计次].现行选中项))
.计次循环尾 ()
加入成员 (人物配置, 到文本 (选择框_血量保护.选中))
加入成员 (人物配置, 到文本 (选择框_蓝量保护.选中))
加入成员 (人物配置, 到文本 (选择框_血量打坐.选中))
加入成员 (人物配置, 到文本 (选择框_蓝量打坐.选中))
加入成员 (人物配置, 到文本 (编辑框1.内容))
加入成员 (人物配置, 到文本 (编辑框2.内容))
加入成员 (人物配置, 到文本 (编辑框3.内容))
加入成员 (人物配置, 到文本 (编辑框4.内容))
加入成员 (人物配置, 到文本 (组合框1.现行选中项))
加入成员 (人物配置, 到文本 (组合框2.现行选中项))
' 写配置内容=
.计次循环首 (取数组成员数 (人物配置), 计次)
    配置内容 ＝ 配置内容 ＋ 人物配置 [计次] ＋ “|”
.计次循环尾 ()
输出调试文本 (配置内容)
' 写入文件
目录 ＝ 取当前目录 ()
写配置项 (目录 ＋ “\” ＋ 人物.名称 ＋ “.ini”, “设置信息”, “人物名称”, 人物.名称)
写配置项 (目录 ＋ “\” ＋ 人物.名称 ＋ “.ini”, “设置信息”, “设置”, 配置内容)
信息框 (“配置保存成功！”, 0, )


.子程序 读取配置
.局部变量 计次, 整数型
.局部变量 目录, 文本型
.局部变量 i, 整数型

目录 ＝ 取当前目录 ()
人物配置 ＝ 分割文本 (读配置项 (目录 ＋ “\” ＋ 人物.名称 ＋ “.ini”, “设置信息”, “设置”, ), “|”, )
.如果真 (取数组成员数 (人物配置) ≠ 0)
    .如果 (人物配置 [1] ＝ “真”)
        选择框_自动寻怪.选中 ＝ 真
    .否则
        选择框_自动寻怪.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [2] ＝ “真”)
        选择框_选最近怪.选中 ＝ 真
    .否则
        选择框_选最近怪.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [3] ＝ “真”)
        单选框_快捷栏.选中 ＝ 真
    .否则
        单选框_快捷栏.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [4] ＝ “真”)
        单选框_技能列表.选中 ＝ 真
    .否则
        单选框_技能列表.选中 ＝ 假
    .如果结束
    .计次循环首 (取数组成员数 (组合框X), 计次)
        i ＝ 4
        组合框X [计次].现行选中项 ＝ 到数值 (人物配置 [计次 ＋ i])
    .计次循环尾 ()
    i ＝ 4 ＋ 取数组成员数 (组合框X)
    .如果 (人物配置 [i ＋ 1] ＝ “真”)
        选择框_血量保护.选中 ＝ 真
    .否则
        选择框_血量保护.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [i ＋ 2] ＝ “真”)
        选择框_蓝量保护.选中 ＝ 真
    .否则
        选择框_蓝量保护.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [i ＋ 3] ＝ “真”)
        选择框_血量打坐.选中 ＝ 真
    .否则
        选择框_血量打坐.选中 ＝ 假
    .如果结束
    .如果 (人物配置 [i ＋ 4] ＝ “真”)
        选择框_蓝量打坐.选中 ＝ 真
    .否则
        选择框_蓝量打坐.选中 ＝ 假
    .如果结束
    编辑框1.内容 ＝ 人物配置 [5 ＋ i]
    编辑框2.内容 ＝ 人物配置 [6 ＋ i]
    编辑框3.内容 ＝ 人物配置 [7 ＋ i]
    编辑框4.内容 ＝ 人物配置 [8 ＋ i]
    组合框1.现行选中项 ＝ 到数值 (人物配置 [i ＋ 9])
    组合框2.现行选中项 ＝ 到数值 (人物配置 [i ＋ 10])

.如果真结束

fjchenhai

是不是用了辅助作坊的**版啊? 千万不要用那些**版的模块 我以前用了也是运行十分钟关闭

chaoshjh

是用辅助作坊pojie版的，都这样吗？？？？那就悲剧了，难道我要重做了？

yuanlys

用辅助作坊pojie版的,也没关系。有个办法可以解决。就是把你时钟里的代码放到按钮上去。删除掉时钟

630546762

下载辅助作坊官方正版呗，最后替换成正版模块，再独立编译。调试就用pojie版的。这样可以用的吧。