.版本 2

.程序集 易代码, , 公开
.程序集变量 集_程序集文本, 文本型
.程序集变量 集_常量文本, 文本型
.程序集变量 集_数据类型文本, 文本型
.程序集变量 集_文本, 文本型
.程序集变量 集_支持库文本, 文本型
.程序集变量 集_支持库列表文本, 文本型
.程序集变量 集_只转换函数声明, 逻辑型
.程序集变量 集_代码数组, 文本型, , "0"
.程序集变量 集_判断命令, 文本型, , "0"
.程序集变量 集_未知, 逻辑型
.程序集变量 集_状态, 状态
.程序集变量 集_DLL, 未知3
.程序集变量 集_易代码, 未知4
.程序集变量 集_声音文本, 文本型
.程序集变量 集_图片文本, 文本型

.子程序 _初始化

集_判断命令 ＝ { “.计次循环首 ”, “.计次循环尾 ”, “.判断循环首 ”, “.判断循环尾 ”, “.变量循环首 ”, “.变量循环尾 ”, “.循环判断首 ”, “.循环判断尾 ”, “.如果 ”, “.否则”, “.如果结束”, “.如果真 ”, “.如果真结束”, “.判断开始 ”, “.判断 ”, “.默认”, “.判断结束” }

.子程序 _销毁



.子程序 取HTML, 文本型, 公开
.参数 命令声明代码, 文本型, 可空
.参数 不显示声明代码, 逻辑型, 可空
.参数 子项目数, 整数型, 可空, 如果是显示的整个类下面的方法，提供方法数量
.局部变量 局_文本, 文本型
.局部变量 局_类型, 文本型
.局部变量 局_额外代码, 文本型
.局部变量 局_复制声明, 文本型
.局部变量 常量大文本, 文本型
.局部变量 Path, 文本型
.局部变量 局_资源类型, 整数型

局_类型 ＝ 取易代码类型 (命令声明代码)

.如果真 (集_数据类型文本 ≠ “”)
    .如果真 (取文本右边 (集_数据类型文本, 8) ≠ “</table>”)
        集_数据类型文本 ＝ 集_数据类型文本 ＋ “</table>”
    .如果真结束
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_数据类型文本
.如果真结束

.如果真 (集_文本 ≠ “”)
    .如果真 (取文本右边 (集_文本, 8) ≠ “</table>”)
        集_文本 ＝ 集_文本 ＋ “</table>”
    .如果真结束
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_文本
.如果真结束

.如果真 (集_常量文本 ≠ “”)
    .如果真 (取文本右边 (集_常量文本, 8) ≠ “</table>”)
        集_常量文本 ＝ 集_常量文本 ＋ “</table>”
    .如果真结束
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_常量文本
.如果真结束

.如果真 (集_声音文本 ≠ “”)
    .如果真 (取文本右边 (集_声音文本, 8) ≠ “</table>”)
        集_声音文本 ＝ 集_声音文本 ＋ “</table>”
    .如果真结束
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_声音文本
.如果真结束

.如果真 (集_图片文本 ≠ “”)
    .如果真 (取文本右边 (集_图片文本, 8) ≠ “</table>”)
        集_图片文本 ＝ 集_图片文本 ＋ “</table>”
    .如果真结束
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_图片文本
.如果真结束

.如果真 (集_支持库文本 ≠ “”)
    局_文本 ＝ 局_文本 ＋ “<br />” ＋ 集_支持库文本
.如果真结束

.如果真 (集_程序集文本 ＝ “”)
    局_文本 ＝ 取文本右边 (局_文本, 取文本长度 (局_文本) － 取文本长度 (“<br />”))
.如果真结束

.如果真 (取文本右边 (集_程序集文本, 5) ＝ “</tr>”)
    集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”
.如果真结束

.如果真 (删首尾空 (局_文本) ≠ “” 且 集_程序集文本 ＝ “”)
    集_程序集文本 ＝ 局_文本
.如果真结束


