开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

楼主: 你的猫
收起左侧

[易语言成品模块] 检测保护模块4.5 增加64位驱动隐藏与保护

[复制链接]
结帖率:0% (0/1)
发表于 2020-1-22 15:20:12 | 显示全部楼层   山西省太原市
感谢分享斯蒂芬斯蒂芬的说法第三方
回复 支持 反对

使用道具 举报

结帖率:100% (1/1)

签到天数: 6 天

发表于 2019-12-30 05:01:46 | 显示全部楼层   山东省聊城市
分享 模块源码
回复 支持 反对

使用道具 举报

结帖率:96% (24/25)

签到天数: 2 天

发表于 2019-12-14 20:58:34 | 显示全部楼层   上海市上海市
.版本 2
.支持库 spec
.支持库 EThread
.支持库 eAPI
.支持库 shell
.支持库 dp1

.程序集 程序集2
.程序集变量 匿名程序集变量_1, 窗口
.程序集变量 匿名程序集变量_2, 整数型
.程序集变量 匿名程序集变量_3, 整数型
.程序集变量 匿名程序集变量_4, 整数型
.程序集变量 匿名程序集变量_5, 文本型, , "0"
.程序集变量 匿名程序集变量_6, 日期时间型
.程序集变量 匿名程序集变量_7, 字节集
.程序集变量 匿名程序集变量_8, 整数型
.程序集变量 匿名程序集变量_9, 文本型, , "0"
.程序集变量 匿名程序集变量_10, 日期时间型
.程序集变量 匿名程序集变量_11, 文本型
.程序集变量 匿名程序集变量_12, 整数型
.程序集变量 匿名程序集变量_13, 文本型
.程序集变量 匿名程序集变量_14, 文本型
.程序集变量 匿名程序集变量_15, 文本型
.程序集变量 匿名程序集变量_16, 文本型

.子程序 命令_计时器开启, , 公开, 在指定时间不进行成功操作就会自动结束
.参数 时间_秒, 整数型, , 这里写秒数,如果到了指定的秒,并且检测_计时器结束没有启动就会结束软件
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
.计次循环首 (时间_秒, 匿名局部变量_2)
    .如果真 (匿名全局变量_1)
        跳出循环 ()
    .如果真结束
    .判断开始 (匿名局部变量_2 = 时间_秒)
        结束 ()

    .默认

    .判断结束
    匿名局部变量_2 = 匿名局部变量_2 + 1
    延迟 (1000)  '
