常量数据表
.版本 2
.常量 c, "", , '常量值是一段C代码
C代码转易代码
.版本 2
.支持库 commobj
.支持库 iext2
.程序集 窗口程序集_启动窗口
.程序集变量 k, 快速文本对象
.程序集变量 k2, 快速文本对象
.子程序 __启动窗口_创建完毕
.局部变量 z, 字符格式
z.字体大小 = 8
z.字体名称 = “微软雅黑”
d1.置默认字符格式 (z)
d2.置默认字符格式 (z)
d1.内容 = #c
.子程序 替换_程序命名, 文本型
.参数 str, 文本型
.局部变量 替换到
.局部变量 位置1
.局部变量 位置2
.局部变量 s, 文本型, , "0"
.局部变量 s2, 文本型, , "0"
.局部变量 替换, 文本型, , "0"
.局部变量 替换为, 文本型, , "0"
.局部变量 参考数组, 文本型
.局部变量 i
k.置文本 (str)
位置1 = k.寻找文本 (“void”, , 假)
.如果真 (位置1 = -1)
返回 (str)
.如果真结束
位置2 = k.寻找文本 (“{”, 位置1, 假)
k2.置文本 (k.取文本 (位置1, 位置2 - 位置1))
k2.替换子文本 (#换行符, “”, , , 假)
k2.替换子文本 (“void”, “.子程序”, , , 假)
k2.替换子文本 (“,”, #换行符, , , 假)
k2.替换子文本 (“(”, #换行符, , 1, 假)
位置1 = k2.倒找文本 (“)”, , 真)
.如果真 (位置1 ≠ -1)
k2.替换文本 (位置1, 1, “”)
.如果真结束
str = “”
s = k2.分割文本 (#换行符, )
.计次循环首 (取数组成员数 (s), i)
s2 = 分割文本 (删首尾空 (s [i]), “ ”, )
.如果 (取文本右边 (s2 [2], 1) = “]”)
s2 [2] = 文本_最右标识取左 (s2 [2], “[”)
参考数组 = “, 数组”
.否则
参考数组 = “”