|
- .版本 2
- .支持库 spec
- .程序集 窗口程序集_启动窗口
- .程序集变量 拼音表, 文本型, , "0"
- .程序集变量 汉字表, 文本型, , "0"
- .子程序 __启动窗口_创建完毕
- .局部变量 A, 整数型
- .局部变量 B, 整数型
- .局部变量 汉字, 文本型
- .局部变量 计数, 整数型
- .局部变量 发音数, 整数型
- 输出调试文本 (“正在初始化...”)
- .变量循环首 (0, 255, 1, A)
- .变量循环首 (0, 255, 1, B)
- 汉字 = 到文本 (到字节集 (到字节 (A)) + 到字节集 (到字节 (B)))
- .如果真 (取拼音 (汉字, 1) ≠ “”)
- 发音数 = 取发音数目 (汉字)
- .计次循环首 (发音数, 计数)
- 加入成员 (拼音表, 取拼音 (汉字, 计数))
- 加入成员 (汉字表, 汉字)
- .计次循环尾 ()
- .如果真结束
- .变量循环尾 ()
- .变量循环尾 ()
- 输出调试文本 (“初始化完成!”)
- .子程序 _编辑框1_内容被改变
- .局部变量 计数, 整数型
- .局部变量 汉字表1, 文本型, , "0"
- .局部变量 汉字表2, 文本型, , "0"
- .局部变量 拼音, 文本型
- 重定义数组 (汉字表1, 假, 0)
- 拼音 = 编辑框1.内容
- .如果真 (拼音 ≠ “”)
- .计次循环首 (取数组成员数 (拼音表), 计数)
- .判断开始 (拼音表 [计数] = 拼音 且 取发音数目 (汉字表 [计数]) = 1)
- 加入成员 (汉字表1, 汉字表 [计数])
- .判断 (拼音表 [计数] ≈ 拼音)
- 加入成员 (汉字表2, 汉字表 [计数])
- .默认
- .判断结束
- .计次循环尾 ()
- .如果真结束
- 调试输出 (拼音, 汉字表1, 汉字表2)
复制代码
|
|