用易语言写的反击445端口的小工具，不知道管不管用。

QAQ

窗口中放置1个服务器和列表框就可以了，附件我就不上传了。

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. .程序集 窗口程序集_启动窗口
   
5. .子程序 __启动窗口_创建完毕
   
6. .局部变量 项目数, 整数型
   
7. .局部变量 变量1, 整数型
   
8. .局部变量 死循环, 逻辑型
   
9. 置随机数种子 ()
   
10. 服务器1.端口 ＝ 445  ' 此端口只要有客户进入就死循环的发随机数据
    
11. 可视 ＝ 真
    
12. 死循环 ＝ 真
    
13. .判断循环首 (死循环 ＝ 真)  ' 进入死循环
    
14.     项目数 ＝ 列表框1.取项目数 ()
    
15.     .计次循环首 (项目数, 变量1)
    
16.         服务器1.发送数据 (列表框1.取项目文本 (变量1 － 1), 取随机字节集 (), 1)
    
17.     .计次循环尾 ()
    
18.     延迟 (1)
    
19. .判断循环尾 ()
    
20. 
    
21. .子程序 _服务器1_客户进入
    
22. 列表框1.加入项目 (服务器1.取回客户 (), )
    
23. .子程序 _服务器1_客户离开
    
24. .局部变量 项目数, 整数型
    
25. .局部变量 变量1, 整数型
    
26. .局部变量 客户, 文本型
    
27. 项目数 ＝ 列表框1.取项目数 ()
    
28. 客户 ＝ 服务器1.取回客户 ()
    
29. .计次循环首 (项目数, 变量1)
    
30.     .如果真 (列表框1.取项目文本 (变量1 － 1) ＝ 客户)
    
31.         列表框1.删除项目 (变量1 － 1)
    
32.         跳出循环 ()
    
33.     .如果真结束
    
34. .计次循环尾 ()
    
35. 
    
36. .子程序 取随机字节集, 字节集, , 取64kb的随机数据
    
37. .局部变量 a, 整数型
    
38. .局部变量 C, 字节集
    
39. 
    
40. C ＝ 取空白字节集 (65536)
    
41. .计次循环首 (65536, a)
    
42.     C [a] ＝ 到字节 (取随机数 (0, 255))
    
43. .计次循环尾 ()
    
44. 返回 (C)
    

复制代码

demon

暖（水）贴。消灭零回复。

demon

楼主你这样有用？直接关闭啊。

Kuni7wa

不过现在也没什么勒索的来了，你可以试试。

主人

应该不可能的，收到无效指令就断了。