易语言ROT13文本型字符串转换加密源码 字母回转13位(不区分大小写) 置入代码实现

CNWTEPRG

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. 
   
10. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 _临时子程序
    
14. .局部变量 A, 文本型
    
15. 
    
16. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
17. A ＝ “Hello World! 中文测试”
    
18. ROT13 (A)
    
19. 调试输出 (A)
    
20. 
    
21. 
    
22. .子程序 ROT13, , , 字母回转13位(不区分大小写)
    
23. .参数 欲变换的文本, 文本型, 参考
    
24. 
    
25. 置入代码 ({ 139, 93, 8, 139, 27, 138, 3, 10, 192, 117, 4, 235, 45, 235, 38, 60, 65, 114, 4, 60, 77, 118, 8, 60, 97, 114, 8, 60, 109, 119, 4, 4, 13, 235, 18, 60, 78, 114, 4, 60, 90, 118, 8, 60, 110, 114, 6, 60, 122, 119, 2, 44, 13, 136, 3, 67, 235, 203, 201, 194, 4, 0 })
    
26. ' mov ebx,[ebp+8]
    
27. ' mov ebx,[ebx]
    
28. ' START:
    
29. ' mov al,[ebx]
    
30. ' .if al == 0
    
31. ' jmp ASM_END
    
32. ' .elseif al >=65 && al <=77 || al >=97 && al <=109
    
33. ' add al,13
    
34. ' .elseif al >=78 && al <=90 || al>=110 && al <=122
    
35. ' sub al,13
    
36. ' .endif
    
37. ' mov [ebx],al
    
38. ' inc ebx
    
39. ' JMP START
    
40. ' ASM_END:
    
41. ' leave
    
42. ' retn 4
    

复制代码

1心1亿

只知道写这玩意的都拿去了装b