易语言检测虚拟机代码

周周

1. .版本 2
   
2. 
   
3. .子程序 __启动窗口_创建完毕
   
4. 
   
5. 
   
6. 
   
7. .子程序 检测虚拟机, 逻辑型
   
8. .局部变量 a, 整数型
   
9. 
   
10. .如果 (try_ ())
    
11.     a ＝ VMWare检测 ()
    
12.     try_out ()
    
13. .否则
    
14. 
    
15. .如果结束
    
16. .如果真 (a ≠ 0)
    
17.     返回 (真)
    
18. .如果真结束
    
19. .如果 (try_ ())
    
20.     a ＝ VPC检测 ()
    
21.     try_out ()
    
22. .否则
    
23. 
    
24. .如果结束
    
25. 返回 (a ≠ 0)
    
26. 
    
27. .子程序 VMWare检测, 整数型, , 此函数不能独立在实体机中运行,否则进程异常
    
28. .局部变量 a, 整数型
    
29. 
    
30. 置入代码 ({ 184, 104, 88, 77, 86, 187, 0, 0, 0, 0, 185, 10, 0, 0, 0, 186, 88, 86, 0, 0, 237, 129, 251, 104, 88, 77, 86, 15, 148, 69, 252 })
    
31. 返回 (a)
    
32. 
    
33. .子程序 VPC检测, 整数型, , 此函数不能独立在实体机中运行,否则进程异常
    
34. .局部变量 a, 整数型
    
35. 
    
36. 置入代码 ({ 187, 0, 0, 0, 0, 184, 1, 0, 0, 0, 15, 63, 7, 11, 133, 219, 15, 148, 69, 252 })
    
37. 返回 (a)
    
38. 
    
39. .子程序 try_, 逻辑型
    
40. 
    
41. 置入代码 ({ 232, 50, 0, 0, 0, 85, 139, 236, 131, 196, 236, 82, 139, 85, 12, 139, 69, 16, 255, 114, 8, 143, 128, 184, 0, 0, 0, 255, 114, 12, 143, 128, 196, 0, 0, 0, 255, 114, 16, 143, 128, 180, 0, 0, 0, 184, 0, 0, 0, 0, 90, 201, 194, 16, 0, 88, 201, 131, 236, 20, 139, 204, 137, 65, 4, 232, 0, 0, 0, 0, 88, 131, 192, 28, 137, 65, 8, 137, 97, 12, 100, 161, 0, 0, 0, 0, 137, 1, 100, 137, 13, 0, 0, 0, 0, 255, 97, 20, 100, 161, 0, 0, 0, 0, 139, 72, 20, 139, 0, 100, 163, 0, 0, 0, 0, 51, 192, 131, 196, 24, 255, 225 })
    
42. 返回 (假)
    
43. 
    
44. .子程序 try_out, 逻辑型
    
45. 
    
46. 置入代码 ({ 201, 89, 100, 161, 0, 0, 0, 0, 57, 104, 16, 117, 28, 139, 80, 8, 129, 122, 228, 88, 131, 192, 28, 117, 16, 139, 96, 12, 139, 0, 100, 163, 0, 0, 0, 0, 131, 196, 24, 255, 225, 51, 192, 255, 225 })
    
47. 返回 (假)
    
48. 
    
49. .子程序 _检测按钮_被单击
    
50. 
    
51. .如果 (检测虚拟机 () ＝ 真)
    
52.     信息框 (“程序禁止在虚拟机中运行”, 0, “提示”, )
    
53. .否则
    
54.     信息框 (“程序物理机中运行”, 0, “提示”, )
    
55. 
    

复制代码