局_额外代码 ＝ “”
' 复制代码和插入到易语言
.判断开始 (局_类型 ＝ “子程序” 或 局_类型 ＝ “DLL”)
    局_额外代码 ＝ 子文本替换 (#HTML_复制代码, “<jd>”, #HTML_复制命令简单, , , 真)
    局_额外代码 ＝ 子文本替换 (局_额外代码, “<jdcs>”, #HTML_复制命令带参数, , , 真)
    局_额外代码 ＝ 子文本替换 (局_额外代码, “<insert>”, #HTML_插入到易语言, , , 真)
.默认
    局_额外代码 ＝ 子文本替换 (#HTML_复制代码, “<insert>”, #HTML_插入到易语言, , , 真)
.判断结束


' 代码声明
.判断开始 (局_类型 ＝ “子程序” 或 局_类型 ＝ “DLL” 或 局_类型 ＝ “数据类型”)
    局_复制声明 ＝ 子文本替换 (#HTML_命令声明, “<copyparam>”, #HTML_复制参数声明, , , 真)
.默认
    局_复制声明 ＝ #HTML_命令声明
.判断结束

局_复制声明 ＝ 子文本替换 (局_复制声明, “<copycode>”, #HTML_复制声明代码, , , 真)
局_复制声明 ＝ 子文本替换 (局_复制声明, “<code>”, HTML代码转移为显示 (命令声明代码), , , 真)

局_文本 ＝ “”
.判断开始 (全_当前选中项数据.类型 ＝ “常量”)
    ' 常量字符串值
    局_文本 ＝ 全_当前选中项数据.常量字符串
    .判断开始 (删首尾空 (局_文本) ≠ “” 且 寻找文本 (集_程序集文本, “><文本长度:”, , 假) ≠ -1)
        局_文本 ＝ 子文本替换 (#HTML_常量字符串, “<code>”, 局_文本, , , 真)
    .默认
        局_文本 ＝ “”
    .判断结束

.判断 (全_当前选中项数据.类型 ＝ “图片资源” 或 全_当前选中项数据.类型 ＝ “声音资源”)
    局_资源类型 ＝ _资源类型识别 (Path)
    .判断开始 (局_资源类型 ＝ 1)
        局_文本 ＝ 子文本替换 (#HTML_图片, “<code>”, Path, , , 真)
        局_文本 ＝ 子文本替换 (局_文本, “<bz>”, 全_当前选中项数据.文件格式, , , 真)

    .判断 (局_资源类型 ＝ 2)
        局_文本 ＝ 子文本替换 (#HTML_声音, “<code>”, Path, , , 真)
        局_文本 ＝ 子文本替换 (局_文本, “<bz>”, 全_当前选中项数据.文件格式, , , 真)

    .判断 (局_资源类型 ＞ 0)
        局_文本 ＝ 子文本替换 (#HTML_声音, “<code>”, Path, , , 真)
        局_文本 ＝ 子文本替换 (局_文本, “<bz>”, 全_当前选中项数据.文件格式, , , 真)

    .默认
        局_文本 ＝ 子文本替换 (#HTML_图片, “<code>”, “”, , , 真)
        局_文本 ＝ 子文本替换 (局_文本, “<bz>”, “(未知格式)”, , , 真)
    .判断结束

.默认

.判断结束
.如果 (不显示声明代码)
    局_额外代码 ＝ #HTML_命令声明_整个类
    局_额外代码 ＝ 子文本替换 (局_额外代码, “<copycode>”, #HTML_复制声明代码, , , 真)
    局_额外代码 ＝ 子文本替换 (局_额外代码, “<code>”, HTML代码转移为显示 (命令声明代码), , , 真)
    局_额外代码 ＝ 子文本替换 (局_额外代码, “<count>”, 到文本 (子项目数), , , 真)
    集_程序集文本 ＝ 局_额外代码 ＋ 集_程序集文本 ＋ 局_文本

.否则
    集_程序集文本 ＝ 局_额外代码 ＋ 集_程序集文本 ＋ 局_复制声明 ＋ 局_文本
.如果结束
.如果真 (命令声明代码 ＝ “”)
    集_程序集文本 ＝ “”
.如果真结束

返回 (#HTML_头 ＋ “<meta http-equiv='Content-Type' content='text/html; charset=gbk' /><TITLE>精易论坛 bbs.125.la</TITLE></HEAD><body style='border:0px none #CCCCCC;'>” ＋ 集_程序集文本 ＋ #换行符 ＋ #HTML_Js ＋ “</body></HTML>”)

.子程序 转换, 文本型, 公开
.参数 代码文本, 文本型
.参数 只转换函数声明, 逻辑型, 可空
.参数 不显示声明代码, 逻辑型, 可空
.参数 子项目数, 整数型, 可空, 如果是显示的整个类下面的方法，提供方法数量
.局部变量 局_成功, 逻辑型

' 代码文本 ＝ 子文本替换 (代码文本, “&”, “&amp;”, , , 真)
代码文本 ＝ HTML代码转移为显示 (代码文本)

集_代码数组 ＝ 分割文本 (代码文本, #换行符, )
集_只转换函数声明 ＝ 只转换函数声明
连续赋值 (“”, 集_程序集文本, 集_支持库文本, 集_支持库列表文本, 集_文本, 集_常量文本, 集_声音文本, 集_图片文本, 集_数据类型文本)
连续赋值 (假, 集_未知)
.计次循环首 (取数组成员数 (集_代码数组), 集_易代码.计次1)
    .判断开始 (取文本左边 (集_代码数组 [集_易代码.计次1], 4) ＝ “.类 ”)
        局_成功 ＝ 类名转换 ()
    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 8) ＝ “.程序集 ”)
        局_成功 ＝ 程序集转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 12) ＝ “.程序集变量 ”)
        局_成功 ＝ 程序集变量转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 8) ＝ “.子程序 ”)
        局_成功 ＝ 子程序转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 6) ＝ “.参数 ”)  ' 子程序参数
        局_成功 ＝ 参数转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 10) ＝ “.全局变量 ”)
        局_成功 ＝ 转换_全局变量 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 10) ＝ “.局部变量 ”)
        局_成功 ＝ 局部变量转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 10) ＝ “.数据类型 ”)
        局_成功 ＝ 数据类型转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 10) ＝ “    .成员 ”)
        局_成功 ＝ 数据类型成员转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 9) ＝ “.DLL命令 ”)
        局_成功 ＝ DLL命令转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 10) ＝ “    .参数 ”)
        局_成功 ＝ DLL命令参数转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 6) ＝ “.常量 ”)
        局_成功 ＝ 常量转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 6) ＝ “.图片 ”)
        局_成功 ＝ 图片转换 ()

    .判断 (取文本左边 (集_代码数组 [集_易代码.计次1], 6) ＝ “.声音 ”)
        局_成功 ＝ 声音转换 ()

    .判断 (删首尾空 (集_代码数组 [集_易代码.计次1]) ＝ “”)
        局_成功 ＝ tnGGS_ZiLWa ()
    .默认
        局_成功 ＝ 支持库转换 ()
    .判断结束

    .如果真 (取数组成员数 (集_代码数组) ＝ 集_易代码.计次1)
        .如果真 (集_状态.syEFC_ECYVm ＝ 1 或 集_状态.Khtki_CVdEw ＝ 1)
            集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”

        .如果真结束
        .如果真 (集_状态.GmOpU_BODVJ ＝ 1)
            集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”

        .如果真结束
        .如果真 (集_状态.HGXRj_jzOam ＝ 1 或 集_状态.ftQML_CSEHs ＝ 1)
            集_数据类型文本 ＝ 集_数据类型文本 ＋ “</table>”

        .如果真结束
        .如果真 (集_状态.常量状态 ＝ 1)
            集_常量文本 ＝ 集_常量文本 ＋ “</table>”

        .如果真结束
        .如果真 (集_状态.dkHEL_TNoRb ＝ 1 或 集_状态.sPfJm_oQeIa ＝ 1)
            集_文本 ＝ 集_文本 ＋ “</table>”
        .如果真结束

        .如果真 (集_状态.声音状态 ＝ 1)
            集_声音文本 ＝ 集_声音文本 ＋ “</table>”
        .如果真结束

        .如果真 (集_状态.图片状态 ＝ 1)
            集_图片文本 ＝ 集_图片文本 ＋ “</table>”
        .如果真结束

    .如果真结束
    .如果真 (集_未知)
        跳出循环 ()
    .如果真结束
    连续赋值 (“”, 集_DLL.名称, 集_DLL.返回值类型, 集_DLL.DLL库文件名, 集_DLL.DLL库中对应命令名, 集_DLL.公开, 集_DLL.备注, 集_DLL.OtvPP_OrYhB, 集_DLL.Stvge_nOUgt)
    连续赋值 (0, 集_DLL.GAEvV_tkHvR, 集_DLL.TLFRU_dKyOx, 集_DLL.QuiLU_LRMep, 集_DLL.xAWMe_nbjdp, 集_DLL.sItEk_obaEL)
    连续赋值 (假, 集_DLL.dKwzd_SNWcx)
    清除数组 (集_DLL.代码行文本)