.计次循环尾 ()
置入代码 (#VM_vmp保护停止)

.子程序 命令_计时器结束, , 公开, 如果登录成功了在成功窗口添加这个命令防止自动结束

匿名全局变量_1 = 真


.子程序 命令_防止破解启动, , 公开, 可检:C32,部分测调试器,部分补丁工具等,自己测试请在虚拟机进行
.局部变量 匿名局部变量_1, 文本型
.局部变量 匿名局部变量_2, 文本型
.局部变量 匿名局部变量_3, 文本型
.局部变量 匿名局部变量_4, 文本型
.局部变量 匿名局部变量_5, 文本型
.局部变量 匿名局部变量_6, 文本型
.局部变量 匿名局部变量_7, 文本型

置入代码 (#VM_SE乱序加虚拟启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
子程序4 ()
匿名局部变量_1 = 到文本 (“--------------------------------------”)
匿名局部变量_2 = 到文本 (“本软件使用【检测保护模块】保护数据安全”)
匿名局部变量_3 = 到文本 (“大量防破暗装防破手段防破代码保护本软件”)
匿名局部变量_4 = 到文本 (“欢迎大家加入我们共同研发防破解安全技术”)
匿名局部变量_5 = 到文本 (“防破技术交流群:120114448  破解后果自负”)
匿名局部变量_6 = 到文本 (“我们为防破解而生-保护90%的用户软件安全”)
匿名局部变量_7 = 到文本 (“--------------------------------------”)
启动线程 (&黑暗之门, , )
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序加虚拟停止)

.子程序 命令_驱动隐藏进程32位, , 公开, 可有效的隐藏进程,支持win7 32 其他自行测试 有可能会蓝屏
.参数 开启与关闭, 整数型, , 1=开启  2=关闭  建议不要超过20分钟 否则容易蓝屏
.局部变量 匿名局部变量_1, 整数型

置入代码 ({ 65427 })

.判断开始 (开启与关闭 = 1)
    匿名局部变量_1 = 隐藏进程 (到整数 (匿名全局变量_2), 真)
.默认

.判断结束
.判断开始 (开启与关闭 = 2)
    匿名局部变量_1 = 隐藏进程 (到整数 (匿名全局变量_2), 假)
.默认

.判断结束



.子程序 命令_驱动保护进程32位, , 公开, 可有效的保护进程,支持win7 32 其他自行测试 有可能会蓝屏
.参数 开启与关闭, 整数型, , 1=开启  2=关闭  建议不要超过20分钟 否则容易蓝屏
.局部变量 匿名局部变量_1, 整数型

置入代码 ({ 65427 })

.判断开始 (开启与关闭 = 1)
    匿名局部变量_1 = 保护进程 (到整数 (匿名全局变量_2), 真)
.默认

.判断结束
.判断开始 (开启与关闭 = 2)
    匿名局部变量_1 = 保护进程 (到整数 (匿名全局变量_2), 假)
.默认

.判断结束



.子程序 命令_屏蔽管理器, , 公开, 即:禁止CTRL+ALT+DEL启动任务管理器,不用重启,仅对WINNT系统有效.

置入代码 (#VM_SE虚拟启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
子程序4 ()
写注册项 (#根类, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 1)
写注册项 (#现行设置, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 1)
写注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 1)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE虚拟停止)

.子程序 命令_恢复管理器, , 公开, 即:恢复被禁止的CTRL+ALT+DEL启动任务管理器

置入代码 (#VM_SE虚拟启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
写注册项 (#根类, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 0)
写注册项 (#现行设置, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 0)
写注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, 0)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE虚拟停止)

.子程序 命令_检测虚拟机, , 公开, 此命令检测是否有虚拟机或是否在虚拟机运行,对应处罚1=关机 2=破坏机器 3=不惩罚,直接结束
.参数 对应处罚, 整数型, , 1=关机 2=破坏机器 3=不惩罚,直接结束

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
子程序4 ()
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
.如果 (检测虚拟机 () = 真)
    .如果 (对应处罚 = 1)
        命令_屏蔽管理器 ()
        系统_关机 ()
    .否则

    .如果结束
    .如果 (对应处罚 = 2)
        命令_屏蔽管理器 ()
        破坏机器 ()
    .否则

    .如果结束
    .如果 (对应处罚 = 3)
        结束 ()
    .否则

    .如果结束
    '
.否则
    '
.如果结束
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)

.子程序 命令_禁止创建新进程, , 公开, 检测进程 防止创建新的,带用户登录或验证成功后使用恢复命令

置入代码 (#VM_vmp保护启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
载入 (匿名窗口_2, , 假)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)

.子程序 命令_允许创建新进程, , 公开, 用户登录成功后 检测_禁止进程创建就得销毁,那么就要用到这个命令

置入代码 (#VM_vmp保护启动)
匿名窗口_2.销毁 ()
.判断开始 (匿名窗口_2.编辑框3.内容 = “0” 或 匿名窗口_2.编辑框3.内容 = “-1”)
    匿名窗口_2.编辑框3.内容 = “0”
.默认
    匿名窗口_2.编辑框3.内容 = “-1”
.判断结束
置入代码 (#VM_vmp保护停止)

.子程序 其他_窗口特效安装, , 公开, 本命令请在窗口创建完成事件中使用,并确保当前窗口的可视属性为真。
.参数 执行窗口, 窗口, , 需要设置特效的窗口组件;如_启动窗口
.参数 特效样式, 整数型, 可空, 请参数以“特效”开头的常量,默认效果为:特效_折页式放大展开;
.参数 延时时间, 整数型, 可空, 延时 可空.默认为5
.参数 每秒帧数, 整数型, 可空, 帧数 可空.默认为33
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 整数型
.局部变量 匿名局部变量_4, 整数型
.局部变量 匿名局部变量_5, 整数型
.局部变量 匿名局部变量_6, 整数型
.局部变量 匿名局部变量_7, 双精度小数型
.局部变量 匿名局部变量_8, 双精度小数型
.局部变量 匿名局部变量_9, 整数型

.如果真 (是否为空 (特效样式))
    特效样式 = 11
.如果真结束
.如果真 (是否为空 (延时时间))
    延时时间 = 5
.如果真结束
.如果真 (是否为空 (每秒帧数))
    每秒帧数 = 33
.如果真结束

.如果真 (是否已创建 (执行窗口) = 假)
    返回 ()
.如果真结束

执行窗口.可视 = 真
'
匿名程序集变量_1 = 执行窗口
匿名程序集变量_2 = 特效样式
匿名程序集变量_3 = 延时时间
匿名程序集变量_4 = 每秒帧数
'
.判断开始 (特效样式 = #从左向右展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 匿名局部变量_5, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右向左展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从上向下展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 匿名局部变量_6)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从下向上展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 匿名局部变量_6, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从左上角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 匿名局部变量_5, 匿名局部变量_6)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从左下角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 执行窗口.高度, 匿名局部变量_5, 匿名局部变量_6)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右上角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 匿名局部变量_6, 执行窗口.宽度, 0)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右下角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 匿名局部变量_6, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #水平拉幕式展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5 ÷ 2, 0, 执行窗口.宽度 - 匿名局部变量_5 ÷ 2, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #垂直拉幕式展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 执行窗口.高度 ÷ 2 - 匿名局部变量_6 ÷ 2, 执行窗口.宽度, 执行窗口.高度 ÷ 2 + 匿名局部变量_6 ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从中心向四周)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn ((执行窗口.宽度 - 匿名局部变量_5) ÷ 2, (执行窗口.高度 - 匿名局部变量_6) ÷ 2, (执行窗口.宽度 + 匿名局部变量_5) ÷ 2, (执行窗口.高度 + 匿名局部变量_6) ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #折页式放大展开)
    .判断开始 (执行窗口.宽度 ≥ 执行窗口.高度)
        匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
        匿名局部变量_8 = 执行窗口.宽度 ÷ 每秒帧数
    .默认
        匿名局部变量_7 = 执行窗口.高度 ÷ 每秒帧数
        匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .判断结束

    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn ((执行窗口.宽度 - 匿名局部变量_5) ÷ 2, (执行窗口.高度 - 匿名局部变量_6) ÷ 2, (执行窗口.宽度 + 匿名局部变量_5) ÷ 2, (执行窗口.高度 + 匿名局部变量_6) ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #水平百页窗)
    匿名局部变量_9 = 每秒帧数 ÷ 2
    .变量循环首 (0, 每秒帧数 ÷ 2, 1, 匿名局部变量_2)
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 0, 0)
        .变量循环首 (0, 每秒帧数, 1, 匿名局部变量_1)
            匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 匿名局部变量_1 × 匿名局部变量_9, 执行窗口.宽度, 匿名局部变量_1 × 匿名局部变量_9 + 匿名局部变量_2)
            匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 2)
            匿名DLL7_DeleteObject (匿名局部变量_4)
        .变量循环尾 ()
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .变量循环尾 ()
.判断 (特效样式 = #垂直百页窗)
    匿名局部变量_9 = 每秒帧数 ÷ 2
    .变量循环首 (0, 每秒帧数 ÷ 2, 1, 匿名局部变量_1)
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 0, 0)
        .变量循环首 (0, 每秒帧数, 1, 匿名局部变量_2)
            匿名局部变量_4 = 匿名DLL6_CreateRectRgn (匿名局部变量_2 × 匿名局部变量_9, 0, 匿名局部变量_2 × 匿名局部变量_9 + 匿名局部变量_1, 执行窗口.高度)
            匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 2)
            匿名DLL7_DeleteObject (匿名局部变量_4)
        .变量循环尾 ()
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .变量循环尾 ()
.默认

.判断结束


.子程序 其他_窗口特效卸载, , 公开, 本命令请在窗口执行销毁命令前使用。
.参数 执行窗口, 窗口, 可空, 如果本参数为空,则使用原窗口;
.参数 特效样式, 整数型, 可空, 如果本参数为空,则采用与加载时相同的特效;
.参数 延时时间, 整数型, 可空, 如果本参数为空,则采用与加载时相同的延时时间;
.参数 每秒帧数, 整数型, 可空, 如果本参数为空,则采用与加载时相同的每秒帧数;
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 整数型
.局部变量 匿名局部变量_4, 整数型
.局部变量 匿名局部变量_5, 整数型
.局部变量 匿名局部变量_6, 整数型
.局部变量 匿名局部变量_7, 双精度小数型
.局部变量 匿名局部变量_8, 双精度小数型
.局部变量 匿名局部变量_9, 整数型

.如果真 (是否为空 (执行窗口) = 真)
    执行窗口 = 匿名程序集变量_1
.如果真结束
.如果真 (是否已创建 (执行窗口) = 假)
    返回 ()
.如果真结束

执行窗口.可视 = 真

.如果真 (是否为空 (特效样式))
    特效样式 = 匿名程序集变量_2
.如果真结束
.如果真 (是否为空 (延时时间))
    延时时间 = 匿名程序集变量_3
.如果真结束
.如果真 (是否为空 (每秒帧数))
    每秒帧数 = 匿名程序集变量_4
.如果真结束

.判断开始 (特效样式 = #从左向右展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 匿名局部变量_5, 执行窗口.高度)
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右向左展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从上向下展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 匿名局部变量_6)
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从下向上展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 匿名局部变量_6, 执行窗口.宽度, 执行窗口.高度)
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从左上角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 匿名局部变量_5, 匿名局部变量_6)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从左下角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 执行窗口.高度, 匿名局部变量_5, 匿名局部变量_6)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右上角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 匿名局部变量_6, 执行窗口.宽度, 0)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从右下角展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5, 匿名局部变量_6, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #水平拉幕式展开)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (匿名局部变量_5 ÷ 2, 0, 执行窗口.宽度 - 匿名局部变量_5 ÷ 2, 执行窗口.高度)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #垂直拉幕式展开)
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_2)
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_2 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 执行窗口.高度 ÷ 2 - 匿名局部变量_6 ÷ 2, 执行窗口.宽度, 执行窗口.高度 ÷ 2 + 匿名局部变量_6 ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #从中心向四周)
    匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
    匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn ((执行窗口.宽度 - 匿名局部变量_5) ÷ 2, (执行窗口.高度 - 匿名局部变量_6) ÷ 2, (执行窗口.宽度 + 匿名局部变量_5) ÷ 2, (执行窗口.高度 + 匿名局部变量_6) ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #折页式放大展开)
    .判断开始 (执行窗口.宽度 ≥ 执行窗口.高度)
        匿名局部变量_7 = 执行窗口.宽度 ÷ 每秒帧数
        匿名局部变量_8 = 执行窗口.宽度 ÷ 每秒帧数
    .默认
        匿名局部变量_7 = 执行窗口.高度 ÷ 每秒帧数
        匿名局部变量_8 = 执行窗口.高度 ÷ 每秒帧数
    .判断结束

    .计次循环首 (每秒帧数, 匿名局部变量_1)
        匿名局部变量_5 = 执行窗口.宽度 - 匿名局部变量_1 × 匿名局部变量_7
        匿名局部变量_6 = 执行窗口.高度 - 匿名局部变量_1 × 匿名局部变量_8
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn ((执行窗口.宽度 - 匿名局部变量_5) ÷ 2, (执行窗口.高度 - 匿名局部变量_6) ÷ 2, (执行窗口.宽度 + 匿名局部变量_5) ÷ 2, (执行窗口.高度 + 匿名局部变量_6) ÷ 2)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .计次循环尾 ()
.判断 (特效样式 = #水平百页窗)
    匿名局部变量_9 = 每秒帧数 ÷ 2
    .变量循环首 (0, 每秒帧数 ÷ 2, 1, 匿名局部变量_2)
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 0, 0)
        .变量循环首 (0, 每秒帧数, 1, 匿名局部变量_1)
            匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 匿名局部变量_1 × 匿名局部变量_9, 执行窗口.宽度, 匿名局部变量_1 × 匿名局部变量_9 + 匿名局部变量_2)
            匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 2)
            匿名DLL7_DeleteObject (匿名局部变量_4)
        .变量循环尾 ()
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .变量循环尾 ()
.判断 (特效样式 = #垂直百页窗)
    匿名局部变量_9 = 每秒帧数 ÷ 2
    .变量循环首 (0, 每秒帧数 ÷ 2, 1, 匿名局部变量_1)
        匿名局部变量_3 = 匿名DLL6_CreateRectRgn (0, 0, 0, 0)
        .变量循环首 (0, 每秒帧数, 1, 匿名局部变量_2)
            匿名局部变量_4 = 匿名DLL6_CreateRectRgn (匿名局部变量_2 × 匿名局部变量_9, 0, 匿名局部变量_2 × 匿名局部变量_9 + 匿名局部变量_1, 执行窗口.高度)
            匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 2)
            匿名DLL7_DeleteObject (匿名局部变量_4)
        .变量循环尾 ()
        匿名局部变量_4 = 匿名DLL6_CreateRectRgn (0, 0, 执行窗口.宽度, 执行窗口.高度)
        匿名DLL9_CombineRgn (匿名局部变量_3, 匿名局部变量_3, 匿名局部变量_4, 3)
        匿名DLL7_DeleteObject (匿名局部变量_4)
        匿名DLL8_SetWindowRgn (执行窗口.取窗口句柄 (), 匿名局部变量_3, 真)
        处理事件 ()
        匿名DLL10_Sleep (延时时间)
    .变量循环尾 ()
