今天小编就为大家分享一篇关于易语言制作黑客小程序源码，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧
正文
易语言制作黑客小程序源码
DLLL命令表
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
.版本 2.DLL命令 FindWindow, 整数型, , "FindWindowA" .参数 lpClassName, 文本型 .参数 lpWindowName, 整数型.DLL命令 FindWindowA, 整数型, , "FindWindowA" .参数 lpClassName, 文本型 .参数 lpWindowName, 文本型.DLL命令 GetWindow, 整数型, , "GetWindow" .参数 hWnd, 整数型 .参数 uCmd, 整数型.DLL命令 SystemParametersInfo, 逻辑型, , "SystemParametersInfoA" .参数 uiAction, 整数型 .参数 uiParam, 整数型 .参数 pvParam, Rect .参数 fWinIni, 整数型.DLL命令 SendMessage, 整数型, , "SendMessageA" .参数 hWnd, 整数型 .参数 Msg, 整数型 .参数 wParam, 整数型 .参数 lParam, 整数型.DLL命令 FindWindowExA, 整数型, "user32", "FindWindowExA", , 在窗口列表中寻找与指定条件相符的第一个子窗口 找到的窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastError .参数 窗口句柄1, 整数型, , 在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找） .参数 窗口句柄2, 整数型, , 从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索 .参数 欲搜索的类名1, 文本型, , 欲搜索的类名。“”表示忽略 .参数 欲搜索的类名2, 整数型, , 欲搜索的类名。“”表示忽略;.DLL命令 SendMessageA, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定 .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄 .参数 信息值, 整数型, , 消息的标识符 .参数 参数一, 逻辑型, , 具体取决于消息 .参数 参数二, 整数型, , 具体取决于消息;.DLL命令 GetWindowLongA, 整数型, "user32", "GetWindowLongA", , 从指定窗口的结构中取得信息 由nIndex决定。零表示出错。会设置GetLastError .参数 窗口句柄, 整数型, , 欲为其获取信息的窗口的句柄 .参数 属性, 整数型, , 欲取回的信息，可以是下述任何一个常数：;GWL_EXSTYLE：扩展窗口样式;GWL_STYLE：窗口样式;GWL_WNDPROC：该窗口的窗口函数的地址;GWL_HINSTANCE：拥有窗口的实例的句柄;GWL_HWNDPARENT：该窗口之父的句柄。不要用SetWindowWord来改变这个值;GWL_ID：对话框中一个子窗口的标识符;GWL_USERDATA：含义由应用程序规定;DWL_DLGPROC：这个窗口的对话框函数地址;DWL_MSGRESULT：在对话框函数中处理的一条消息返回的值;DWL_USER：含义由应用程序规定; |
自定义数据类型表
|
1
2
3
4
5
6
|
.版本 2.数据类型 Rect .成员 Left, 整数型 .成员 Top, 整数型 .成员 Right, 整数型 .成员 Bottom, 整数型 |
黑客小程序
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
.版本 2.支持库 EThread.支持库 eAPI.支持库 spec.支持库 shell.程序集 窗口程序集1.程序集变量 hWindow, 整数型.程序集变量 hSHELLDLL_DefView, 整数型.子程序 __启动窗口_创建完毕播放音乐 (#声音1, 真)启动线程 (&修改壁纸, , )启动线程 (&开始移动, , )启动线程 (&come, , )启动线程 (&延迟93, , ).子程序 come时钟1.时钟周期 ＝ 100.子程序 修改壁纸写到文件 (“1.bmp”, #图片2)置文件属性 (“1.bmp”, 2)设置桌面墙纸 (“1.bmp”, 2).子程序 取消自动排列和对齐hWindow ＝ FindWindowA (“Progman”, “Program Manager”)hSHELLDLL_DefView ＝ FindWindowExA (hWindow, 0, “SHELLDLL_DefView”, 0)hWindow ＝ FindWindowExA (hSHELLDLL_DefView, 0, “SysListView32”, 0).如果真 (位与 (GetWindowLongA (hWindow, -16), 256) ＝ 256) SendMessage (hSHELLDLL_DefView, 273, 28753, 0).如果真结束SendMessage (hWindow, 4096 ＋ 54, 524288, 0) ' 取消自动对齐网格.子程序 开始移动.局部变量 桌面句柄, 整数型.局部变量 i, 整数型.局部变量 图标个数, 整数型.局部变量 X, 整数型.局部变量 Y, 整数型.局部变量 j, 整数型.局部变量 矩形区域, Rect.局部变量 圆心X, 整数型.局部变量 圆心Y, 整数型.局部变量 临时半径, 整数型.局部变量 半径, 整数型.局部变量 弧度, 双精度小数型.局部变量 屏幕宽度, 整数型.局部变量 屏幕高度, 整数型半径 ＝ 250桌面句柄 ＝ 取桌面句柄 ()图标个数 ＝ SendMessage (桌面句柄, 4100, 0, 0).计次循环首 (10000, j) .如果 (j ＞ 100 且 j ＜ 120 或 j ＞ 200 且 j ＜ 220 或 j ＞ 300 且 j ＜ 320) SystemParametersInfo (48, 0, 矩形区域, 0) 屏幕宽度 ＝ 矩形区域.Right － 矩形区域.Left 屏幕高度 ＝ 矩形区域.Bottom － 矩形区域.Top 圆心X ＝ 屏幕宽度 ÷ 2 圆心Y ＝ 屏幕高度 ÷ 2 .如果 (圆心X ＞ 圆心Y) 临时半径 ＝ 圆心Y .否则 临时半径 ＝ 圆心X .如果结束 .如果真 (半径 ＞ 临时半径) 半径 ＝ 临时半径 .如果真结束 图标个数 ＝ SendMessage (桌面句柄, 4100, 0, 0) 弧度 ＝ 2 × #pi ÷ 图标个数 .计次循环首 (图标个数, i) X ＝ 圆心X ＋ 取整 (半径 × 求正弦 ((i － 1) × 弧度)) Y ＝ 圆心Y ＋ 取整 (半径 × 求余弦 ((i － 1) × 弧度)) SendMessage (桌面句柄, 4111, i － 1, 合并整数 (X, Y)) .计次循环尾 () .否则 .计次循环首 (图标个数, i) X ＝ 取随机数 (0, 取屏幕宽度 ()) Y ＝ 取随机数 (0, 取屏幕高度 ()) SendMessage (桌面句柄, 4111, 图标个数 － i, 合并整数 (X, Y)) .计次循环尾 () .如果结束.计次循环尾 ().子程序 取桌面句柄, 整数型.局部变量 temp, 整数型temp ＝ FindWindow (“progman”, 0)temp ＝ GetWindow (temp, 5)temp ＝ GetWindow (temp, 5)返回 (temp).子程序 _时钟1_周期事件模拟按键 (91, , ).子程序 延迟93延迟 (50000)显示任务栏 ()显示系统时钟 ()显示开始按钮 ()关闭系统 (#重启, )结束 () |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对米米素材网的支持。如果你想了解更多相关内容请查看下面相关链接
发表评论