.计次循环尾 ()

.如果 (集_未知)
    集_程序集文本 ＝ “<table width=400 border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr style='background-color:#E6EDE4;color: green;'><td colspan=2><font face=Webdings color=red>i</font>转换过程中遇到致命错误，请检查代码的完整性，建议直接从易语言IDE中复制代码进行转换，请不要手动编辑代码，以免产生转换错误！</td></tr></table><br />” ＋ 集_程序集文本

.否则
    .如果真 (集_支持库列表文本 ≠ “”)
        集_支持库文本 ＝ 集_支持库文本 ＋ “<table width=300 border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr><td bgcolor=#E6EDE4 colspan=2><font face=Webdings color=red>i</font>本程序使用的支持库列表</td></tr>” ＋ 集_支持库列表文本 ＋ “</table>”
    .如果真结束

.如果结束
连续赋值 (0, 集_状态.syEFC_ECYVm, 集_状态.Khtki_CVdEw, 集_状态.BRlDc_gXiKs, 集_状态.VdGaq_EbCDA, 集_状态.NtIAz_izLNu, 集_状态.GmOpU_BODVJ, 集_状态.HGXRj_jzOam, 集_状态.ftQML_CSEHs, 集_状态.常量状态, 集_状态.声音状态, 集_状态.图片状态, 集_状态.dkHEL_TNoRb, 集_状态.sPfJm_oQeIa)
返回 (取HTML (HTML代码转移为显示 (代码文本), 不显示声明代码, 子项目数))



.子程序 取易代码类型, 文本型
.参数 参_易代码, 文本型
.局部变量 Str, 文本型

.判断开始 (寻找文本 (参_易代码, “.常量 ”, , 假) ≠ -1)
    Str ＝ “常量”

.判断 (寻找文本 (参_易代码, “.数据类型 ”, , 假) ≠ -1)
    Str ＝ “数据类型”

.判断 (寻找文本 (参_易代码, “.子程序 ”, , 假) ≠ -1)
    Str ＝ “子程序”

.判断 (寻找文本 (参_易代码, “.DLL命令 ”, , 假) ≠ -1)
    Str ＝ “DLL”

.判断 (寻找文本 (参_易代码, “.全局变量 ”, , 假) ≠ -1)
    Str ＝ “全局变量”
.默认

.判断结束
返回 (Str)

.子程序 转换_全局变量, 逻辑型
.局部变量 局_数组, 文本型

.如果真 (集_状态.常量状态 ≠ 1)
    集_常量文本 ＝ 集_常量文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'>” ＋ “<tr class='浅绿色'><td>全局变量名</td><td>类型</td><td>数组</td><td class='w38'>公开</td><td>备注</td></tr>”
    集_状态.常量状态 ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 10, 999)
文本_分割 (集_代码数组 [集_易代码.计次1], “, ”, 集_DLL.代码行文本, 5)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    集_DLL.返回值类型 ＝ 集_DLL.代码行文本 [2]
    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        .判断开始 (寻找文本 (集_DLL.代码行文本 [3], “公开”, , 假) ≠ -1)
            集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
        .默认
            集_DLL.DLL库文件名 ＝ “&nbsp;”
        .判断结束

        .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 3)  ' 下面是数组
            局_数组 ＝ 子文本替换 (集_DLL.代码行文本 [4], #引号, “”, , , 真)
            .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 4)  ' 下面是备注
                集_DLL.DLL库中对应命令名 ＝ “<font color=#008000>” ＋ 子文本替换 (HTML代码转移为显示 (集_DLL.代码行文本 [5]), #引号 ＋ “,”, “”, , , 真) ＋ “</font>”
            .否则
                集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
            .如果结束

        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_常量文本 ＝ 集_常量文本 ＋ “<tr bgcolor='#FFFFFF'><td>” ＋ HTML代码转移为显示 (集_DLL.名称) ＋ “</td><td class=” ＋ #引号 ＋ “类型颜色” ＋ #引号 ＋ “>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 局_数组 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)

.子程序 类名转换, 逻辑型
.局部变量 类名, 文本型
.局部变量 基类, 文本型
.局部变量 备注, 文本型
.局部变量 分割文本行, 文本型, , "0"

.如果 (集_状态.syEFC_ECYVm ≠ 1)
    集_状态.syEFC_ECYVm ＝ 1
    集_程序集文本 ＝ 集_程序集文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr class='浅灰色'><td>类名称</td><td>基类</td><td>公开</td><td>备注</td></tr>”
.否则
    集_未知 ＝ 真
    返回 (假)
