易语言实现字节集的 \xHH 编码,可在C语言,C++,PHP 等语言的双引号内使用 (返回文本型)

CNWTEPRG

1. .版本 2
   
2. 
   
3. .程序集 程序集1
   
4. 
   
5. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
6. 
   
7. 
   
8. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
9. 返回 (0)  ' 可以根据您的需要返回任意数值
   
10. 
    
11. .子程序 _临时子程序
    
12. 
    
13. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
14. 信息框 (字节集_xHH编码 (到字节集 (“Hello World! 中文测试”)), 0, , )
    
15. 
    
16. .子程序 字节集_xHH编码, 文本型, 公开, 编码后可在C语言、C++、PHP等双引号内使用
    
17. .参数 数据, 字节集
    
18. .局部变量 长度, 整数型
    
19. .局部变量 文件号, 整数型
    
20. .局部变量 位置, 整数型
    
21. .局部变量 字节, 字节型
    
22. .局部变量 返回值, 文本型
    
23. 
    
24. 长度 ＝ 取字节集长度 (数据)
    
25. .如果真 (长度 ≤ 0)
    
26.     返回 (“”)
    
27. .如果真结束
    
28. 文件号 ＝ 打开内存文件 ()
    
29. .计次循环首 (长度, 位置)
    
30.     字节 ＝ 数据 [位置]
    
31.     写出文本 (文件号, “\x” ＋ 字符 (i (右移 (字节, 4))) ＋ 字符 (i (字节)))
    
32. .计次循环尾 ()
    
33. 移动读写位置 (文件号, #文件首, 0)
    
34. 返回值 ＝ 读入文本 (文件号, 取文件长度 (文件号))
    
35. 关闭文件 (文件号)
    
36. 返回 (返回值)
    
37. 
    
38. 
    
39. .子程序 i, 字节型
    
40. .参数 i, 字节型, , 输入 0~9 返回:48~57 输入:10~15 返回:65~70 范围:0~15 只取低4位
    
41. 
    
42. 置入代码 ({ 138, 69, 8, 36, 15, 60, 9, 119, 4, 4, 48, 235, 2, 4, 55, 15, 182, 192, 201, 194, 4, 0 })
    
43. ' mov al,[ebp+8]
    
44. ' and al,15
    
45. ' .if al <= 9
    
46. ' add al,30H
    
47. ' .else
    
48. ' add al,37H
    
49. ' .endif
    
50. ' movzx eax,al
    
51. ' leave
    
52. ' retn 4
    
53. 返回 (0)
    

复制代码