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

DLLL命令表

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

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

(0)

相关推荐

  • 易语言地下城与勇士辅助剧情类源码

    DNF辅助剧情类源码 仅供学习参考,禁止商业用途 .版本 2 .支持库 EThread .程序集 剧情 .子程序 跳过call .局部变量 任务地址, 整数型 .局部变量 跳过CALL, 整数型 任务地址 = #任务基址 跳过CALL = #跳过CALL 置入代码 ({ 139, 77, 252, 139, 9, 106, 255, 106, 1, 255, 85, 248 }) .子程序 匹配副本 .局部变量 角色等级, 整数型 角色等级 = 汇编_读整数型 (#角色等级) .判断开始 (角色

  • 易语言制作屏幕右下角弹出窗口的源码

    屏幕右下角广告 .版本 2 .程序集 窗口程序集1 .程序集变量 伸缩判断, 逻辑型 .子程序 __启动窗口_创建完毕 .子程序 _时钟1_周期事件 .如果 (伸缩判断 = 真) .如果真 (窗口1.顶边 > 取屏幕高度 () - 窗口1.高度 - 30) 窗口1.移动 (, 窗口1.顶边 - 1, , ) .如果真结束 .否则 .如果真 (窗口1.顶边 < 取屏幕宽度 ()) 窗口1.移动 (, 窗口1.顶边 + 1, , ) .如果真结束 .如果结束 .子程序 _按钮_关闭_被单击 伸缩判

  • 易语言制作DNF解封源码

    DNF解封源码 需要加载精易模块7.0 .版本 2 .支持库 HtmlView .支持库 spec .程序集 窗口程序集__启动窗口 .程序集变量 Cookie, 文本型 .程序集变量 浏览器组地址, 文本型 .子程序 __启动窗口_创建完毕 .局部变量 ADD_数据包, 类_POST数据类 .局部变量 方式, 整数型 .局部变量 局_结果, 字节集 .局部变量 局_返回, 文本型 .局部变量 局_提交数据, 文本型 方式 = 1 浏览器组地址 = "https://act.gamesafe.q

  • 易语言超级列表框表项关键字搜索代码示例

    超级列表框表项关键字搜索示例 .版本 2 .支持库 iext .程序集 启动窗口程序集 .程序集变量 表项索引, 整数型 .子程序 _查找表项按钮_被单击 .局部变量 临时文本, 文本型 .局部变量 索引, 整数型 .局部变量 是否找到, 逻辑型 .局部变量 a, 整数型 .如果真 (输入框 ("请输入需要查找的内容", "查找表项", "易语言7", 临时文本, ) = 真) 是否找到 = 假 .计次循环首 (超级列表框.取表项数 (), a)

  • 易语言赋值定义多维数组的代码实例

    赋值定义多维数组示例 .版本 2 .程序集 窗口程序集1 .子程序 _按钮_显示_被单击 .局部变量 a, 整数型, , "0" .局部变量 c, 整数型, , "1,2" .局部变量 b, 整数型 a = { 1, 12, 2, 22, 3, 32, 4, 42 } .变量循环首 (1, 取整 (取数组成员数 (a) ÷ 2), 1, b) 重定义数组 (c, 真, b, 2) c [b] [1] = a [b × 2 - 1] 编辑框_显示.加入文本 (&quo

  • 易语言获取程序已运行时间的代码

    获取程序已运行时间 .版本 2 .支持库 iext .程序集 窗口程序集1 .子程序 _时钟1_周期事件 .局部变量 hr, 整数型, 静态 .局部变量 min, 整数型, 静态 .局部变量 sec, 整数型, 静态 sec = sec + 1 .如果真 (sec = 60) sec = 0 min = min + 1 .如果真结束 .如果真 (min = 60) min = 0 hr = hr + 1 .如果真结束 状态条1.置文本 (0, "已运行:" + 取文本右边 ("

  • 易语言地下城与勇士拾取卖物功能类源码

    DNF辅助功能类 仅供学习参考,禁止商业用途 .版本 2 .程序集 功能 .子程序 自动攻击 .局部变量 A, 整数型 .局部变量 数值, 整数型 .判断循环首 (A = 0) 置随机数种子 () 数值 = 取随机数 (0, 2) .如果真 (是否有怪物 () = 真) .如果真 (数值 = 0) 内存按键 (#X键) .如果真结束 .如果真 (数值 = 1) 内存按键 (#Z键) .如果真结束 .如果真 (数值 = 2) 内存按键 (#X键) .如果真结束 .如果真结束 超级延时 (200)

  • 易语言地下城与勇士辅助顺图类源码

    DNF辅助顺图类源码 仅供学习参考,禁止商业用途 .版本 2 .程序集 顺图 .子程序 顺图结构 .参数 方向ID, 整数型 .局部变量 一级偏移, 整数型 .局部变量 二级偏移, 整数型 .局部变量 临时数据, 整数型 .局部变量 坐标结构, 整数型 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 xF, 整数型 .局部变量 yF, 整数型 .局部变量 cx, 整数型 .局部变量 cy, 整数型 一级偏移 = 汇编_读整数型 (#人物基址) 二级偏移 = 汇编_读整数型 (一级

  • 易语言制作英雄联盟辅助的源码

    LOL辅助 此功能需要加载超级模块7.3 .版本 2 .程序集 窗口程序集_启动窗口 .程序集变量 pid, 整数型 .子程序 __启动窗口_创建完毕 pid = 取进程ID ("League of Legends.exe") 监视热键 (&开启无限视距, #F5键) 监视热键 (&关闭无限视距, #F6键) 监视热键 (&开启普攻范围, #F2键) 监视热键 (&关闭普攻范围, #F1键) 监视热键 (&开启炮塔范围, #F4键) 监视热键 (

  • 易语言地下城与勇士辅助自动刷图类源码

    DNF辅助自动刷图类 仅供学习参考,禁止商业用途 .版本 2 .支持库 EThread .支持库 spec .程序集 自动 .子程序 自动刷图 .判断开始 (全局_总开关.自动刷图开关 = 假) 全局_总开关.自动刷图开关 = 真 .判断开始 (文件读配置 ("刷图模式") = 1) 系统公告 ("自动刷图 - 开启") .判断 (文件读配置 ("刷图模式") = 2) 系统公告 ("自动剧情 - 开启") .判断 (文件读配

随机推荐