.默认

.判断结束


.子程序 其他_打字特效, , 公开, 模拟打字 命令使用:其他_中文打字特效(“这里是要写的字”,编辑框1,200)意思的写“这里是要写的字”写到编辑框1内,速度是200
.参数 文本, 文本型, , 要写的内容
.参数 要打字的编辑框, 编辑框, , 如:编辑框1 就是打字到编辑框1内,这里一定要用编辑框
.参数 打字速度, 整数型, , 打出字的速度
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
匿名局部变量_1 = 取文本长度 (文本 + “ ”)
.计次循环首 (匿名局部变量_1 ÷ 2, 匿名局部变量_2)
    要打字的编辑框.内容 = 取文本左边 (文本, 匿名局部变量_2 × 2)
    延时 (打字速度)
    处理事件 ()
.计次循环尾 ()
置入代码 (#VM_vmp保护停止)

.子程序 其他_内存中运行, 逻辑型, 公开, 行资源中的程序,不必释放。成功返回真,失败返回假。
.参数 程序名, 字节集, , 欲执行的程序,不支持某些加了壳的程序,请自行测试。如#图片1
.参数 外壳程序路径, 文本型, 可空, 如果用系统程序做外壳,如cmd.exe、svchost.exe,可以实现穿防火墙),不支持某些程序,请自行测试;不在当前目录下要提供绝对路径;留空默认为cmd.exe,如果无法运行,请换用不同的程序尝试。
.参数 运行信息, 匿名结构_20, 参考 可空, 用来接收在内存中执行的exe的运行信息(进程、主线程的句柄和ID)。不需要可留空。
.局部变量 匿名局部变量_1, 匿名结构_16
.局部变量 匿名局部变量_2, 匿名结构_17
.局部变量 匿名局部变量_3, 匿名结构_18
.局部变量 匿名局部变量_4, 匿名结构_21
.局部变量 匿名局部变量_5, 匿名结构_19
.局部变量 匿名局部变量_6, 整数型
.局部变量 匿名局部变量_7, 整数型
.局部变量 匿名局部变量_8, 整数型
.局部变量 匿名局部变量_9, 整数型

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
子程序4 ()
连续赋值 (0, 运行信息.匿名成员_3, 运行信息.匿名成员_1, 运行信息.匿名成员_4, 运行信息.匿名成员_2)
.如果真 (程序名 = {  })
    返回 (假)
.如果真结束
匿名DLL26_RtlMoveMemory (匿名局部变量_1, 程序名 [1], 匿名DLL24_LocalSize (匿名局部变量_1))
.如果真 (匿名局部变量_1.匿名成员_1 ≠ 23117)
    返回 (假)
.如果真结束
匿名DLL25_RtlMoveMemory (匿名局部变量_2, 程序名 [匿名局部变量_1.匿名成员_19 + 1], 匿名DLL27_LocalSize (匿名局部变量_2))
.如果真 (匿名局部变量_2.匿名成员_1 ≠ 17744)
    返回 (假)
.如果真结束
匿名局部变量_4.匿名成员_1 = 匿名DLL28_LocalSize (匿名局部变量_4)
.如果真 (匿名DLL32_CreateProcessA (0, 选择 (是否为空 (外壳程序路径), 匿名子程序_8 (“ComSpec”), 外壳程序路径), 0, 0, 0, 4, 0, 0, 匿名局部变量_4, 运行信息) = 0)
    返回 (假)
.如果真结束
匿名局部变量_5.匿名成员_1 = 65538
.如果真 (匿名DLL29_GetThreadContext (运行信息.匿名成员_2, 匿名局部变量_5) = 0)
    匿名子程序_6 (运行信息)
    返回 (假)
.如果真结束
匿名DLL30_ReadProcessMemory (运行信息.匿名成员_1, 匿名局部变量_5.匿名成员_15 + 8, 匿名局部变量_8, 4, 0)
.如果真 (匿名局部变量_8 = 0)
    匿名子程序_6 (运行信息)
    返回 (假)
.如果真结束
.如果真 (匿名DLL31_ZwUnmapViewOfSection (运行信息.匿名成员_1, 匿名局部变量_8) = 0)
    匿名子程序_6 (运行信息)
    返回 (假)
.如果真结束
匿名局部变量_6 = 匿名DLL33_VirtualAllocEx (运行信息.匿名成员_1, 匿名局部变量_2.匿名成员_3.匿名成员_10, 匿名局部变量_2.匿名成员_3.匿名成员_20, 12288, 4)
.如果真 (匿名局部变量_6 = 0)
    匿名子程序_6 (运行信息)
    返回 (假)
.如果真结束
匿名DLL34_WriteProcessMemory (运行信息.匿名成员_1, 匿名局部变量_6, 程序名 [1], 匿名局部变量_2.匿名成员_3.匿名成员_21, 0)
匿名局部变量_9 = 匿名局部变量_1.匿名成员_19 + 匿名DLL27_LocalSize (匿名局部变量_2)
.计次循环首 (匿名局部变量_2.匿名成员_2.匿名成员_2, 匿名局部变量_7)
    匿名DLL35_RtlMoveMemory (匿名局部变量_3, 程序名 [匿名局部变量_9 + (匿名局部变量_7 - 1) × 40 + 1], 匿名DLL36_LocalSize (匿名局部变量_3))
    .如果真 (匿名局部变量_3.匿名成员_5 + 1 > 匿名子程序_7 (程序名))
        匿名子程序_6 (运行信息)
        返回 (假)
    .如果真结束
    匿名DLL34_WriteProcessMemory (运行信息.匿名成员_1, 匿名局部变量_6 + 匿名局部变量_3.匿名成员_3, 程序名 [匿名局部变量_3.匿名成员_5 + 1], 匿名局部变量_3.匿名成员_4, 0)
    匿名DLL37_VirtualProtectEx (运行信息.匿名成员_1, 匿名局部变量_6 + 匿名局部变量_3.匿名成员_3, 匿名局部变量_3.匿名成员_2, 匿名子程序_2 (匿名局部变量_3.匿名成员_10), 匿名局部变量_8)
.计次循环尾 ()
匿名DLL38_WriteProcessMemory (运行信息.匿名成员_1, 匿名局部变量_5.匿名成员_15 + 8, 匿名局部变量_6, 4, 0)
匿名局部变量_5.匿名成员_18 = 匿名局部变量_6 + 匿名局部变量_2.匿名成员_3.匿名成员_7
匿名DLL39_SetThreadContext (运行信息.匿名成员_2, 匿名局部变量_5)
匿名DLL40_ResumeThread (运行信息.匿名成员_2)
.如果真 (是否为空 (运行信息))
    匿名DLL43_CloseHandle (运行信息.匿名成员_2)
    匿名DLL43_CloseHandle (运行信息.匿名成员_1)
