简单防止调试断点思路源码

简单防止调试断点思路源码

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 集_被断点调试, 逻辑型

.子程序 __启动窗口_创建完毕

线程_启动 (&_时钟1_周期事件, , )

.子程序 _按钮1_被单击
.局部变量 局_无用, 文本型
.局部变量 局_首次时间, 长整数型

局_首次时间 ＝ 时间_取现行时间戳1 (真)
' 程序_延时 (2000, )
局_无用 ＝ 文本_取随机字符 (20, )
.如果真 (时间_取现行时间戳1 (真) － 局_首次时间 ＞ 1000)  ' //第一次时间到现在时间  间隔大于1000毫秒就断定他在断点调试跟踪  开源结束进程之类的
    集_被断点调试 ＝ 真  ' //这样最好，不在这个位置崩溃，没那么容易被干掉
    ' //结束
    ' //崩溃
.如果真结束


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

.循环判断首 ()
    .如果真 (集_被断点调试)
        信息框 (“请勿断点调试”, 0, , )
        跳出循环 ()
    .如果真结束
    程序_延时 (1000, )
.循环判断尾 (1 ＜ 9)

@昊帝