易语言防破解防爆暗桩源码

.版本 2

.程序集 主窗口程序集
.程序集变量 已注册子程序内存数据地址, 整数型
.程序集变量 已注册子程序地址, 整数型
.程序集变量 是否已经注册, 逻辑型

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

置错误提示管理 (&错误提示管理_)

已注册子程序地址 ＝ 到数值 (&子程序1)

已注册子程序内存数据地址 ＝ lstrcpyn (已注册子程序地址, 已注册子程序地址, 0)

载入 (窗口_主窗口, , 假)
返回 (0) ' 可以根据您的需要返回任意数值

.子程序 错误提示管理_, 逻辑型, , 本命令用来设置当运行时如果产生了导致程序崩溃的严重错误时用来对该错误进行详细提示的子程序地址，如果未进行此项设置，发生严重错误时运行时环境将自动提示该错误的详细信息并直接退出
.参数 错误代码, 整数型, , 用作接收错误代码
.参数 错误文本, 文本型, , 用作接收详细错误文本

' 该子程序必须返回一个逻辑值，返回真表示已经自行处理完毕，系统将不再显示该错误信息，返回假表示由系统来继续显示该错误信息。以上设置必须完全正确，否则结果不能预测，另外，还请注意以下几点： 1、该错误提示子程序不要再引发新的错误； 2、在进入该错误提示子程序后，系统将自动关闭事件消息通知处理机制，也就是说任何事件将无法得到响应； 3、无论如何，当该子程序调用退出后，系统将自动将整个应用程序关闭。 如果省略本参数，系统将恢复错误提示的默认处理方
信息框 (“程序出错!” ＋ #换行符 ＋ “错误代码: 00000” ＋ 到文本 (错误代码), #信息图标, “友情提示”)
返回 (真)

.子程序 FF25_, 整数型
.参数 内存地址, 整数型, , 存放调用子程序地址数据的内存地址

返回 (CallWindowProcA ({ 255, 37 } ＋ 到字节集 (内存地址), 0, 0, 0, 0)) ' JMP DS:

.子程序 _按钮2_被单击

是否已经注册 ＝ 真 ' 假设已经被爆
.如果真 (是否已经注册)
    FF25_ (已注册子程序内存数据地址)
.如果真结束

.子程序 _按钮1_被单击

时钟1.时钟周期 ＝ 120

.子程序 子程序1

信息框 (“已经注册”, 0, )

.子程序 子程序2

信息框 (“暗桩”, 0, )

.子程序 _时钟1_周期事件

是否已经注册 ＝ 假 ' 这里表示没能通过注册
.如果 (是否已经注册)

.否则
    已注册子程序地址 ＝ 到数值 (&子程序2)
.如果结束