.版本 2.支持库 spec.程序集 窗口程序集_启动窗口.子程序 文本_字数统计, 整数型, 公开, 用word方式计算正文字数,返回文本字数,汉字算一个,单词算一个,换行符和空格不算..参数 文本, 文本型, , 需要统计的文本.局部变量 c, 整数型.局部变量 n, 整数型.局部变量 z, 整数型.局部变量 返回文本, 文本型.局部变量 临时字节集, 字节集.局部变量 i, 整数型.局部变量 跳, 逻辑型临时字节集 ＝ 到字节集 (文本)c ＝ 取字节集长度 (临时字节集)n ＝ 1.判断循环首 (n ≤ c) .如果 (n ＋ 1 ＞ c) z ＝ 1 .否则 .如果 (临时字节集 [n] ＞ 128) z ＝ 2 i ＝ i ＋ 1 跳 ＝ 假 .否则 .如果 (临时字节集 [n] ≠ 13) z ＝ 1 .如果 (临时字节集 [n] ＝ 32) 跳 ＝ 假 .否则 .如果真 (跳 ＝ 假) i ＝ i ＋ 1 .如果真结束 跳 ＝ 真 .如果结束 .否则 .如果 (临时字节集 [n ＋ 1] ＝ 10) z ＝ 2 .否则 z ＝ 1 .如果结束 跳 ＝ 假 .如果结束 .如果结束 .如果结束 n ＝ n ＋ z.判断循环尾 ()返回 (i).子程序 _统计按钮_被单击调试输出 (“开始”)线程_启动 (&子程序2, , )线程_启动 (&子程序1, , ).子程序 子程序1.局部变量 t, 整数型.局部变量 i, 整数型.局部变量 d, 整数型.局部变量 内容, 文本型t ＝ 取启动时间 ()内容 ＝ 编辑框1.内容.计次循环首 (100, i) d ＝ 文本_字数统计 (内容).计次循环尾 ()t ＝ 取启动时间 () － t调试输出 (2, t, d)总字数标签.标题 ＝ 到文本 (d).子程序 子程序2.局部变量 t, 整数型.局部变量 i, 整数型.局部变量 d, 整数型.局部变量 内容, 文本型t ＝ 取启动时间 ()内容 ＝ 编辑框1.内容.计次循环首 (100, i) d ＝ 字数统计js (内容).计次循环尾 ()t ＝ 取启动时间 () － t调试输出 (1, t, d).子程序 字数统计js, 整数型, , 此代码由精易网页调试助手生成代码，配合精易模块使用。.参数 文本, 文本型.局部变量 结果, 文本型线程_初始化COM库 ()结果 ＝ 编码_运行JS代码 (#字数统计js, “fnGetCpmisWords”, 文本, , , )线程_取消COM库 ()返回 (到整数 (结果))