.如果结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 5, 999)

分割文本行 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “ , ”, 3)
.如果真 (取数组成员数 (分割文本行) ＝ 3)
    类名 ＝ 分割文本行 [1]
    基类 ＝ 分割文本行 [2]
.如果真结束

备注 ＝ 文本_取右边 (集_代码数组 [集_易代码.计次1], “ , 公开 ,”)

集_程序集文本 ＝ 集_程序集文本 ＋ “<tr bgcolor='#FFFFFF'><td>” ＋ 类名 ＋ “</td><td>” ＋ 基类 ＋ “</td><td><span class='公开'></span></td><td>” ＋ HTML代码转移为显示 (备注) ＋ “</td></tr>”
返回 (真)


.子程序 程序集转换, 逻辑型

.如果 (集_状态.syEFC_ECYVm ≠ 1)
    集_状态.syEFC_ECYVm ＝ 1
    集_程序集文本 ＝ 集_程序集文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr class='浅灰色'><td>程序集名</td><td>保留</td><td>保留</td><td>备注</td></tr>”
.否则
    集_未知 ＝ 真
    返回 (假)
.如果结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 8, 999)
.如果 (寻找文本 (集_代码数组 [集_易代码.计次1], “,”, , 假) ＝ -1)
    集_DLL.名称 ＝ “<font color=#000080>” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</font>”
    集_DLL.返回值类型 ＝ “&nbsp;”
.否则
    集_DLL.名称 ＝ 取文本左边 (集_代码数组 [集_易代码.计次1], 寻找文本 (集_代码数组 [集_易代码.计次1], “,”, , 假) － 1)
    集_DLL.返回值类型 ＝ “<font color=#008000>” ＋ 取文本中间 (集_代码数组 [集_易代码.计次1], 倒找文本 (集_代码数组 [集_易代码.计次1], “,”, , 假) ＋ 1, 999) ＋ “</font>”
.如果结束
集_程序集文本 ＝ 集_程序集文本 ＋ “<tr bgcolor='#FFFFFF'><td>” ＋ 集_DLL.名称 ＋ “</td><td>&nbsp;</td><td>&nbsp;</td><td>” ＋ 集_DLL.返回值类型 ＋ “</td></tr>”
返回 (真)

.子程序 程序集变量转换, 逻辑型

.如果真 (集_状态.syEFC_ECYVm ≠ 1)
    集_未知 ＝ 真
    返回 (假)
.如果真结束
.如果真 (集_状态.Khtki_CVdEw ≠ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “<tr class='浅灰色'><td>变量名</td><td>类型</td><td>数组</td><td>备注</td></tr>”
    集_状态.Khtki_CVdEw ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 12, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 5)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ≥ 2)
    集_DLL.返回值类型 ＝ “<font color=#0000FF>” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 4)
        集_DLL.DLL库文件名 ＝ 取文本中间 (集_DLL.代码行文本 [4], 3, 取文本长度 (集_DLL.代码行文本 [4]) － 3)
        .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 5)
            集_DLL.DLL库中对应命令名 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [5] ＋ “</font>”
        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_程序集文本 ＝ 集_程序集文本 ＋ “<tr  bgcolor='#FFFFFF'><td>” ＋ 集_DLL.名称 ＋ “</td><td>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)

.子程序 子程序转换, 逻辑型

.如果真 (集_状态.syEFC_ECYVm ＝ 1 或 集_状态.Khtki_CVdEw ＝ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “</table><br />”
.如果真结束
.如果真 (集_状态.BRlDc_gXiKs ＝ 1)
    .如果 (集_状态.GmOpU_BODVJ ＝ 1)
        集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”
    .否则
        集_程序集文本 ＝ 集_程序集文本 ＋ “</table><br />”
    .如果结束
    连续赋值 (0, 集_状态.NtIAz_izLNu, 集_状态.GmOpU_BODVJ, 集_状态.VdGaq_EbCDA)
.如果真结束
集_状态.BRlDc_gXiKs ＝ 1
集_程序集文本 ＝ 集_程序集文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格' width=” ＋ #引号 ＋ “100%” ＋ #引号 ＋ “><tr class='浅绿色'><td id=funnamehead>子程序名</td><td class='w70'>返回值类型</td><td class='w38'>公开</td><td colspan='3' id=bz>备注</td></tr>”

集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 8, 999)
.如果 (寻找文本 (集_代码数组 [集_易代码.计次1], “,”, , 假) ＝ -1)
    集_DLL.名称 ＝ “<font color=#000080> ” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</font>”

    连续赋值 (“”, 集_DLL.返回值类型, 集_DLL.DLL库文件名, 集_DLL.DLL库中对应命令名)
.否则
    文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 4)
    集_DLL.名称 ＝ “<font color=#000080> ” ＋ 删首尾空 (集_DLL.代码行文本 [1]) ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 2)
        集_DLL.返回值类型 ＝ “<font color=#0000FF> ” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
        .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 3)
            集_DLL.DLL库文件名 ＝ 集_DLL.代码行文本 [3]
            .如果 (寻找文本 (集_DLL.DLL库文件名, “公开”, , 假) ≠ -1)
                集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
            .否则
                集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
            .如果结束
            .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 4)
                集_DLL.DLL库中对应命令名 ＝ “<font color=#008000> ” ＋ HTML代码转移为显示 (集_DLL.代码行文本 [4]) ＋ “</font>”
            .否则
                集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
            .如果结束

        .否则
            集_DLL.DLL库文件名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.返回值类型 ＝ “&nbsp;”
    .如果结束

.如果结束

集_程序集文本 ＝ 集_程序集文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “><span id=funname>” ＋ 集_DLL.名称 ＋ “</span></td><td>” ＋ 集_DLL.返回值类型 ＋ “</td><td> ” ＋ 集_DLL.DLL库文件名 ＋ “</td><td colspan=3> ” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)

.子程序 参数转换, 逻辑型

