觅风论坛

标题: 易语言防止软件被抓包Hook源码V2.0分享-附带调用源码 [打印本页]

---

作者: 476572199    时间: 6 小时前
标题: 易语言防止软件被抓包Hook源码V2.0分享-附带调用源码
下面是实例调用源码分享：

1. .版本 2
   
2. 
   
3. .程序集 窗口程序集_启动窗口
   
4. 
   
5. .子程序 __启动窗口_创建完毕
   
6. .局部变量 初始化结果, 逻辑型
   
7.    
   
8.     ' 初始化防抓包系统
   
9.     初始化结果 ＝ 初始化防抓包系统 ()
   
10.    
    
11.     .如果 (初始化结果)
    
12.         标签_状态.标题 ＝ “【安全】防护已启动”
    
13.         标签_状态.文本颜色 ＝ #绿色
    
14.     .否则
    
15.         标签_状态.标题 ＝ “【警告】检测到不安全环境！”
    
16.         标签_状态.文本颜色 ＝ #红色
    
17.     .如果结束
    
18. 
    
19. .子程序 _按钮_加密_被单击
    
20. .局部变量 原始文本, 文本型
    
21. .局部变量 加密后字节集, 字节集
    
22. .局部变量 加密后文本, 文本型
    
23. .局部变量 解密后字节集, 字节集
    
24. .局部变量 解密后文本, 文本型
    
25.    
    
26.     ' 获取原始文本
    
27.     原始文本 ＝ 编辑框_原文.内容
    
28.    
    
29.     .如果真 (原始文本 ＝ “”)
    
30.         信息框 (“请输入要加密的文本！”, #错误图标, “提示”, )
    
31.         返回 ()
    
32.     .如果真结束
    
33.    
    
34.     ' 加密数据
    
35.     加密后字节集 ＝ 加密关键数据 (到字节集 (原始文本), “MyPassword123”)
    
36.    
    
37.     ' 显示加密结果
    
38.     加密后文本 ＝ 数据加密到文本 (加密后字节集)
    
39.     编辑框_加密后.内容 ＝ 加密后文本
    
40.    
    
41.     ' 测试解密
    
42.     解密后字节集 ＝ 解密数据 (加密后字节集, “MyPassword123”)
    
43.     解密后文本 ＝ 到文本 (解密后字节集)
    
44.     编辑框_解密后.内容 ＝ 解密后文本
    
45. 
    
46. .子程序 _按钮_检测环境_被单击
    
47.    
    
48.     .如果 (反调试检测 ())
    
49.         标签_调试状态.标题 ＝ “调试状态：正常”
    
50.     .否则
    
51.         标签_调试状态.标题 ＝ “调试状态：检测到调试器！”
    
52.     .如果结束
    
53.    
    
54.     .如果 (检测网络抓包工具 ())
    
55.         标签_抓包状态.标题 ＝ “抓包工具：未检测到”
    
56.     .否则
    
57.         标签_抓包状态.标题 ＝ “抓包工具：检测到抓包工具！”
    
58.     .如果结束
    
59. 
    
60. .子程序 __启动窗口_将被销毁
    
61.     安全退出 ()

复制代码

下面是源码：

---

欢迎光临 觅风论坛 (https://www.eyyba.com/)

Powered by Discuz! X3.4