易语言实现控制台文本自动转义 批处理echo转义 可显示、处理任意特殊符号

a1a2dnp

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
   
8. .局部变量 字符, 文本型
   
9. 
   
10. 置随机数种子 ()
    
11. 字符 ＝ 随机字符 ()
    
12. 标准输出 (, 字符 ＋ #换行符)
    
13. 调试输出 (控制台文本转义 (字符))
    
14. 运行 (“cmd /c echo ” ＋ 控制台文本转义 (字符), 真, )
    
15. 运行 (“cmd /c pause”, 真, )
    
16. 
    
17. 返回 (0)  ' 可以根据您的需要返回任意数值
    
18. 
    
19. .子程序 随机字符, 文本型
    
20. .局部变量 允许出现的字符, 文本型
    
21. .局部变量 文本, 文本型
    
22. 
    
23. 允许出现的字符 ＝ “0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz^!#$%&'()*+,-./:;<=>?@[\]_`{|}~” ＋ #引号
    
24. .计次循环首 (64, )
    
25.     文本 ＝ 文本 ＋ 取文本中间 (允许出现的字符, 取随机数 (1, 取文本长度 (允许出现的字符)), 1)
    
26. .计次循环尾 ()
    
27. 返回 (文本)
    
28. 
    
29. .子程序 控制台文本转义, 文本型, 公开
    
30. .参数 文本, 文本型
    
31. .局部变量 计数, 整数型
    
32. .局部变量 单字符, 文本型
    
33. .局部变量 文本2, 文本型
    
34. 
    
35. 文本2 ＝ 文本
    
36. .计次循环首 (7, 计数)
    
37.     单字符 ＝ 取文本中间 (“^%&*<>|”, 计数, 1)
    
38.     文本2 ＝ 子文本替换 (文本2, 单字符, “^” ＋ 单字符, , , 真)
    
39. .计次循环尾 ()
    
40. 返回 (文本2)
    
41. 
    

复制代码

4面8方

占个沙发。

Anonymous

板凳我的

Cute

地板也是我的