.如果真结束
返回 (真)
置入代码 (#VM_vmp保护停止)

.子程序 其他_窗口透明, , 公开, 指定本窗口透明效果。很遗憾!不支持98
.参数 窗口句柄, 整数型, , 可用 取窗口句柄() 获得。
.参数 透明值, 整数型, , 0-255
.局部变量 匿名局部变量_1, 整数型

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
子程序4 ()
匿名局部变量_1 = 匿名DLL1_GetWindowLongA (窗口句柄, -20)
匿名局部变量_1 = 位或 (匿名局部变量_1, 524288)
匿名DLL5_SetWindowLongA (窗口句柄, -20, 匿名局部变量_1)
匿名DLL2_SetLayeredWindowAttributes (窗口句柄, 0, 透明值, 2)
置入代码 (#VM_vmp保护停止)

.子程序 其他_隐藏桌面图标, , 公开, 即隐藏桌面图标

置入代码 (#VM_vmp保护启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
隐藏桌面图标 ()
隐藏开始按钮 ()
隐藏任务栏 ()
隐藏系统时钟 ()
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)

.子程序 其他_显示桌面图标, , 公开, 即显示桌面图标

置入代码 (#VM_vmp保护启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
显示桌面图标 ()
显示开始按钮 ()
显示任务栏 ()
显示系统时钟 ()
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)

.子程序 其他_蓝屏死机, , 公开, 简单说明:如果你有自己的思路检测调试器,就用自己思路,检测到了就触发这个功能,可以直接蓝屏死机
.局部变量 匿名局部变量_1, 匿名结构_11
.局部变量 匿名局部变量_2, 整数型, , "4"

置入代码 (#VM_vmp保护启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
匿名DLL98_RtlAdjustPrivilege (19, 1, 0, 0)
匿名DLL99_RtlInitUnicodeString (匿名局部变量_1, “Session Manager”)
匿名局部变量_2 [1] = 匿名DLL88_lstrcpyn (匿名局部变量_1, 匿名局部变量_1, 0)
匿名局部变量_2 [2] = 匿名局部变量_1.匿名成员_1
匿名局部变量_2 [3] = 匿名局部变量_2 [1]
匿名局部变量_2 [4] = 匿名局部变量_2 [1]
匿名DLL100_NtRaiseHardError (-1073741286, 4, 1, 匿名局部变量_2, 6, 0)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
子程序4 ()
置入代码 (#VM_vmp保护停止)

.子程序 其他_取本机登录QQ, 文本型, 公开, 取机器登录的QQ号码 比如:编辑框1.内容 = 其他_取本机登录QQ () 可以作为验证,具体怎么判断自己想
.局部变量 匿名局部变量_1, 文本型, , "0"

置入代码 (#VM_vmp保护启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
子程序4 ()
获取本机登陆QQ (匿名局部变量_1)
调试输出 (匿名局部变量_1)
返回 (匿名局部变量_1 [1])
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)

.子程序 命令_防止OD附加进程, , 公开, 本命令需要编译后才可使用,直接调用命令即可
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 77 })
子程序4 ()
.判断开始 (匿名DLL105_IsDebuggerPresent ())
    置入代码 ({ 204 })
    结束 ()
.默认

.判断结束
匿名局部变量_1 = 匿名DLL102_GetProcAddress (匿名DLL101_GetModuleHandleA (“ntdll.dll”), “DbgBreakPoint”)
.判断开始 (匿名局部变量_1 ≠ 0)
    匿名DLL104_VirtualProtect (匿名局部变量_1, 1, 64, 匿名局部变量_2)
    匿名DLL103_RtlMoveMemory (匿名局部变量_1, { 195 }, 1)
    匿名DLL104_VirtualProtect (匿名局部变量_1, 1, 匿名局部变量_2, 0)

.默认

.判断结束
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_vmp保护停止)


.子程序 命令_检测调试器, 逻辑型, 公开, 检测OD调试器 找到相关句柄返回真,参考代码:如果(命令_检测调试器()=真)'真=发现 假=未发现
.局部变量 匿名局部变量_1, 匿名结构_10, , "0"
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 整数型
.局部变量 匿名局部变量_4, 整数型
.局部变量 匿名局部变量_5, 整数型
.局部变量 匿名局部变量_6, 整数型
.局部变量 匿名局部变量_7, 整数型
.局部变量 匿名局部变量_8, 文本型
.局部变量 匿名局部变量_9, 整数型
.局部变量 匿名局部变量_10, 整数型
.局部变量 匿名局部变量_11, 整数型
.局部变量 匿名局部变量_12, 文本型, , "0"
.局部变量 匿名局部变量_13, 文本型
.局部变量 匿名局部变量_14, 整数型
.局部变量 匿名局部变量_15, 匿名结构_10, , "0"
.局部变量 匿名局部变量_16, 整数型
.局部变量 匿名局部变量_17, 文本型

置入代码 (#VM_SE乱序混淆启动)
置入代码 ({ 65427 })
子程序4 ()
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名局部变量_13 = “StrongOD,ODbgScript,ODDragAttach,OllyMachine,单步步入,单步步过,自动步入,自动步过,执行到返回,硬件断点,跟踪步入,跟踪步过,断点,调用堆栈,SEH 链,RUN 跟踪,实时调试设置,Step &into,Step &over,Animate into,Animate over,Execute till return,Debugging &options,&Just-in-time debugging,Select A&PI help file,SEH chain,Call stac&k,&Breakpoints,Ru&n trace,内存断点,可执行模块,运行跟踪,INT3 断点,重新开始(&S),&Attach,VEH/SEH chain,INT3 &breakpoints,Call DLL export Alt+F6,Run thread F11,Set condition... Ctrl+T,&Options... Alt+O,Stop hit trace,Run hit trace,Execute till return Ctrl+F9”

匿名局部变量_12 = 分割文本 (匿名局部变量_13, , )
匿名局部变量_17 = “Breakpoints”
.计次循环首 (枚举窗口_强力 (匿名局部变量_1), 匿名局部变量_2)
    .计次循环首 (枚举所有子窗口_强力 (匿名局部变量_1 [匿名局部变量_2].匿名成员_1, 匿名局部变量_15, , ), 匿名局部变量_16)
        .如果真 (匿名局部变量_15 [匿名局部变量_16].匿名成员_2 = 匿名局部变量_17)
            返回 (真)
        .如果真结束

    .计次循环尾 ()
    匿名局部变量_3 = 匿名DLL77_GetMenu (匿名局部变量_1 [匿名局部变量_2].匿名成员_1)
    .如果真 (匿名局部变量_3 > 0)
        匿名局部变量_4 = 匿名DLL78_GetMenuItemCount (匿名局部变量_3)
        .如果真 (匿名局部变量_4 > 0)
            .计次循环首 (匿名局部变量_4, 匿名局部变量_5)
                匿名局部变量_6 = 匿名DLL79_GetSubMenu (匿名局部变量_3, 匿名局部变量_5 - 1)
                匿名局部变量_7 = 匿名DLL78_GetMenuItemCount (匿名局部变量_6)
                .如果真 (匿名局部变量_6 > 0 且 匿名局部变量_7 > 0)
                    .计次循环首 (匿名局部变量_7, 匿名局部变量_9)
                        匿名局部变量_8 = 取空白文本 (200)
                        匿名局部变量_10 = 匿名DLL80_GetMenuStringA (匿名局部变量_6, 匿名局部变量_9 - 1, 匿名局部变量_8, 200, 1024)
                        .如果真 (匿名局部变量_10 > 0)
                            .计次循环首 (取数组成员数 (匿名局部变量_12), 匿名局部变量_14)
                                .如果真 (寻找文本 (匿名局部变量_8, 匿名局部变量_12 [匿名局部变量_14], , 真) ≠ -1)
                                    返回 (真)
                                .如果真结束

                            .计次循环尾 ()
                        .如果真结束

                    .计次循环尾 ()
                .如果真结束

            .计次循环尾 ()
        .如果真结束

    .如果真结束

.计次循环尾 ()
返回 (假)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序混淆停止)


.子程序 其他_加载皮肤, , 公开, 共15款皮肤供您选择,参数为:1到15
.参数 皮肤参数, 整数型, , 1=酷炫银白 2=平面天蓝 3=QQmuisc 4=黑色风 5=Itunes 6=简约白色 7=科技感一 8=科技感二 9=3D黑 10=科技蓝 11=管理红 12=管理黑 13=少女色 14=平面浅蓝

置入代码 (#VM_vmp保护启动)
置入代码 ({ 65427 })
子程序4 ()
.如果 (皮肤参数 = 1)
    皮肤加载 (#匿名资源_7)
.否则

.如果结束
.如果 (皮肤参数 = 2)
    皮肤加载 (#匿名资源_8)
.否则

.如果结束
.如果 (皮肤参数 = 3)
    皮肤加载 (#匿名资源_9)
.否则

.如果结束
.如果 (皮肤参数 = 4)
    皮肤加载 (#匿名资源_10)
.否则

.如果结束
.如果 (皮肤参数 = 5)
    皮肤加载 (#匿名资源_11)
.否则

.如果结束
.如果 (皮肤参数 = 6)
    皮肤加载 (#匿名资源_12)
.否则

.如果结束
.如果 (皮肤参数 = 7)
    皮肤加载 (#匿名资源_13)
.否则

.如果结束
.如果 (皮肤参数 = 8)
    皮肤加载 (#匿名资源_14)
.否则

.如果结束
.如果 (皮肤参数 = 9)
    皮肤加载 (#匿名资源_15)
.否则

.如果结束
.如果 (皮肤参数 = 10)
    皮肤加载 (#匿名资源_16)
.否则

.如果结束
.如果 (皮肤参数 = 11)
    皮肤加载 (#匿名资源_17)
.否则

.如果结束
.如果 (皮肤参数 = 12)
    皮肤加载 (#匿名资源_18)
.否则

.如果结束
.如果 (皮肤参数 = 13)
    皮肤加载 (#匿名资源_19)
.否则

.如果结束
.如果 (皮肤参数 = 14)
    皮肤加载 (#匿名资源_20)
.否则

.如果结束
.如果 (皮肤参数 = 15)
    皮肤加载 (#匿名资源_21)
.否则

.如果结束
.如果 (皮肤参数 > 15)
    皮肤加载 (#匿名资源_17)
.否则

.如果结束


置入代码 (#VM_vmp保护停止)

.子程序 其他_运行后删除自身, 逻辑型, 公开, 可以删除掉所有类型的文件包括运行的程序
.局部变量 匿名局部变量_1, 文本型
.局部变量 匿名局部变量_2, 匿名结构_40

置入代码 (#VM_SE乱序变形启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
匿名局部变量_1 = 取特定目录 (11) + 到文本 (取启动时间 ())
匿名DLL4_CreateDirectoryA (匿名局部变量_1, 匿名局部变量_2)
匿名DLL4_CreateDirectoryA (匿名局部变量_1 + “\....\”, 匿名局部变量_2)
子程序4 ()
匿名DLL186_MoveFileA (取执行文件名 (), 匿名局部变量_1 + “\....\TemporaryFile”)
匿名DLL186_MoveFileA (匿名局部变量_1 + “\....\”, 匿名局部变量_1 + “\TemporaryFile”)
删除目录 (匿名局部变量_1)
返回 (取反 (文件是否存在 (取执行文件名 ())))
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序变形停止)


.子程序 验证_是否在QQ群, , 公开, 检测是否在群内,验证_是否在QQ群("这里是群号",1)
.参数 群号, 文本型, , 被验证的群,如果不再群内 则提示信息后关闭 如果在群内不会提示信息
.局部变量 匿名局部变量_1, 逻辑型
.局部变量 匿名局部变量_2, 文本型
.局部变量 匿名局部变量_3, 文本型

置入代码 (#VM_SE乱序混淆启动)
置入代码 ({ 65427 })
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名局部变量_2 = 到文本 ({ 32, 45, 49, 53, 32, 49, 55, 55, 32, 45, 49, 53, 50, 32, 50, 54, 32, 45, 49, 52, 51, 32, 55, 51, 32, 45, 49, 51, 56, 32, 52, 32, 45, 49, 53, 48, 32, 55, 32, 45, 49, 55, 54, 32, 54, 48, 32, 57, 54 })
匿名局部变量_3 = 到文本 ({ 32, 45, 49, 49, 53, 32, 51, 55, 32, 45, 49, 50, 54, 32, 49, 51, 32, 45, 49, 49, 52, 32, 45, 49, 50, 32, 45, 49, 50, 56, 32, 52, 53, 32, 45, 49, 48, 50, 32, 50, 48, 32, 45, 49, 49, 50, 32, 45, 49, 51, 32, 45, 49, 48, 51, 32, 45, 51, 32, 45, 49, 52, 32, 50, 32, 45, 49, 50, 56, 32, 45, 49, 50, 32, 45, 49, 49, 55, 32, 49, 49, 54, 32, 53, 56 })
匿名局部变量_1 = 群验证 (群号)
.判断开始 (匿名局部变量_1 = 假)
    信息框 (文本解密S (匿名局部变量_2, 1, 2) + 文本解密S (匿名局部变量_3, 1, 2) + 群号, 0, , )
    结束 ()
    命令_计时器开启 (2)
.默认

.判断结束

置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序混淆停止)

.子程序 验证_授权验证key, , 公开, --这里是验证软件的,相当于客户端
.参数 通信标识, 整数型, , 要和管理的一样才能通信,也可以当作是端口

置入代码 (#VM_SE乱序混淆启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
匿名程序集变量_10 = 到时间 (取现行时间 ())
子程序4 ()
匿名程序集变量_9 = 分割文本 (到文本 (解密数据 (读入文件 (“key.dll”), 到文本 (通信标识), 2)), #换行符, )
.判断开始 (文件是否存在 (文本解密S (“ 39 169 53 114 32 176 40 69”, 2, 2)))
    .判断开始 (匿名程序集变量_9 [1] ≠ 取机器信息 ())
        信息框 (文本解密S (“ -135 43 -137 -7 26 182 40 31 -141 13 -83 36 -102 2 -147 12 -87 3 -150 23 -172 22 -109 -12 -176 12 -87 23 -90 19 -102 35 -128 9 -157 39 -139 -12 -165 148 3 163 -5 124 5 38 -158 29 -88 8 -175 28 -132 9 -89 25 -100 13 -83 40 -90 38 -114 82”, 2, 2), 16, , )
        置剪辑板文本 (取机器信息 ())
        结束 ()
    .判断 (到时间 (匿名程序集变量_9 [2]) < 匿名程序集变量_10)
        信息框 (文本解密S (“ -138 46 -140 -4 23 185 37 34 -144 16 -86 38 -131 18 -167 13 -87 26 -122 -9 -179 15 -90 26 -93 22 -105 38 -131 12 -160 42 -142 -9 -168 151 0 166 -8 127 2 41 -161 32 -91 11 -178 31 -135 12 -92 28 -103 16 -86 43 -93 41 -117 85”, 2, 2), 16, , )
        置剪辑板文本 (取机器信息 ())
        结束 ()
    .默认
        信息框 (文本解密S (“ -127 -5 -114 -16 -129 -3 -123 -38 -8 -4 -71 -16 -54 -23 -119 -6 -90 -2 -131 -16 -80 -41 -122 53”, 2, 2) + 匿名程序集变量_9 [2], 0, , )
        启动线程 (&判断时间, , )
    .判断结束


.默认
    信息框 (文本解密S (“ -59 -67 -52 -37 -84 -58 -83 -35 -54 -81 -84 -51 -63 -29 -65 -79 98 110 112 -41 -69 -59 -11 -84 -104 -60 -15 -49 -18 -53 -30 -37 -56 -63 -85 -33 -67 -84 -93 76 75 91 67 52 77 -34 -86 -43 -16 -64 -103 -44 -60 -63 -17 -47 -28 -59 -11 -32 -18 -34 -42 10”, 2, 2), 16, , )
    置剪辑板文本 (取机器信息 ())
    结束 ()
.判断结束

置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序混淆停止)

.子程序 判断时间
.局部变量 匿名局部变量_1, 整数型

置入代码 (#VM_SE乱序变形启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名局部变量_1 = 取时间间隔 (到时间 (匿名程序集变量_9 [2]), 到时间 (取现行时间 ()), 8)
.计次循环首 (匿名局部变量_1, )
    程序_延时 (1000)
    调试输出 (1)
.计次循环尾 ()
信息框 (文本解密S (“ -20 -72 -22 -122 141 67 155 -84 -26 -102 32 -80 -13 -100 -49 -105 31 -92 -4 -127 -61 -103 28 -92 25 -96 13 -80 -13 -106 -42 -76 -24 -127 -50 33 118 48 110 9 120 -77 -43 -86 27 -107 -60 -87 -17 -106 26 -90 15 -102 32 -75 25 -77 1 35”, 2, 1), 16, , )
置剪辑板文本 (取机器信息 ())
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序变形停止)
结束 ()


.子程序 验证_授权制作key, , 公开, --这里是管理做授权的,相当于管理端
.参数 客户机器码, 文本型, , 被授权机器的机器码
.参数 到期时间, 文本型, , 授权的时间
.参数 通信标识, 整数型, , 必须和客户那边的一致

置入代码 (#VM_SE乱序混淆启动)
写到文件 (“key.dll”, 加密数据 (到字节集 (客户机器码 + #换行符 + 到期时间), 到文本 (通信标识), 2))
置入代码 (#VM_SE乱序混淆停止)

.子程序 文本加密S, 文本型, 公开, QQ群120114448
.参数 原文本, 文本型, , 要加密的文本
.参数 密文, 整数型, , 请填10000以内的数字,整数型
.参数 运算方式, 整数型, , 1为增加运算,2为减少运算,
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 文本型
.局部变量 匿名局部变量_3, 文本型
.局部变量 匿名局部变量_4, 整数型

置入代码 (#VM_SE默认保护)
置入代码 ({ 65427 })
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名局部变量_1 = 1
匿名局部变量_4 = 取随机数 (11, 99)
.如果 (密文 ≥ 10000 或 运算方式 > 2 或 运算方式 < 1 或 密文 < 1)
    信息框 (“ACSII加解模块参数值错误,请返回输入正确的值!”, #错误图标 + 0, “ACSII加解模块参数值错误:”)
.否则
    .如果真 (运算方式 = 1)
        .计次循环首 (取文本长度 (原文本), )
            .如果 (取整 (匿名局部变量_1 ÷ 2) = 匿名局部变量_1 ÷ 2)
                匿名局部变量_2 = 匿名局部变量_2 + “ ” + 到文本 (取代码 (原文本, 匿名局部变量_1) + 密文 - 匿名局部变量_4)
            .否则
                匿名局部变量_2 = 匿名局部变量_2 + “ ” + 到文本 (取代码 (原文本, 匿名局部变量_1) - 密文 + 匿名局部变量_4)
            .如果结束
            匿名局部变量_1 = 匿名局部变量_1 + 1
        .计次循环尾 ()
    .如果真结束
    .如果真 (运算方式 = 2)
        .计次循环首 (取文本长度 (原文本), )
            .如果 (取整 (匿名局部变量_1 ÷ 2) = 匿名局部变量_1 ÷ 2)
                匿名局部变量_2 = 匿名局部变量_2 + “ ” + 到文本 (取代码 (原文本, 匿名局部变量_1) - 密文 + 匿名局部变量_4)
            .否则
                匿名局部变量_2 = 匿名局部变量_2 + “ ” + 到文本 (取代码 (原文本, 匿名局部变量_1) + 密文 - 匿名局部变量_4)
            .如果结束
            匿名局部变量_1 = 匿名局部变量_1 + 1
        .计次循环尾 ()
    .如果真结束
    匿名局部变量_2 = 匿名局部变量_2 + “ ” + 到文本 (匿名局部变量_4 - 1)
.如果结束
返回 (匿名局部变量_2)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE默认停止)

.子程序 文本解密S, 文本型, 公开, QQ群120114448
.参数 解密文本, 文本型, , 要解密的文本
.参数 密文, 整数型, , 请填10000以内的数字,整数型,要和加密的一样才能解密
.参数 运算方式, 整数型, , 1为增加运算,2为减少运算,注意要和加密的一样才能解密
.局部变量 匿名局部变量_1, 文本型
.局部变量 匿名局部变量_2, 文本型, , "0"
.局部变量 匿名局部变量_3, 整数型
.局部变量 匿名局部变量_4, 整数型
.局部变量 匿名局部变量_5, 整数型
.局部变量 匿名局部变量_6, 文本型
.局部变量 匿名局部变量_7, 文本型
.局部变量 匿名局部变量_8, 整数型
.局部变量 匿名局部变量_9, 整数型

置入代码 (#VM_SE默认保护)
置入代码 ({ 65427 })
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
.如果真 (解密文本 ≠ “”)
    .如果 (密文 ≥ 10000 或 运算方式 > 2 或 运算方式 < 1 或 密文 < 1)
        信息框 (“ACSII加解模块参数值错误,请返回输入正确的值!”, #错误图标 + 0, “ACSII加解模块参数值错误:”)
    .否则
        匿名局部变量_7 = 取文本右边 (解密文本, 取文本长度 (解密文本) - 1)
        匿名局部变量_8 = 到数值 (取文本右边 (匿名局部变量_7, 3)) + 1
        匿名局部变量_1 = 取文本左边 (匿名局部变量_7, 取文本长度 (匿名局部变量_7) - 3)
        匿名局部变量_3 = 1
        匿名局部变量_4 = 寻找文本 (匿名局部变量_1, “ ”, 1, 假)
        .判断循环首 (匿名局部变量_4 > -1)
            匿名局部变量_3 = 匿名局部变量_3 + 1
            匿名局部变量_4 = 寻找文本 (匿名局部变量_1, “ ”, 匿名局部变量_4 + 1, 假)
        .判断循环尾 ()
        重定义数组 (匿名局部变量_2, 假, 匿名局部变量_3)
        匿名局部变量_2 = 分割文本 (匿名局部变量_1, “ ”, 取数组成员数 (匿名局部变量_2))
        .如果真 (运算方式 = 2)
            .计次循环首 (匿名局部变量_3, 匿名局部变量_5)
                匿名局部变量_9 = 到数值 (匿名局部变量_2 [匿名局部变量_5])
                .如果 (取整 (匿名局部变量_5 ÷ 2) = 匿名局部变量_5 ÷ 2)
                    匿名局部变量_6 = 匿名局部变量_6 + 字符 (到数值 (匿名局部变量_9) + 密文 - 匿名局部变量_8)
                .否则
                    匿名局部变量_6 = 匿名局部变量_6 + 字符 (到数值 (匿名局部变量_9) - 密文 + 匿名局部变量_8)
                .如果结束

            .计次循环尾 ()
        .如果真结束
        .如果真 (运算方式 = 1)
            .计次循环首 (匿名局部变量_3, 匿名局部变量_5)
                匿名局部变量_9 = 到数值 (匿名局部变量_2 [匿名局部变量_5])
                .如果 (取整 (匿名局部变量_5 ÷ 2) = 匿名局部变量_5 ÷ 2)
                    匿名局部变量_6 = 匿名局部变量_6 + 字符 (到数值 (匿名局部变量_9) - 密文 + 匿名局部变量_8)
                .否则
                    匿名局部变量_6 = 匿名局部变量_6 + 字符 (到数值 (匿名局部变量_9) + 密文 - 匿名局部变量_8)
                .如果结束

            .计次循环尾 ()
        .如果真结束

    .如果结束

.如果真结束
返回 (匿名局部变量_6)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE默认停止)

.子程序 其他_定时信醒框, , 公开, 不要写在窗口下,因为这样要等时间到了窗口才会出来..
.参数 信息内容, 文本型, , 要提示的信息
.参数 定时分钟, 整数型, , 这里是整数型,1=1分钟后提示 最大到10分钟

置入代码 (#VM_SE默认保护)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
置入代码 ({ 65427 })
子程序4 ()
.判断开始 (信息内容 ≠ “”)
    .判断开始 (定时分钟 = 1)
        延迟 (1000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 2)
        延迟 (2000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 3)
        延迟 (3000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 4)
        延迟 (4000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 5)
        延迟 (5000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 6)
        延迟 (6000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 7)
        延迟 (7000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 8)
        延迟 (8000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 9)
        延迟 (9000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 = 10)
        延迟 (10000 × 60)
        匿名全局变量_4 = 信息内容
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束
    .判断开始 (定时分钟 > 10)
        匿名全局变量_4 = “防破QQ群:120114448”
        载入 (匿名窗口_4, , 假)
    .默认

    .判断结束

.默认

.判断结束
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE默认停止)

.子程序 命令_防截包检测, , 公开, 要配合时钟使用,建议时钟周期5秒
.参数 后缀名称, 文本型, 可空, 若调试则结束此类文件注入,默认dll,不会的这里留空
.局部变量 匿名局部变量_1, 文本型

置入代码 ({ 65427 })
.如果真 (后缀名称 = “”)
    后缀名称 = “dll”
.如果真结束
检测中 (匿名DLL22_GetCurrentProcessId (), 后缀名称)
子程序4 ()

.子程序 验证_授权验证_显示机器码, , 公开, 授权验证通过后的命令
.参数 文本位置, 文本型, , 比如:编辑框1.内容或者标签1.标题

置入代码 ({ 65427 })
匿名程序集变量_15 = 取机器信息 ()
子程序4 ()
匿名程序集变量_13 = 匿名程序集变量_15
文本位置 = 匿名程序集变量_15
调试输出 (匿名程序集变量_13)

.子程序 验证_授权验证_显示到期时间, , 公开, 授权验证通过后的命令
.参数 时间显示区域, 文本型


置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名程序集变量_16 = 匿名程序集变量_9 [2]
匿名程序集变量_14 = 匿名程序集变量_16
子程序4 ()
时间显示区域 = 匿名程序集变量_16
调试输出 (匿名程序集变量_14)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })

.子程序 命令_锁定程序, , 公开, 对某一个想要锁定的程序进行锁定,锁定后,该程序处于禁止状态,除非解锁,否则不能控制该程序!
.参数 将锁程序名, 文本型, , 需要锁定程序的文件名或进程名!

置入代码 (#VM_SE乱序变形启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名DLL153_EnableWindow (锁定程序_3 (将锁程序名), 0)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序变形停止)

.子程序 命令_解锁程序, , 公开, 对某一个已经锁定的程序进行开锁,开锁后,该程序处于可操作状态!
.参数 解锁程序名, 文本型, , 需要解除锁程序的文件名或进程名!

置入代码 (#VM_SE乱序变形启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名DLL153_EnableWindow (锁定程序_3 (解锁程序名), 1)
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序变形停止)

.子程序 命令_限制指定IP, , 公开, 本命令只运行指定ip使用,非指定IP无法打开软件
.参数 指定IP, 文本型, , IP是文本行,但是建议大家对IP进行加密。
.局部变量 匿名局部变量_1, 文本型
.局部变量 匿名局部变量_2, 文本型

置入代码 (#VM_SE乱序混淆启动)
置入代码 ({ 235, 7, 83, 69, 66, 69, 71, 78, 0 })
匿名局部变量_1 = 到文本 (网页_访问 (“http://www.ip138.com/baidu-ip/index.asp”))
匿名局部变量_2 = 文本_取出中间文本 (匿名局部变量_1, #匿名常量_25, #匿名常量_26)
延迟 (50)
.判断开始 (指定IP ≠ 匿名局部变量_2)
    命令_计时器开启 (2)
    结束 ()
.默认

.判断结束
置入代码 ({ 235, 7, 83, 69, 69, 78, 68, 80, 0 })
置入代码 (#VM_SE乱序混淆停止)

.子程序 其他_结束进程, , 公开, 注意,本命令放在 窗口可否被关闭这里

进程_结束 ()


.子程序 其他_验证码, , 公开, 这个可以当作软件的登录验证,注册验证等... 也具有检测调试器功能
.参数 验证码, 整数型, , 验证码是整数型,至于验证码长度大家自己看着办,用:取随机数 (11111, 99999)
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型

置入代码 (#VM_SE乱序变形启动)
匿名局部变量_1 = 验证码
.如果 (命令_检测调试器 () = 真)
    其他_蓝屏死机 ()
.否则
    命令_防止破解启动 ()
.如果结束

输入框 (“当前验证码:” + 到文本 (匿名局部变量_1), “请输入验证码”, , 匿名局部变量_2, , )
.判断开始 (匿名局部变量_2 = 匿名局部变量_1)
    信息框 (“验证码通过”, 0, , )
.默认
    信息框 (“验证码填写错误,请检查!”, 0, , )
    结束 ()
.判断结束
置入代码 (#VM_SE乱序变形停止)

.子程序 命令_驱动隐藏进程64位, , 公开, 可有效的隐藏进程,支持win7 64 其他自行测试 有可能会蓝屏
.参数 开启与关闭, 整数型, , 1=开启  2=关闭  请进来不要使用超过20分钟 否则容易蓝屏
.局部变量 匿名局部变量_1, 整数型

.判断开始 (开启与关闭 = 1)
    匿名局部变量_1 = 隐藏进程1 (到整数 (匿名全局变量_2), 真)
.默认

.判断结束
.判断开始 (开启与关闭 = 2)
    匿名局部变量_1 = 隐藏进程1 (到整数 (匿名全局变量_2), 假)
.默认

.判断结束


.子程序 命令_驱动保护进程64位, , 公开, 可有效的保护进程,支持win7 64 其他自行测试 有可能会蓝屏
.参数 开启与关闭, 整数型, , 1=开启  2=关闭  请进来不要使用超过20分钟 否则容易蓝屏
.局部变量 匿名局部变量_1, 整数型

.判断开始 (开启与关闭 = 1)
    匿名局部变量_1 = 保护进程1 (到整数 (匿名全局变量_2), 真)
.默认

.判断结束
.判断开始 (开启与关闭 = 2)
    匿名局部变量_1 = 保护进程1 (到整数 (匿名全局变量_2), 假)
.默认

.判断结束

回复 支持 反对

使用道具 举报

结帖率:96% (24/25)

签到天数: 2 天

发表于 2019-12-14 20:55:03 | 显示全部楼层   上海市上海市
这个已经失效了
.版本 2

.程序集 类_QQlogin
.程序集变量 匿名私有成员_1, 文本型
.程序集变量 匿名私有成员_2, 文本型

.子程序 _初始化

匿名私有成员_2 = “”
_init ()

.子程序 _销毁



.子程序 _init, 整数型, 公开, 初始化函数

编码_Utf8到Ansi (网页_访问_对象 (“http://xui.ptlogin2.qq.com/cgi-b ... %2F%2Fqun.qq.com%2F”, , , , 匿名私有成员_2, , , , , , , , , , , ))
匿名私有成员_1 = 文本_取出中间文本 (匿名私有成员_2, “pt_local_token=”, “;”, , )
返回 (0)

.子程序 GetList, 文本型, 公开, 获取本机登录QQ列表

返回 (编码_Utf8到Ansi (网页_访问_对象 (“http://localhost.ptlogin2.qq.com:4300/pt_get_uins?callback=ptui_getuins_CB&r=0.” + 时间_取现行时间戳 () + “&pt_local_tk=” + 匿名私有成员_1, , , 匿名私有成员_2)))

.子程序 Login, 文本型, 公开, 登录
.参数 u, 文本型
.局部变量 匿名局部变量_1, 文本型
.局部变量 匿名局部变量_2, 文本型

网页_访问_对象 (“http://localhost.ptlogin2.qq.com:4300/pt_get_st?clientuin=” + u + “&callback=ptui_getst_CB&r=0.” + 时间_取现行时间戳 () + “&pt_local_tk=” + 匿名私有成员_1, , , 匿名私有成员_2, , , 匿名局部变量_1, , 真)
匿名局部变量_2 = 编码_Utf8到Ansi (网页_访问_对象 (“http://ssl.ptlogin2.qq.com/jump?clientuin=” + u + “&keyindex=9&pt_aid=715030901&daid=73&u1=http%3A%2F%2Fqun.qq.com%2F&pt_local_tk=” + 匿名私有成员_1 + “&pt_3rd_aid=0&ptopt=1&style=40&&has_onekey=1”, , , 匿名私有成员_2, , , 匿名局部变量_1, , 真))
网页_访问_对象 (“http” + 文本_取出中间文本 (匿名局部变量_2, “http”, “',”, , ), , , 匿名私有成员_2, , , 匿名局部变量_1, , 真)
返回 (匿名局部变量_2)

.子程序 GetCookie, 文本型, 公开, 获取cookie

返回 (匿名私有成员_2)

.子程序 Gtk, 文本型, 公开
.参数 skey, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 整数型
.局部变量 匿名局部变量_4, 整数型

匿名局部变量_1 = 5381
匿名局部变量_2 = 0
匿名局部变量_3 = 取文本长度 (skey)
.判断循环首 (匿名局部变量_2 < 匿名局部变量_3)
    匿名局部变量_1 = 匿名局部变量_1 + 左移 (匿名局部变量_1, 5) + 取代码 (skey, 匿名局部变量_2 + 1)
    匿名局部变量_2 = 匿名局部变量_2 + 1
.判断循环尾 ()
匿名局部变量_4 = 位与 (匿名局部变量_1, 2147483647)
返回 (到文本 (匿名局部变量_4))
回复 支持 反对

使用道具 举报

结帖率:96% (24/25)

签到天数: 2 天

发表于 2019-12-14 20:54:29 | 显示全部楼层   上海市上海市
我来强行开源
.版本 2

.程序集 驱动操作

.子程序 _初始化



.子程序 _销毁



.子程序 zc驱动, 逻辑型, 公开
.参数 驱动名称, 文本型
.参数 驱动路径, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型
.局部变量 匿名局部变量_4, 整数型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 2)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL13_CreateServiceA (匿名局部变量_1, 驱动名称, 驱动名称, 16, 1, 3, 0, 驱动路径, 0, 0, 0, 0, 0)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
        匿名局部变量_3 = 真
    .如果真结束
    .如果真 (匿名局部变量_2 = 0)
        匿名局部变量_4 = 匿名DLL19_GetLastError ()
        .如果 (匿名局部变量_4 = 1073)
            匿名局部变量_3 = 真
        .否则
            匿名局部变量_3 = 假
        .如果结束

    .如果真结束
    匿名DLL16_CloseServiceHandle (匿名局部变量_1)
.如果真结束
返回 (匿名局部变量_3)

.子程序 运行驱动, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 16)
    匿名局部变量_3 = 匿名DLL15_StartServiceA (匿名局部变量_2, 0, 0)
    删除zc项 (#本地机器, “SYSTEM\CurrentControlSet\Services\” + 驱动名称 + “\Enum”)
    删除zc项 (#本地机器, “SYSTEM\CurrentControlSet\Services\” + 驱动名称)
    匿名DLL16_CloseServiceHandle (匿名局部变量_2)
.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_3)

.子程序 停止驱动, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 匿名结构_12
.局部变量 匿名局部变量_4, 逻辑型

匿名局部变量_4 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 32)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名局部变量_4 = 匿名DLL17_ControlService (匿名局部变量_2, 1, 匿名局部变量_3)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
    .如果真结束

.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_4)

.子程序 卸载驱动, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 65536)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名局部变量_3 = 匿名DLL18_DeleteService (匿名局部变量_2)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
    .如果真结束

.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_3)

.子程序 打开设备, 整数型, 公开
.参数 设备名称, 文本型

返回 (匿名DLL20_CreateFileA (“\\.\” + 设备名称, 位或 (2147483648, 1073741824), 0, 0, 3, 128, 0))

.子程序 判断权限, 逻辑型, 公开, ----------------------------------

返回 (匿名DLL20_CreateFileA (“\\.\PhysicalDrive0”, 位或 (2147483648, 1073741824), 位或 (1, 2), 0, 3, 0, 0) ≠ -1)

.子程序 zc驱动1, 逻辑型, 公开
.参数 驱动名称, 文本型
.参数 驱动路径, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型
.局部变量 匿名局部变量_4, 整数型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 2)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL13_CreateServiceA (匿名局部变量_1, 驱动名称, 驱动名称, 16, 1, 3, 0, 驱动路径, 0, 0, 0, 0, 0)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
        匿名局部变量_3 = 真
    .如果真结束
    .如果真 (匿名局部变量_2 = 0)
        匿名局部变量_4 = 匿名DLL19_GetLastError ()
        .如果 (匿名局部变量_4 = 1073)
            匿名局部变量_3 = 真
        .否则
            匿名局部变量_3 = 假
        .如果结束

    .如果真结束
    匿名DLL16_CloseServiceHandle (匿名局部变量_1)
.如果真结束
返回 (匿名局部变量_3)

.子程序 运行驱动1, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 16)
    匿名局部变量_3 = 匿名DLL15_StartServiceA (匿名局部变量_2, 0, 0)
    删除zc项 (#本地机器, “SYSTEM\CurrentControlSet\Services\” + 驱动名称 + “\Enum”)
    删除zc项 (#本地机器, “SYSTEM\CurrentControlSet\Services\” + 驱动名称)
    匿名DLL16_CloseServiceHandle (匿名局部变量_2)
.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_3)

.子程序 停止驱动1, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 匿名结构_12
.局部变量 匿名局部变量_4, 逻辑型

匿名局部变量_4 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 32)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名局部变量_4 = 匿名DLL17_ControlService (匿名局部变量_2, 1, 匿名局部变量_3)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
    .如果真结束

.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_4)

.子程序 卸载驱动1, 逻辑型, 公开
.参数 驱动名称, 文本型
.局部变量 匿名局部变量_1, 整数型
.局部变量 匿名局部变量_2, 整数型
.局部变量 匿名局部变量_3, 逻辑型

匿名局部变量_3 = 假
匿名局部变量_1 = 匿名DLL12_OpenSCManagerA (字符 (0), 字符 (0), 1)
.如果真 (匿名局部变量_1 ≠ 0)
    匿名局部变量_2 = 匿名DLL14_OpenServiceA (匿名局部变量_1, 驱动名称, 65536)
    .如果真 (匿名局部变量_2 ≠ 0)
        匿名局部变量_3 = 匿名DLL18_DeleteService (匿名局部变量_2)
        匿名DLL16_CloseServiceHandle (匿名局部变量_2)
    .如果真结束

.如果真结束
匿名DLL16_CloseServiceHandle (匿名局部变量_1)
返回 (匿名局部变量_3)

.子程序 打开设备1, 整数型, 公开
.参数 设备名称, 文本型

返回 (匿名DLL20_CreateFileA (“\\.\” + 设备名称, 位或 (2147483648, 1073741824), 0, 0, 3, 128, 0))

.子程序 判断权限1, 逻辑型, 公开

返回 (匿名DLL20_CreateFileA (“\\.\PhysicalDrive0”, 位或 (2147483648, 1073741824), 位或 (1, 2), 0, 3, 0, 0) ≠ -1)
回复 支持 反对

使用道具 举报

结帖率:96% (24/25)

签到天数: 2 天

发表于 2019-12-14 20:26:31 | 显示全部楼层   上海市上海市
已反汇编模块,正在检查
回复 支持 反对

使用道具 举报

发表于 2019-12-14 19:43:01 | 显示全部楼层   山东省聊城市
6666666666666666666666666666666666
回复 支持 反对

使用道具 举报

发表于 2019-12-14 19:41:51 | 显示全部楼层   山东省聊城市
6666666666666666666666666
回复 支持 反对

使用道具 举报

发表于 2019-12-4 15:18:30 | 显示全部楼层   河北省保定市
666666666666666666
回复 支持 反对

使用道具 举报

发表于 2019-12-4 15:18:12 | 显示全部楼层   河北省保定市
6666666666666666
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表