2字拼音密码字典生成方法E语言程序源码。

123

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 窗口程序集_启动窗口
   
5. .程序集变量 计数, 整数型
   
6. .程序集变量 计数2, 整数型
   
7. .程序集变量 汉字, 文本型
   
8. .程序集变量 拼音, 文本型
   
9. .程序集变量 发音数目, 整数型
   
10. .程序集变量 发音计数, 整数型
    
11. .程序集变量 所有拼音, 文本型, , "0"
    
12. .程序集变量 拼音数, 整数型
    
13. .程序集变量 拼音字典, 文本型
    
14. 
    
15. .子程序 __启动窗口_创建完毕
    
16. 
    
17. .变量循环首 (-32768, 32767, 1, 计数)
    
18.     汉字 ＝ 到文本 (到字节集 (到短整数 (计数)))
    
19.     发音数目 ＝ 取发音数目 (汉字)
    
20.     .计次循环首 (发音数目, 发音计数)
    
21.         拼音 ＝ 取拼音 (汉字, 发音计数)
    
22.         .如果真 (读环境变量 (拼音) ＝ “”)
    
23.             写环境变量 (拼音, 拼音)
    
24.             加入成员 (所有拼音, 拼音)
    
25.         .如果真结束
    
26. 
    
27.     .计次循环尾 ()
    
28. .变量循环尾 ()
    
29. 拼音数 ＝ 取数组成员数 (所有拼音)
    
30. 输出调试文本 (拼音数)
    
31. .计次循环首 (拼音数, 计数)
    
32.     .计次循环首 (拼音数, 计数2)
    
33.         拼音字典 ＝ 拼音字典 ＋ 所有拼音 [计数] ＋ 所有拼音 [计数2] ＋ #换行符
    
34.     .计次循环尾 ()
    
35.     输出调试文本 (计数, 拼音数)
    
36. .计次循环尾 ()
    
37. 写到文件 (“密码字典_2字拼音.txt”, 到字节集 (拼音字典))
    
38. 结束 ()
    
39. 
    
40. 
    

复制代码

demon

我来看看，顺便暖贴。

demon

跑了十分钟。。

demon

楼主代码运行慢的问题在于，大文本的相加

1. 拼音字典 ＝ 拼音字典 ＋ 所有拼音 [计数] ＋ 所有拼音 [计数2] ＋ #换行符

复制代码

楼主这段代码，在文本愈来愈多的时候速度会显得越来越慢，居然用了十分钟。然后楼主可以试试我这个。两秒跑完，有颜色的是我加的，主要是紫色部分。楼主可以看看，ps：好吧，颜色显示不出来。我在原来想标紫色的后面加上备注好了。

1. .版本 2
   
2. .支持库 shell
   
3. .支持库 spec
   
4. 
   
5. .程序集 程序集1
   
6. .程序集变量 计数, 整数型
   
7. .程序集变量 计数2, 整数型
   
8. .程序集变量 汉字, 文本型
   
9. .程序集变量 拼音, 文本型
   
10. .程序集变量 发音数目, 整数型
    
11. .程序集变量 发音计数, 整数型
    
12. .程序集变量 所有拼音, 文本型, , "0"
    
13. .程序集变量 拼音数, 整数型
    
14. .程序集变量 拼音字典, 文本型, , "0"
    
15. .程序集变量 文本, 文本型
    
16. 
    
17. .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
    
18. .局部变量 a, 整数型
    
19. 
    
20. a ＝ 取启动时间 ()
    
21. .变量循环首 (-32768, 32767, 1, 计数)
    
22.     汉字 ＝ 到文本 (到字节集 (到短整数 (计数)))
    
23.     发音数目 ＝ 取发音数目 (汉字)
    
24.     .计次循环首 (发音数目, 发音计数)
    
25.         拼音 ＝ 取拼音 (汉字, 发音计数)
    
26.         .如果真 (读环境变量 (拼音) ＝ “”)
    
27.             写环境变量 (拼音, 拼音)
    
28.             加入成员 (所有拼音, 拼音)
    
29.         .如果真结束
    
30. 
    
31.     .计次循环尾 ()
    
32. .变量循环尾 ()
    
33. 拼音数 ＝ 取数组成员数 (所有拼音)
    
34. ' 调试输出 (拼音数)
    
35. 重定义数组 (拼音字典, 假, 拼音数)'这里是我标紫色部分!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    
36. .计次循环首 (拼音数, 计数)
    
37.     .计次循环首 (拼音数, 计数2)
    
38.         拼音字典 [计数] ＝ 拼音字典 [计数] ＋ 所有拼音 [计数] ＋ 所有拼音 [计数2] ＋ #换行符'这里是我标紫色部分!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    
39.     .计次循环尾 ()
    
40.     文本 ＝ 文本 ＋ 拼音字典 [计数]'这里是我标紫色部分!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    
41.     ' 调试输出 (计数, 拼音数)
    
42. .计次循环尾 ()
    
43. 写到文件 (取特定目录 (#系统桌面) ＋ “密码字典_2字拼音1.txt”, 到字节集 (文本))
    
44. 调试输出 (“生成到写出文件用时”, 取启动时间 () － a)
    
45. 返回 (0)  ' 可以根据您的需要返回任意数值
    

复制代码

星期零

我也看看啥玩意了。