| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_创建完毕 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 内容 | 文本型 | |||||
| 临时文本 | 文本型 | |||||
| 临时数组1 | 文本型 | 0 | ||||
| 临时数组2 | 文本型 | 0 | ||||
| X | 整数型 | |||||
| Y | 整数型 | |||||
| 临时信息 | 统计 | |||||
| 全部信息 | 统计 | 0 | ||||
| 计次 | 整数型 | |||||
内容 ＝ 文本_取出文本中汉字 (内容)
文本_逐字分割 (内容, 临时数组1)
临时文本 ＝ 文本_去重复文本 (内容, )
文本_逐字分割 (临时文本, 临时数组2)
计次循环首 (取数组成员数 (临时数组2), X)
临时信息.字符名 ＝ 临时数组2 [X]重定义数组 (临时信息.位置, 假, 0)计次循环首 (取数组成员数 (临时数组1), Y)
如果真 (临时数组1 [Y] ＝ 临时数组2 [X])加入成员 (临时信息.位置, Y)
计次循环尾 ()加入成员 (全部信息, 临时信息)计次循环尾 ()计次循环首 (取数组成员数 (全部信息), X)计次 ＝ 0调试输出 (全部信息 [X].字符名, “下面是出现位置”)计次循环首 (取数组成员数 (全部信息 [X].位置), Y)计次 ＝ 计次 ＋ 1调试输出 (全部信息 [X].位置 [Y])计次循环尾 ()计次循环尾 ()' 下面是自定义类型
| 数据类型名 | 公开 | 备 注 | ||||
| 统计 | ||||||
| 成员名 | 类 型 | 传址 | 数组 | 备 注 | ||
| 字符名 | 文本型 | |||||
| 位置 | 整数型 | 1 | ||||
| i支持库列表 | 支持库注释 |
| spec | 特殊功能支持库 |