.如果 (集_状态.BRlDc_gXiKs ＝ 1)
    .如果真 (集_状态.VdGaq_EbCDA ≠ 1)
        集_程序集文本 ＝ 集_程序集文本 ＋ “<tr class='浅绿色'><td>参数名</td><td>类型</td><td id=ck>参考</td><td id=kk class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>可空</td><td id=sz class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>数组</td><td id=funbz>备注</td></tr>”
        集_状态.VdGaq_EbCDA ＝ 1
    .如果真结束

.否则
    返回 (假)
.如果结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 6, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 4)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ≥ 2)
    集_DLL.返回值类型 ＝ “<font color=#0000FF> ” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 3)
        集_DLL.DLL库文件名 ＝ 删首尾空 (集_DLL.代码行文本 [3])
        .如果 (寻找文本 (集_DLL.DLL库文件名, “参考”, , 假) ≠ -1 或 寻找文本 (集_DLL.DLL库文件名, “传址”, , 假) ≠ -1)
            集_DLL.DLL库中对应命令名 ＝ “<span class='公开'></span>”
        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

        .如果 (寻找文本 (集_DLL.DLL库文件名, “可空”, , 假) ≠ -1)
            集_DLL.公开 ＝ “<span class='公开'></span>”
        .否则
            集_DLL.公开 ＝ “&nbsp;”
        .如果结束

        .如果 (寻找文本 (集_DLL.DLL库文件名, “数组”, , 假) ≠ -1)
            集_DLL.备注 ＝ “<span class='公开'></span>”
        .否则
            集_DLL.备注 ＝ “&nbsp;”
        .如果结束

        .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 4)
            集_DLL.OtvPP_OrYhB ＝ “<font color=#008000> ” ＋ HTML代码转移为显示 (集_DLL.代码行文本 [4]) ＋ “</font>”
        .否则
            集_DLL.OtvPP_OrYhB ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_程序集文本 ＝ 集_程序集文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “> ” ＋ 集_DLL.名称 ＋ “</td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td><td>” ＋ 集_DLL.公开 ＋ “</td><td>” ＋ 集_DLL.备注 ＋ “</td><td>” ＋ 集_DLL.OtvPP_OrYhB ＋ “</td></tr>”
返回 (真)

.子程序 局部变量转换, 逻辑型

.如果真 (集_只转换函数声明)
    返回 (假)
.如果真结束
.如果真 (集_状态.BRlDc_gXiKs ≠ 1)
    返回 (假)
.如果真结束
.如果真 (集_状态.VdGaq_EbCDA ＝ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”
    连续赋值 (0, 集_状态.VdGaq_EbCDA)
.如果真结束
.如果真 (集_状态.NtIAz_izLNu ≠ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “<table border=0><tr><td height=3></td></tr></table>”
    集_程序集文本 ＝ 集_程序集文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr style='background-color:#D9E3F0;'><td>变量名</td><td>类型</td><td>静态</td><td>数组</td><td>备注</td></tr>”
    集_状态.NtIAz_izLNu ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 10, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 5)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ≥ 2)
    集_DLL.返回值类型 ＝ “<font color=#0000FF>” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 3)
        集_DLL.DLL库文件名 ＝ 集_DLL.代码行文本 [3]
        .如果真 (寻找文本 (集_DLL.DLL库文件名, “静态”, , 假) ≠ -1)
            集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
        .如果真结束
        .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 4)
            集_DLL.DLL库中对应命令名 ＝ 取文本中间 (集_DLL.代码行文本 [4], 3, 取文本长度 (集_DLL.代码行文本 [4]) － 3)
            .如果 (取数组成员数 (集_DLL.代码行文本) ≥ 5)
                集_DLL.公开 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [5] ＋ “</font>”
            .否则
                集_DLL.公开 ＝ “&nbsp;”
            .如果结束

        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_程序集文本 ＝ 集_程序集文本 ＋ “<tr bgcolor='#FFFFFF'><td>” ＋ 集_DLL.名称 ＋ “</td><td>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td><td>” ＋ 集_DLL.公开 ＋ “</td></tr>”
返回 (真)

.子程序 数据类型转换, 逻辑型

.如果真 (集_状态.HGXRj_jzOam ＝ 1 或 集_状态.ftQML_CSEHs ＝ 1)
    集_数据类型文本 ＝ 集_数据类型文本 ＋ “</table><br />”
    连续赋值 (0, 集_状态.HGXRj_jzOam, 集_状态.ftQML_CSEHs)
.如果真结束
.如果真 (集_状态.HGXRj_jzOam ≠ 1)
    集_数据类型文本 ＝ 集_数据类型文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'><tr class='浅绿色'><td class='w80'>数据类型名</td><td class='w38'>公开</td><td colspan=3>备注</td></tr>”
    集_状态.HGXRj_jzOam ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 10, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 3)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    集_DLL.返回值类型 ＝ “<span class='公开'></span>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        集_DLL.DLL库文件名 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [3] ＋ “</font>”
    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_数据类型文本 ＝ 集_数据类型文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.名称 ＋ “</td><td>” ＋ 集_DLL.返回值类型 ＋ “</td><td colspan=3>” ＋ 集_DLL.DLL库文件名 ＋ “</td></tr>”
集_数据类型文本 ＝ 集_数据类型文本 ＋ “<tr class='浅绿色'><td>成员名</td><td>类型</td><td id=ck>传址</td><td id=sz>数组</td><td>备注</td></tr>”
返回 (真)

.子程序 数据类型成员转换, 逻辑型

.如果真 (集_状态.HGXRj_jzOam ≠ 1)
    集_未知 ＝ 真
    返回 (假)
