易语言半角文本型字符串大小写随机打乱源码

CNWTEPRG

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. 
   
5. .程序集 窗口程序集_启动窗口
   
6. 
   
7. .子程序 __启动窗口_创建完毕
   
8. 
   
9. 置随机数种子 ()
   
10. .计次循环首 (8, )
    
11.     调试输出 (大小写随机打乱 (“Hello World! 中文测试0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”))
    
12. .计次循环尾 ()
    
13. 结束 ()
    
14. 
    
15. .子程序 大小写随机打乱, 文本型
    
16. .参数 文本, 文本型
    
17. .局部变量 计数, 整数型
    
18. .局部变量 单个文本, 文本型
    
19. .局部变量 返回值, 文本型
    
20. 
    
21. .计次循环首 (取文本长度 (文本), 计数)
    
22.     单个文本 ＝ 取文本中间 (文本, 计数, 1)
    
23.     .判断开始 (位与 (取随机数 (0, 255), 128) ＝ 128)
    
24.         返回值 ＝ 返回值 ＋ 到大写 (单个文本)
    
25.     .默认
    
26.         返回值 ＝ 返回值 ＋ 到小写 (单个文本)
    
27.     .判断结束
    
28. 
    
29. .计次循环尾 ()
    
30. 返回 (返回值)
    
31. 
    

复制代码

66大顺

我也顶1帖

地图

我也路过。

Anonymous

路过好了。

demon

帮顶，这种,,,用来验证码???