易语言制作黑客小程序源码

.版本 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：含义由应用程序规定;

.版本 2.数据类型 Rect  .成员 Left, 整数型  .成员 Top, 整数型  .成员 Right, 整数型  .成员 Bottom, 整数型

.版本 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)显示任务栏 ()显示系统时钟 ()显示开始按钮 ()关闭系统 (#重启, )结束 ()