.如果真结束
集_状态.ftQML_CSEHs ＝ 1
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 10, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “, ”, 集_DLL.代码行文本, 5)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    集_DLL.返回值类型 ＝ “<font color=#0000FF>” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        .如果真 (寻找文本 (集_DLL.代码行文本 [3], “传址”, , 假) ≠ -1)
            集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
        .如果真结束

        .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 3)
            集_DLL.DLL库中对应命令名 ＝ 取文本中间 (集_DLL.代码行文本 [4], 2, 取文本长度 (集_DLL.代码行文本 [4]) － 2)
            .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 4)
                集_DLL.公开 ＝ 集_DLL.代码行文本 [5]
            .否则
                集_DLL.公开 ＝ “&nbsp;”
            .如果结束

        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_数据类型文本 ＝ 集_数据类型文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.名称 ＋ “</td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td><td class='备注颜色'>” ＋ 集_DLL.公开 ＋ “</td></tr>”
返回 (真)

.子程序 常量转换, 逻辑型

.如果真 (集_状态.常量状态 ≠ 1)
    集_常量文本 ＝ 集_常量文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'>” ＋ “<tr class='浅绿色'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>常量名称</td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>常量值</td><td id=gk>公开</td><td>备注</td></tr>”
    集_状态.常量状态 ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 6, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 4)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    集_DLL.返回值类型 ＝ 取文本中间 (集_DLL.代码行文本 [2], 3, 取文本长度 (集_DLL.代码行文本 [2]) － 3)
    .判断开始 (文本_是否为纯数字 (集_DLL.返回值类型))
        集_DLL.返回值类型 ＝ “<font color=#800000>” ＋ 集_DLL.返回值类型 ＋ “</font>”
    .默认
        集_DLL.返回值类型 ＝ “<font color=#008080>” ＋ 集_DLL.返回值类型 ＋ “</font>”
    .判断结束

    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        .如果真 (寻找文本 (集_DLL.代码行文本 [3], “公开”, , 假) ≠ -1)
            集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
        .如果真结束

        .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 3)
            集_DLL.DLL库中对应命令名 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [4] ＋ “</font>”
        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_常量文本 ＝ 集_常量文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “><font color=#000080>” ＋ 集_DLL.名称 ＋ “</font></td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)

.子程序 DLL命令转换, 逻辑型, , 不包含参数

.如果真 (集_状态.dkHEL_TNoRb ＝ 1 或 集_状态.sPfJm_oQeIa ＝ 1)
    集_文本 ＝ 集_文本 ＋ “</table><br />”
    连续赋值 (0, 集_状态.dkHEL_TNoRb, 集_状态.sPfJm_oQeIa)
.如果真结束
集_状态.dkHEL_TNoRb ＝ 1
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 9, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 6)
集_DLL.名称 ＝ “<font color=#000080>” ＋ 集_DLL.代码行文本 [1] ＋ “</font>”
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    集_DLL.返回值类型 ＝ “<font color=#0000FF>” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        集_DLL.DLL库文件名 ＝ “<font color=maroon>” ＋ 取文本中间 (集_DLL.代码行文本 [3], 3, 取文本长度 (集_DLL.代码行文本 [3]) － 3) ＋ “</font>”
        .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 3)
            集_DLL.DLL库中对应命令名 ＝ “<font color=maroon>” ＋ 取文本中间 (集_DLL.代码行文本 [4], 3, 取文本长度 (集_DLL.代码行文本 [4]) － 3) ＋ “</font>”
            .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 4)
                .如果真 (寻找文本 (集_DLL.代码行文本 [5], “公开”, , 假) ≠ -1)
                    集_DLL.公开 ＝ “<span class='公开'></span>”
                .如果真结束

                .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 5)
                    集_DLL.备注 ＝ “<font color=#008000>” ＋ HTML代码转移为显示 (集_DLL.代码行文本 [6]) ＋ “</font>”
                .否则
                    集_DLL.备注 ＝ “&nbsp;”
                .如果结束

            .否则
                集_DLL.公开 ＝ “&nbsp;”
            .如果结束

        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_文本 ＝ 集_文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'>” ＋ “<tr class='浅绿色'><td>DLL命令名</td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>返回值类型</td><td class='w38'>公开</td><td colspan=3>备注</td></tr>”
集_文本 ＝ 集_文本 ＋ “<tr  bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.名称 ＋ “</td><td>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.公开 ＋ “</td><td colspan=2>” ＋ 集_DLL.备注 ＋ “</td></tr>”
集_文本 ＝ 集_文本 ＋ “<tr class='浅绿色'><td colspan='5'>DLL库文件名</td></tr><tr bgcolor='#FFFFFF'><td colspan='5'>” ＋ 集_DLL.DLL库文件名 ＋ “&nbsp;</td></tr>”
集_文本 ＝ 集_文本 ＋ “<tr class='浅绿色'><td colspan='5'>在DLL库中对应命令名</td></tr><tr bgcolor='#FFFFFF'><td colspan='5'>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
集_文本 ＝ 集_文本 ＋ “<tr class='浅绿色'><td>参数名</td><td>类型</td><td id=cz>传址</td><td id=sz>数组</td><td>备注</td></tr>”
返回 (真)

.子程序 DLL命令参数转换, 逻辑型

.如果真 (集_状态.dkHEL_TNoRb ≠ 1)
    集_未知 ＝ 真
    返回 (假)
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 10, 999)
' 集_DLL.代码行文本 ＝ 分割文本 (集_代码数组 [集_易代码.计次1], “,”, )
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 4)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 1)
    .如果真 (删首尾空 (集_DLL.代码行文本 [2]) ＝ “”)
        集_DLL.代码行文本 [2] ＝ “整数型”
    .如果真结束
    集_DLL.返回值类型 ＝ “<font color=#0000FF>” ＋ 集_DLL.代码行文本 [2] ＋ “</font>”
    .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
        .如果 (寻找文本 (集_DLL.代码行文本 [3], “传址”, , 假) ≠ -1)
            集_DLL.DLL库文件名 ＝ “<span class='公开'></span>”
        .否则
            集_DLL.DLL库文件名 ＝ “&nbsp;”
        .如果结束
        .如果 (寻找文本 (集_DLL.代码行文本 [3], “数组”, , 假) ≠ -1)
            集_DLL.DLL库中对应命令名 ＝ “<span class='公开'></span>”
        .否则
            集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
        .如果结束
        .如果 (取数组成员数 (集_DLL.代码行文本) ＞ 3)
            集_DLL.公开 ＝ “<font color=#008000>” ＋ HTML代码转移为显示 (集_DLL.代码行文本 [4]) ＋ “</font>”
        .否则
            集_DLL.公开 ＝ “&nbsp;”
        .如果结束

    .否则
        集_DLL.DLL库文件名 ＝ “&nbsp;”
        集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
    .如果结束

.否则
    集_DLL.返回值类型 ＝ “&nbsp;”
.如果结束
集_文本 ＝ 集_文本 ＋ “<tr bgcolor='#FFFFFF'><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.名称 ＋ “</td><td class=” ＋ #引号 ＋ “white_space” ＋ #引号 ＋ “>” ＋ 集_DLL.返回值类型 ＋ “</td><td>” ＋ 集_DLL.DLL库文件名 ＋ “</td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td><td>” ＋ 集_DLL.公开 ＋ “</td></tr>”
返回 (真)

.子程序 支持库转换, 逻辑型

.如果真 (集_只转换函数声明)
    返回 (假)
.如果真结束
.如果真 (取文本左边 (集_代码数组 [集_易代码.计次1], 5) ＝ “.版本”)
    返回 (假)
.如果真结束
.如果真 (取文本左边 (集_代码数组 [集_易代码.计次1], 8) ＝ “.支持库 ”)
    集_代码数组 [集_易代码.计次1] ＝ 删首尾空 (取文本中间 (集_代码数组 [集_易代码.计次1], 8, 999))
    集_支持库列表文本 ＝ 集_支持库列表文本 ＋ “<tr bgcolor='#FFFFFF'><td colspan='2'><font color=#008000>” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</font></td></tr>”
    返回 (假)

.如果真结束
.如果真 (集_状态.GmOpU_BODVJ ≠ 1)
    .如果 (集_状态.BRlDc_gXiKs ＝ 1)
        集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”
        集_程序集文本 ＝ 集_程序集文本 ＋ “<table border=0 cellpadding=0 cellspacing=0 bgcolor='#FFFFFF' style='font-size: 9pt;color: #000000;font-family: 宋体;'>”
        集_状态.GmOpU_BODVJ ＝ 1
    .否则
        集_未知 ＝ 真
        返回 (假)
    .如果结束

.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “<”, “&lt;”, , , 真)
集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “>”, “&gt;”, , , 真)
.判断循环首 (集_DLL.Stvge_nOUgt ≠ “aa”)
    集_DLL.TLFRU_dKyOx ＝ 寻找文本 (集_代码数组 [集_易代码.计次1], #左引号, 集_DLL.xAWMe_nbjdp ＋ 1, 假)
    .如果 (集_DLL.TLFRU_dKyOx ＝ -1)
        跳出循环 ()
    .否则
        集_DLL.QuiLU_LRMep ＝ 寻找文本 (集_代码数组 [集_易代码.计次1], #右引号, 集_DLL.TLFRU_dKyOx ＋ 1, 假)
        .如果真 (集_DLL.QuiLU_LRMep ＝ -1)
            跳出循环 ()
        .如果真结束
        集_DLL.Stvge_nOUgt ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 集_DLL.TLFRU_dKyOx, 集_DLL.QuiLU_LRMep － 集_DLL.TLFRU_dKyOx ＋ 2)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], 集_DLL.Stvge_nOUgt, “###char_color###” ＋ 集_DLL.Stvge_nOUgt ＋ “###char_color_end###”, 集_DLL.TLFRU_dKyOx, , 真)
        集_DLL.xAWMe_nbjdp ＝ 集_DLL.QuiLU_LRMep ＋ 37
    .如果结束

.判断循环尾 ()
集_DLL.返回值类型 ＝ 删首尾空 (集_代码数组 [集_易代码.计次1])
.如果真 (取文本左边 (集_DLL.返回值类型, 1) ＝ “'” 或 取文本左边 (集_DLL.返回值类型, 2) ＝ “.'”)
    集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “ ”, “&nbsp;”, , , 真)
    集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22><font color=#008000>” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</font></td></tr>”
    返回 (假)
.如果真结束
.如果 (取文本左边 (集_DLL.返回值类型, 1) ＝ “.”)
    .计次循环首 (取数组成员数 (集_判断命令), 集_易代码.计次2)
        集_DLL.GAEvV_tkHvR ＝ 寻找文本 (集_代码数组 [集_易代码.计次1], 集_判断命令 [集_易代码.计次2], , 假)
        .如果 (集_DLL.GAEvV_tkHvR ≠ -1)
            集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], 集_判断命令 [集_易代码.计次2], “###color###” ＋ 取文本中间 (集_代码数组 [集_易代码.计次1], 集_DLL.GAEvV_tkHvR ＋ 1, 取文本长度 (集_判断命令 [集_易代码.计次2]) － 1) ＋ “###color_end###”, 集_DLL.GAEvV_tkHvR, , 真)
            集_DLL.dKwzd_SNWcx ＝ 真
            到循环尾 ()
        .否则

        .如果结束

    .计次循环尾 ()
    .如果真 (集_DLL.dKwzd_SNWcx ＝ 假)
        集_未知 ＝ 真
        返回 (假)
    .如果真结束
    集_DLL.GAEvV_tkHvR ＝ 倒找文本 (集_代码数组 [集_易代码.计次1], “'”, , 假)
    .如果 (集_DLL.GAEvV_tkHvR ≠ -1)
        集_DLL.公开 ＝ 取文本左边 (集_代码数组 [集_易代码.计次1], 集_DLL.GAEvV_tkHvR ＋ 1)
        集_DLL.备注 ＝ 取文本右边 (集_代码数组 [集_易代码.计次1], 取文本长度 (集_代码数组 [集_易代码.计次1]) － 集_DLL.GAEvV_tkHvR)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “ ”, “&nbsp;”, , , 真)
        集_DLL.备注 ＝ 子文本替换 (集_DLL.备注, “ ”, “&nbsp;”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###color###”, “<font color=#0000FF>”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###color_end###”, “</font>”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###char_color###”, “<font color=#008080>”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###char_color_end###”, “</font>”, , , 真)
        集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22>” ＋ 集_DLL.公开 ＋ “<font color=#008000>” ＋ 集_DLL.备注 ＋ “</font>” ＋ “</td></tr>”
    .否则
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “ ”, “&nbsp;”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###color###”, “<font color=#0000FF>”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###color_end###”, “</font>”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###char_color###”, “<font color=#008080>”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###char_color_end###”, “</font>”, , , 真)
        集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22>” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</td></tr>”
    .如果结束

.否则
    集_DLL.GAEvV_tkHvR ＝ 倒找文本 (集_代码数组 [集_易代码.计次1], “'”, , 假)
    .如果 (集_DLL.GAEvV_tkHvR ≠ -1)
        集_DLL.公开 ＝ 取文本左边 (集_代码数组 [集_易代码.计次1], 集_DLL.GAEvV_tkHvR ＋ 1)
        集_DLL.备注 ＝ 取文本右边 (集_代码数组 [集_易代码.计次1], 取文本长度 (集_代码数组 [集_易代码.计次1]) － 集_DLL.GAEvV_tkHvR)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “ ”, “&nbsp;”, , , 真)
        集_DLL.备注 ＝ 子文本替换 (集_DLL.备注, “ ”, “&nbsp;”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###char_color###”, “<font color=#008080>”, , , 真)
        集_DLL.公开 ＝ 子文本替换 (集_DLL.公开, “###char_color_end###”, “</font>”, , , 真)
        集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22>” ＋ 集_DLL.公开 ＋ “<font color=#008000>” ＋ 集_DLL.备注 ＋ “</font>” ＋ “</td></tr>”
        返回 (假)
    .否则
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “ ”, “&nbsp;”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###char_color###”, “<font color=#008080>”, , , 真)
        集_代码数组 [集_易代码.计次1] ＝ 子文本替换 (集_代码数组 [集_易代码.计次1], “###char_color_end###”, “</font>”, , , 真)
        集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22>” ＋ 集_代码数组 [集_易代码.计次1] ＋ “</td></tr>”
    .如果结束

.如果结束
返回 (真)

.子程序 tnGGS_ZiLWa, 逻辑型

.如果真 (集_只转换函数声明)
    返回 (假)
.如果真结束
.如果真 (集_状态.GmOpU_BODVJ ＝ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “<tr><td height=22>&nbsp;</td></tr>”
.如果真结束
.如果真 (集_状态.NtIAz_izLNu ＝ 1)
    集_程序集文本 ＝ 集_程序集文本 ＋ “</table>”
    集_程序集文本 ＝ 集_程序集文本 ＋ “<table border=0><tr><td height=5></td></tr></table>”
    集_状态.NtIAz_izLNu ＝ 0
.如果真结束
返回 (真)

.子程序 声音转换, 逻辑型

.如果真 (集_状态.声音状态 ≠ 1)
    集_声音文本 ＝ 集_声音文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'>” ＋ “<tr class='浅绿色'><td>声音名称</td><td>内容</td><td class='w38'>公开</td><td>备注</td></tr>”
    集_状态.声音状态 ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 6, 999)
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 3)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
    集_DLL.DLL库中对应命令名 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [3] ＋ “</font>”
.否则
    集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
.如果结束

集_声音文本 ＝ 集_声音文本 ＋ “<tr bgcolor='#FFFFFF'><td><font color=#000080>” ＋ 集_DLL.名称 ＋ “</font></td><td class=” ＋ #引号 ＋ “酒红色” ＋ #引号 ＋ “>” ＋ 到文本 (取字节集长度 (全_当前选中项数据.字节集数据)) ＋ “</td><td><span class='公开'></span></td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)

.子程序 图片转换, 逻辑型

.如果真 (集_状态.图片状态 ≠ 1)
    集_图片文本 ＝ 集_图片文本 ＋ “<table border='0' cellpadding='4' cellspacing='1' bgcolor='#999999' class='表格'>” ＋ “<tr class='浅绿色'><td>图片名称</td><td>内容</td><td class='w38'>公开</td><td>备注</td></tr>”
    集_状态.图片状态 ＝ 1
.如果真结束
集_代码数组 [集_易代码.计次1] ＝ 取文本中间 (集_代码数组 [集_易代码.计次1], 6, 999)
文本_分割 (集_代码数组 [集_易代码.计次1], “,”, 集_DLL.代码行文本, 3)
集_DLL.名称 ＝ 集_DLL.代码行文本 [1]
.如果 (取数组成员数 (集_DLL.代码行文本) ＞ 2)
    集_DLL.DLL库中对应命令名 ＝ “<font color=#008000>” ＋ 集_DLL.代码行文本 [3] ＋ “</font>”
.否则
    集_DLL.DLL库中对应命令名 ＝ “&nbsp;”
.如果结束

集_图片文本 ＝ 集_图片文本 ＋ “<tr bgcolor='#FFFFFF'><td><font color=#000080>” ＋ 集_DLL.名称 ＋ “</font></td><td class=” ＋ #引号 ＋ “酒红色” ＋ #引号 ＋ “>” ＋ 到文本 (取字节集长度 (全_当前选中项数据.字节集数据)) ＋ “</td><td><span class='公开'></span></td><td>” ＋ 集_DLL.DLL库中对应命令名 ＋ “</td></tr>”
返回 (真)
