按键精灵源代码整理
Hwnd = Plugin.Window.MousePoint()
Rem XX
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Goto XX
2. 奶妈挂机加血（自动用蓝药，配合奶妈7秒叶子）
Hwnd = Plugin.Window.MousePoint()
Call Plugin.Window.Size(Hwnd, 900, 600)
Call Plugin.Window.Move(Hwnd, 4, 143)
Rem XX
IfColor 325,208,"163CDB",0 Then
Else
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
End If
IfColor 257,208,"163CDB",0 Then
Else
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
End If
IfColor 163,222,"9C841A",0 Then
Else
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
End If
IfColor 77,226,"453A10",0 Then
Else
'==========以下是按键精灵录制的内容==========（这个是控制鼠标去点掉宠物附体回蓝的，属于前台的）
Delay 291
MoveTo 374, 506
MoveTo 375, 504 Delay 33 MoveTo 375, 503 Delay 50 MoveTo 377, 501 Delay 36 MoveTo 381, 500 Delay 49 MoveTo 385, 498 Delay 40 MoveTo 386, 498 Delay 163 MoveTo 388, 497 Delay 9 MoveTo 389, 497 Delay 7 MoveTo 390, 497 Delay 50 MoveTo 394, 496 Delay 51 MoveTo 397, 495 MoveTo 398, 494 Delay 30 KeyDown "1", 1 Delay 19 MoveTo 402, 493 Delay 43 MoveTo 405, 491 Delay 40 MoveTo 410, 486 Delay 1
KeyUp "1", 1 Delay 61 MoveTo 430, 471 Delay 55 MoveTo 459, 431 Delay 8 MoveTo 463, 423 Delay 7 MoveTo 468, 414 Delay 55 MoveTo 503, 331 Delay 47
MoveTo 531, 287 Delay 1 MoveTo 535, 282 Delay 54 MoveTo 551, 261 Delay 12 MoveTo 553, 259 MoveTo 556, 257 Delay 55 MoveTo 564, 251 Delay 36 MoveTo 572, 246 Delay 43 MoveTo 583, 240 Delay 38 MoveTo 589, 235 Delay 37 MoveTo 593, 233 Delay 30 MoveTo 597, 230 Delay 47 MoveTo 602, 226 Delay 1 MoveTo 605, 223 Delay 32 MoveTo 608, 219 Delay 36 MoveTo 611, 215 Delay 38 MoveTo 614, 211 Delay 39 MoveTo 615, 208 Delay 143 MoveTo 616, 207 Delay 332 RightDown 1 Delay 14 RightDown 1 Delay 53 RightClick 1 Delay 1 RightClick 1 Delay 68 MoveTo 617, 206
Delay 66 MoveTo 621, 202 Delay 58 MoveTo 624, 199 Delay 40 MoveTo 625, 197 Delay 10 MoveTo 626, 197 Delay 77 MoveTo 627, 196 Delay 51 MoveTo 627, 195 Delay 30 MoveTo 627, 194 Delay 67 MoveTo 627, 193 Delay 1325 RightDown 1 Delay 8 RightDown 1 Delay 109 RightClick 1 Delay 1 RightClick 1 Delay 1362 MoveTo 628, 194 Delay 113 MoveTo 628, 195 Delay 42 MoveTo 628, 196 Delay 25 MoveTo 628, 198 Delay 1 KeyDown "2", 1 Delay 1
Delay 48 MoveTo 631, 206 Delay 1 MoveTo 631, 207 Delay 46 MoveTo 637, 219 Delay 37 MoveTo 637, 220 Delay 1
KeyUp "2", 1
Delay 1
MoveTo 640, 229
Delay 77
MoveTo 647, 243
Delay 46
MoveTo 648, 247
Delay 63
MoveTo 648, 249
Delay 30
MoveTo 648, 250
Delay 77
MoveTo 648, 251
Delay 134
MoveTo 650, 252
Delay 44
MoveTo 656, 256
Delay 38
MoveTo 674, 269
Delay 32
MoveTo 704, 295
Delay 27
MoveTo 745, 326
Delay 70
MoveTo 954, 476
Delay 11
MoveTo 978, 490
Delay 2
MoveTo 1000, 504
Delay 283
MoveTo 1113, 582
Delay 51
MoveTo 1099, 584
Delay 50
MoveTo 1084, 582
'==========以上是按键精灵录制的内容========== End If
Goto XX
3. 奶妈7秒叶子
Hwnd = Plugin.Window.MousePoint()
Rem AA
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Delay 14000
Goto AA
4. 奶妈无限群加
Hwnd = Plugin.Window.MousePoint()
Rem xx
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.LeftClick(Hwnd, 450-dx, 380-dy)
Delay 1000
Goto xx
5. 剑半后台挂机，自动回宗派躲验证（怪物血条得露出来才行，其他的按键是后台操作）Hwnd = Plugin.Window.MousePoint()
Call Plugin.Window.Size(Hwnd, 800, 500)
Call Plugin.Window.Move(Hwnd, 0, 140)
Rem 重置时间
Dim t1
t1=now
Rem XX
IfColor 215,206,"1332B1",0 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 54)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 56) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 50) Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 55)
Else
Call Plugin.Bkgnd.KeyPress(Hwnd, 68)
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
Delay 500
End If
IfColor 215,206,"1332B1",0 Then
Goto XX
Else
if datediff("n",t1,now)>=35 then（35分钟自动回宗派）Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 57)
Delay 5000
IfColor 215,206,"1332B1",0 Then
Goto XX
Else
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 57) Delay 80000
MoveTo 757, 759
Delay 2000
LeftClick 1
Delay 2000
MoveTo 422, 471
Delay 2000
LeftClick 1
Delay 150000
MoveTo 399, 700
Delay 1000
LeftClick 1
Delay 70000
MoveTo 542, 620
Delay 15000
LeftClick 1
Delay 1000
Goto 重置时间
End If
Else
Goto XX
End If
End If
Goto XX
6. 奶妈半后台打怪
Hwnd = Plugin.Window.MousePoint()
Call Plugin.Window.Size(Hwnd, 800, 500)
Call Plugin.Window.Move(Hwnd, 480, 0)
Rem 重置时间
Dim t1
t1=now
Rem XX
IfColor 695,66,"1332B1",0 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 54)
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 54)
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Call Plugin.Bkgnd.KeyPress(Hwnd, 52)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53)
Call Plugin.Bkgnd.KeyPress(Hwnd, 55)
Call Plugin.Bkgnd.KeyPress(Hwnd, 53) Else
Call Plugin.Bkgnd.KeyPress(Hwnd, 68)
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
Delay 500
End If
IfColor 695,66,"1332B1",0 Then
Goto XX
Else
if datediff("n",t1,now)>=35 then
Delay 1011
Call Plugin.Bkgnd.KeyPress(Hwnd, 48)
Delay 5011
IfColor 695,66,"1332B1",0 Then
Goto XX
Else
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 48)
Delay 80011
MoveTo 1236, 621
Delay 2011
LeftClick 1
Delay 2011
MoveTo 896, 331
Delay 2011
LeftClick 1
Delay 150051
MoveTo 876, 567
Delay 1011
LeftClick 1
Delay 70011
MoveTo 1030, 484
Delay 10011
LeftClick 1
Delay 2000
Goto 重置时间
End If Else
End If
End If
Goto XX
按键精灵商业独立界面教程
商业独立型界面制作教程 目录 给独立界面添加注册功能 (2) 给独立界面添加解绑功能 (13) 给独立界面添加试用功能 (16) 给独立界面添加载入自动注册功能 (19) 设置独立界面各按钮的有效性（优化） (22) 给独立界面添加启动脚本功能 (25) 给独立界面添加暂停继续功能 (28) 给独立界面添加终止脚本功能 (31) 给独立界面添加保存设置功能 (33) 关于源码的一些补充和命令的详细说明 (35) 给独立界面添加热键修改设置 (44)
给独立界面添加注册功能 1、打开按键精灵商业版，新建一个脚本。点击右边的“界面”按钮，可以看到按键精灵界 面编辑器，用于制作按键精灵脚本设置界面的工具。如下图 2、将右边属性面版上的名称一栏改为“主界面”，其他保持不变。如下图
3、选择工具箱上的标签控件在界面上框选一个区域。如下图 4、将右边对应的属性面版上的标题改为“注册码:”，其他保持不变。如下图 5、选择工具箱上的“输入框”控件，在界面上框选出一个区域。如下图
6、将右边属性面版上的名称一栏改为“注册码输入框”，其他保持不变。如下图 7、选择工具箱上的下拉框控件在界面框先一个区域，如下图
8、将右边属性面版上的名称一栏改为“注册服务器”，选项列表上添加“电信1、网通1、 电信2”，初始选项一栏设为“0”，其他保持不变。如下图 9、选择工具箱上的按钮控件在界面框选一个区域，如下图
10、将右边属性面版上的名称一栏改为“注册按钮”，标题一栏改为“注册”，其他保持 默认。如下图 11、界面控件都画好了，下面给脚本添加上我们的注册功能代码。 选中“注册”按钮，选择属性面版上的按钮点击事件（或双击“注册”按钮），来到脚本源文件编辑界面。如下图
学习游戏脚本制作：按键精灵键鼠同步器源码分享
学习游戏脚本制作：按键精灵键鼠同步器源码分享 来源：按键学院【按键精灵】小编之前也有使用过其它大牛编写的游戏同步的脚本，突然间对于它是如何实现同步感到十分好奇，我们一起来研究看看，同步到底是怎么实现的吧~ NO.1-同步的前提 前提 1同步的两个窗口需要是同一个应用窗口，并且窗口大小要相同 2同步窗口可以接收到按键的键鼠发送信息 3同步的窗口支持后台键鼠操作 NO.2-本节例子及其能实现的功能 例子 1画图工具，实现同步画图 2记事本，实现同步删除内容 功能①键鼠同步 ②支持组合键 NO.3-思路大剖析
思路步骤 1获取主窗口和被同步窗口句柄 ● WaitKey 命令等待键盘按下 ○按下F6则获取当前鼠标指向的窗口句柄，作为主窗口句柄。 ○按下F7 则获取当前鼠标指向的窗口句柄，作为同步窗口句柄。 ●用Do循环来等待按键，当主窗口句柄和同步窗口句柄都获取到时，退出Do循环 ●代码 Do Key = WaitKey() If Key = 117 Then 主窗口= Plugin.Window.MousePoint() End If If Key = 118 Then 同步窗口= Plugin.Window.MousePoint() End If Delay 500 If 主窗口<> 0 and 同步窗口<> 0 Then Exit Do End If Loop 2设置两个窗口的窗口大小一致 ●窗口大小一致，同步的时候鼠标才能移动到正确的位置。 ●代码 Call Plugin.Window.Size(主窗口,800,600) Call Plugin.Window.Size(同步窗口,800,600)
按键精灵判断DNF人物位置源码
按键精灵判断DNF人物位置源码 DNF这游戏，每次进图的时候，boos位置还有门口位置和障碍物每次可能都不一样.这让不少制作脚本的新手很苦恼，前段时间有人在按键精灵官方论坛分享了判断人在哪里和boss在哪里的脚本，这里就共享给大家。思路大致如下：把副本的小地图分为横6纵9然后找色判断。源码发出来就是： Delay 3000 Plugin hwnd = Window.GetKeyFocusWnd() Delay 50 Delay 100 Plugin Window.Move(hwnd,0,0) Delay 300 Plugin XY = Color.FindMutiColor(509, 19, 634, 250, "FFCC11", "1|0|BB5500,0|3|EEDD00", 0.9) MyArray = Split(XY, "|") X = Clng(MyArray(0)): Y = Clng(MyArray(1)) y1=47 x1=627 n=1 //MessageBox x //MessageBox y For 9 x1=627 y2=y1+18 For 6 //MoveTo x1,y1 //Delay 500 //MessageBox 1 x2=x1-18 //MoveTo x2,y2 //MessageBox 2 //If 550 学会用按键精灵制作脚本之RunApp 运行命令教程： 用脚本运行可执行程序 来源：按键学院【按键精灵】Runapp命令，看上去是不是觉得so easy ？不就是runapp 某个程序的路径，然后就可以打开这个程序了吗？老话怎么说来着，越简单的东西越是不简单。Runapp使用起来也是处处暗藏杀机滴。 Runapp命令是个啥？ 命令名称RunApp 运行 命令功能启动一个程序或者打开一个文件 命令参数参数1 字符串型，要运行的程序或者文件 重头杀机——你所要启动的程序是带参数的，runapp 不支持启动带参数的程序。 首先，我们可以使用进程查看工具，查看下我们要启动的程序是否是带有参数的。 然后，我们打开进程查看工具，然后点击我们要查看的程序，例如QQ程序。 图1的是QQ的快捷键方式属性；图2是进程工具查看到的QQ程序信息；图3是进程工具界面如果是带有参数的程序，用进程工具打开之后，弹出的图2界面，在程序路径后面会出现参数。 例如：F:\桌面\程序目录\Not.exe $-fl$ 解决方法之一： 1. 鼠标右键，创建快捷方式 1)右击创建好的快捷方式——>属性： 2)“目标内容”填写目标文件路径及参数： 3)F:\桌面\程序目录\Not.exe $-fl$ 4)“起始位置”填写目标文件夹： 5)F:\桌面\程序目录 （用进程查看工具查看，有的情况下会发现，程序所在的位置并不是程序的目录，这里要注意确认，一定要填写程序的其实位置，程序所在的目标文件夹的位置） 如图所示： 2. 使用RunApp启动这个快捷方式，例如在此快捷方式在桌面时。 Call RunApp("C:\Users\Death\Desktop\Not.exe.lnk") 经过上面的两步就可以达到预想的目的了。 解决方法之二： 来自按键精灵的DNF刷第一图源码 被虐疯了才憋出一个可以解恨的DNF刷图源码，源码内包含了换角色、改键、区域移动、地图选择、出售、封装识别。18个地图的一图（其他地图可以自己修改下就可以刷全部图的一图） 主要是给新手学习的，老鸟别喷。附件在下面，做了很久了，随着游戏更新现在不一定能正常使用可以自己修改下： PutAttachment ".\plugin" ,"*.dll" UserVar dtxz=DropList{"洛兰(1)":"0"|"洛兰深处(2)":"1"|"幽暗密林(3)":"2"|"雷鸣废墟(5)":"3"|"冰霜幽暗密林(8)":"4"|"烈焰格拉卡(12)":"5"|"龙人之塔(16)":"6"|"人偶玄关(18)":"7"|"石巨人塔(20)":"8"|"黑暗玄廊(22)":"9"|"城主宫殿(25)":"10"|"神殿外围(27)":"11"|"树精丛林(28)":"12"|"炼狱(29)":"13"|"极昼(30)":"14"|"第一脊椎(32)":"15"|"第二脊椎(34)":"16"|"天帷禁地(36)":"17"|"()":"5"|"()":"5"|"()":"5"|"()":"5"|"()":"5"|"()":"5"|"()":"5"|"()":"5"}=0 "地图选择" UserVar bjfs=DropList{"机箱":"0"|"音响":"1"}=0 "报警方式" UserVar jsgh=DropList{"更换":"0"|"不换":"1"}=0 "角色更换" UserVar jssl=1 "角色数量" UserVar jhks=1 "几号开始" UserVar jtj1=0 "进图按键" UserVar jtj2=0 "进图按键" UserVar jtj3=0 "进图按键" UserVar ctj1=0 "出图按键" UserVar ctj2=0 "出图按键" UserVar jqaj=0 "捡取按键" UserVar csaj=0 "出售按键" Hwnd = Plugin.Window.Find(0, "地下城与勇士") Call Plugin.Window.Move(Hwnd, 0, 0) Delay 1000 Rem 主程序 Call 选择角色() Call 疲劳改键() Call 移动区域() Call 地图选择() Goto 主程序 Sub 选择角色() If jsgh=0 Then IfColor 210,440,"6B949C",0 Then jsx=117 jsy=137 If jhks<5 Then For jhks-1 1. 御剑脚本 Hwnd = Plugin.Window.MousePoint( Rem XX Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 50 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 Call Plugin.Bkgnd.KeyPress(Hwnd, 53 Goto XX 2. 奶妈挂机加血（自动用蓝药，配合奶妈7秒叶子）Hwnd = Plugin.Window.MousePoint( Call Plugin.Window.Size(Hwnd, 900, 600 Call Plugin.Window.Move(Hwnd, 4, 143 Rem XX IfColor 325,208,"163CDB",0 Then Else Call Plugin.Bkgnd.KeyPress(Hwnd, 50 End If IfColor 257,208,"163CDB",0 Then Else Delay 1000 Call Plugin.Bkgnd.KeyPress(Hwnd, 51 Delay 1000 Call Plugin.Bkgnd.KeyPress(Hwnd, 52 End If IfColor 163,222,"9C841A",0 Then Else Call Plugin.Bkgnd.KeyPress(Hwnd, 53 End If IfColor 77,226,"453A10",0 Then Else 按键精灵开发教程：获取特殊文件夹路径 来源：按键学院【按键精灵】 电脑里有些特别的文件夹，它的路径并不是每台电脑都一样。 例如，有很多游戏喜欢把一些配置文件放在，“我的文档”文件夹下 但是“我的文档”文件夹的路径，并不是每台机子都一样的，例如， 在一台win7机子上，它的路径是这样：C:\Documents and Settings\ceshiji\My Documents 在一台xp机子上，它的路径是这样：D:\Backup\我的文档 看起来十分头疼~ 实际上一行代码就可以解决这个问题 q97012791童鞋收集了50多个特殊文件夹的路径获取方式，以后再也不用担心获取不到特殊文件夹路径了~ 点32个赞~~ 获取方法 MsgBox CreateObject("Shell.Application").Namespace(&H3).Self.Path“控制面板”文件夹 MsgBox CreateObject("Shell.Application").Namespace(&H4).Self.Path“打印机”的桌面图标 MsgBox CreateObject("Shell.Application").Namespace(&H5).Self.Path当前用户的“我的文档”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H6).Self.Path当前用户的“收藏夹”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H7).Self.Path当前用户的“启动”菜单文件夹MsgBox CreateObject("Shell.Application").Namespace(&H8).Self.Path当前用户的“文档”菜单文件夹MsgBox CreateObject("Shell.Application").Namespace(&H9).Self.Path当前用户的“发送到”文件夹MsgBox CreateObject("Shell.Application").Namespace(&HA).Self.Path回收站 MsgBox CreateObject("Shell.Application").Namespace(&HB).Self.Path当前用户的“开始”菜单文件夹MsgBox CreateObject("Shell.Application").Namespace(&HC ).Self.Path logical"My Documents"desktop icon MsgBox CreateObject("Shell.Application").Namespace(&HD).Self.Path当前用户的“音乐文件”文件夹MsgBox CreateObject("Shell.Application").Namespace(&HE).Self.Path"My Videos" folder MsgBox CreateObject("Shell.Application").Namespace(&H10).Self.Path当前用户的“桌面”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H11).Self.Path“我的电脑”桌面图标 MsgBox CreateObject("Shell.Application").Namespace(&H12).Self.Path“网上邻居”的桌面图标 MsgBox CreateObject("Shell.Application").Namespace(&H13).Self.Path当前用户的“网络连接”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H14).Self.Path“系统字体”文件夹 MsgBox CreateObject("Shell.Application").Namespace(&H15).Self.Path系统中存储文档模块的文件夹MsgBox CreateObject("Shell.Application").Namespace(&H16).Self.Path所有用户的“开始菜单”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H17).Self.Path所有用户的“程序”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H18).Self.Path所有用户的“启动”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H19).Self.Path所有用户的“桌面”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H1A).Self.Path当前用户的“应用数据”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H1B).Self.Path当前用户的“网络打印机”桌面图标MsgBox CreateObject("Shell.Application").Namespace(&H1C).Self.Path当前用户的“应用数据”文件夹MsgBox CreateObject("Shell.Application").Namespace(&H1D).Self.Path non localized startup MsgBox CreateObject("Shell.Application").Namespace(&H1E).Self.Path non localized common startup MsgBox CreateObject("Shell.Application").Namespace(&H1F).Self.Path所有用户的“我的收藏”夹文件MsgBox CreateObject("Shell.Application").Namespace(&H20).Self.Path当前用户IE的“Cache”文件夹 游戏辅助教程：按键精灵给源代码加密 来源：按键学院【按键精灵】有童鞋问了小编这么一个绕人的问题：想分享代码而又不想完全分享，该怎么办？ 小编：说人话…… 童鞋：我想分享我写的一个函数给别人使用，但是不想公开源码，该怎么办？ 好办，命令库的加密功能就能实现。 啥是命令库加密？ 命令库加密就是将命令库里写好的函数命令封装起来，源码不可见。使用者可以使用你的函数命令，但却看不到函数命令源码。 如何使用加密功能？ 1、首先，需是按键精灵会员，才能使用命令库加密功能。加密之后的命令库命令，可以给其它会员或者非会员使用。 2、右击我的命令库里需要加密的命令，点击加密。 3、加密之后会新生成一个带锁图标的命令库文件，原来未加密的命令库文件也还存在。 4、加密的命令库文件，在按键精灵安装目录下的，lib文件夹里。 未加密的命令库文件后缀名是.qml 加密之后的命令库文件后缀名为.qmle 如果觉得到按键目录下找很麻烦，可以右击加密后的命令库文件： 选择导出，将加密的命令库文件导出到桌面或者其它好找的位置。 如何分享加密后的命令库命令？ 1、生成加密文件后，将.qmle命令库文件，发送给要使用的人。 2、要使用的人接收到.qmle文件之后，将它放到按键精灵安装目录下的lib文件夹中。 3、打开按键精灵进行使用，如果按键精灵已经是打开状态，右击我的命令库里的任意命令，选择刷新即可看到新添加的命令库命令。 加密和未加密的命令库调用方式 1、未加密的命令库命令调用： Call Lib.大漠注册.register(dz) 2、加密的命令库命令调用： Call LibE.大漠注册.register(dz) 两者调用的区别在于：未加密的是lib.命令库命令。加密的是LibE.命令库命令 按键精灵脚本开发教程：随机数写法 来源：按键学院【按键精灵】 小编今天要分享三种随机数不重复的方法 ~快来围观~ 常规方法 将随机到的数字放到数组里，然后每次随机产生的数字都和数组里已有的数字进行比较，如果有重复的则重新生成。 代码：（生成10个范围在10以内的随机数） Dim TmpDat(10) For i = 0 To 9 Randomize TmpRnd = Int(rnd * 10) For j = 0 To i - 1 If TmpDat(j)=TmpRnd Then i = i - 1 : TmpBol = TRUE End If Next If TmpBol Then TmpBol = False Else TmpDat(i) = TmpRnd : TracePrint TmpRnd Next 分析： 1、Dim TmpDat(10) //例如，需要产生10个不重复的数字，则定义数组，数组元素个数为10 2、For i = 0 To 9//由于数组的最小下标是从0开始的，所以循环从0开始到9,循环10次 3、Randomize //随机函数初始化 4、TmpRnd = Int(rnd * 10) //我们生成0-10范围内的数字，便于查看效果 5、For j = 0 To i - 1 //再做一次循环，将当前生成的随机数与前面生成的随机数一一进行比较。 例如：i=5，说明之前已经执行过5次，数组TmpDat里已经有了5个元素，它们的下标从0-4 。 当我们想要查看当前随机到的数字有没有重复，就需要和前面的产生的随机数进行比较。所以从0循环到i-1 ( i 自身就不需要和自身比了，所以这里需要减1，排除自身)。 6、If TmpDat(j)=TmpRnd Then//如果生成的随机数在数组里已经存在 i = i - 1 : TmpBol = TRUE//则i的值减去1，并且做一个标记，tmpbol设置为true End If 7、If TmpBol Then TmpBol = False Else TmpDat(i) = TmpRnd : TracePrint TmpRnd //如果TmpBol 是真的，说明随机数字重复了，不做赋值判断，将tmpbol的赋值假。如果TmpBol 不是真的，说明随机数字没有重复，将新产生的随机数赋值给数组，并且输出。 输出： 学习脚本制作：按键精灵解决游戏辅助卡死 来源：按键学院【按键精灵】盆友写了个押镖脚本，刚开顺顺当当的，运行一会儿后没了反应，不操作也不停止脚本。“为什么突然不灵了呢？”小编最喜欢灵异事件，于是火急火燎的去看。 为什么突然不灵了？ 盆友玩的是: XXXX某游戏 押镖规则： 1、可以选择坐在镖车上、步行、或者骑马。 2、步行或者骑马，人物在前面走，镖车会跟随人物。 3、如果人物与镖车距离过远了，镖车则停止跟随，停留在原地。 ●如果人物坐在镖车上，镖车行走的速度比蜗牛还慢，所以盆友选择了骑马的方式。 ●骑马的速度是快过镖车的，很容易造成镖车和人物距离远，镖车不跟随的情况。所以盆友这样写:骑马骑一段时间，停下来等待，循环找图，找到镖车图标之后，继续前进。 ●兴许是马儿跑得欢了，等停下来等待的时候，与镖车的距离早已超过了镖车会自动跟随的距离。 ●找不到镖车的图，就一直循环一直循环~看上去就像脚本卡住了一样 由此可见，死循环完全可以终结一个脚本。 死循环的例子还有其它 例如： 在游戏里点击npc交任务的时候，正常的流程是这样的： 1、循环找交任务按钮，找到交任务的按钮则点击，找不到则继续找， 2、循环找接新任务的按钮，找到则点击，找不到则继续找。 但是会出现这样的情况，有的任务提交限等级，没有30级不能提交。 这个时候我们点击完交任务的按钮，npc对话框上会提示没满等级任务不能交，但是npc 交任务的对话框依然还在。 接新任务的按钮被对话框遮挡，无法找到，则进入死循环。 怎样才能解决死循环呢？ 方法1： 既然循环会死- -，那就干脆不用循环。//以点击npc弹出对话框点击对话框里的接新任务为例。 1、点击npc对话 2、算准点击npc之后，对话框延时多长时间弹出来。 3、用延时命令，延时之后再进行找图。 LeftClick 1//点击npc Delay 3000 //延时三秒等待npc对话框出现 FindPic 0,0,1024,768,"c:\接新任务按钮.bmp",0.9,intX,intY 1、属于"全部命令"的是? 正确答案：我的命令库 2、下列网址可以访问按键精灵论坛的是? 正确答案：https://www.360docs.net/doc/e28089619.html,/ 3、关于加密脚本的描述，下列是错误的是? 正确答案：只有会员输入密码可以解开加密脚本 4、WaitClick命令的含义是? 正确答案：按任意鼠标键继续 5、按键精灵会员卡注册码,没有以下哪一种? 正确答案：天卡(1天) 6、RightClick命令的含义是? 正确答案：右键单击 7、按键精灵生成的小精灵程序的后缀名是? 正确答案：EXE 8、GetLastClick命令的含义是? 正确答案：检测上次按过的鼠标键 9、按键精灵的产品包括以下哪一个? 正确答案：按键盒子 10、RestoreMousePos命令的含义是? 正确答案：恢复上次保存的鼠标位置 11、按键精灵默认的启动热键是? 正确答案：F10 12、对小精灵的描述，以下是正确的? 正确答案：按键小精灵是把按键精灵的脚本打包成一个可单独执行的EXE程序，便于传播以及提供给新手使用。 13、SaveMousePos命令的含义是? 正确答案：保存当前鼠标所在位置 14、LeftClick命令的含义是? 正确答案：左键单击 15、可以使用神盾功能的程序是? 正确答案：小精灵商业版 16、哪种方法不能打开一个已经存在的脚本? 正确答案：选中脚本,单击鼠标左键 17、按键盒子主要功能特点是什么? 正确答案：游戏通用 18、按键精灵自带的用户界面叫做什么? 正确答案：QUI界面 19、下列哪一种方法不能够正确输入命令? 正确答案：鼠标右键单击命令 20、下列哪一个命令不属于"全部命令"? 正确答案：内核命令 21、键盘命令的类型不包括? 正确答案：锁定 22、MiddleClick命令的含义是? //〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓 UserVar 联系作者方式=DropList{"QQ：410561049":0|"查看版本号":1} = 0 "联系作者方式" UserVar 注册码="请输入注册码[请勿更改]" "请输入注册码[请勿更改]" UserVar 网络速度_拍=DropList{"网络速度[快速]":0|"网络速度[中速]":1|"网络速度[慢速]":2}=0 "请选择您的网络速度" UserVar 自动收取邮件_拍=DropList{"自动收取邮件":0|"无需自动收取":1}=0 "是否自动收取邮件" UserVar 收件截图_拍=DropList{"收取邮件后截图存盘[D:盘]":0|"不用截图":1}=0 "收取邮件是否截图" UserVar 上架拍卖行_拍=DropList{"自动上架拍卖品":0|"不用上架拍卖品":1} = 0 "是否要上架拍卖品" UserVar 上架的种类_拍=DropList{"只上架材料栏物品":0|"上架所有种类的物品":1}=0 "请选择要上架的种类" UserVar 先后顺序_拍=DropList{"先收邮件和上架后再秒拍卖行":0|"先秒拍卖行后再收邮件和上架":1}=0 "请选择先后顺序" UserVar 选择功能_拍=DropList{"单开秒拍卖行(可以兼职摆摊)":0|"双开一秒一防掉":1|"双开一秒一防掉+上架拍卖品收邮件":2|"双开只防掉":3|"单开只防掉":4}=0 "请选择您要的功能" UserVar 输入法设置方式=DropList{"自动设置输入法短语":0|"手动设置输入短语":1} = 0 "请选择输入法设置方式[请勿更改]" UserVar 识别功能_拍=DropList{"开启识别功能[准确率提高]":0|"关闭识别功能[速度上升]":1}=0 "请选择是否开启识别功能" UserVar 屏幕显示_拍=DropList{"秒拍屏幕显示[挂机不建议使用]":0|"不用显示[速度上升]":1}=0 "请选择是否显示屏幕提示" UserVar 记录行情_拍=DropList{"记录拍卖行行情[D:盘]":0|"不用记录拍卖行行情":1}=0 "请选择是否记录拍卖行行情" UserVar 秒拍截图_拍=DropList{"秒拍成功后截图存盘[D:盘]":0|"不用截图":1}=0 "请选择秒拍成功后是否截图" 按键精灵实现多线程多开脚本教程 来源：按键学院 【按键精灵】 “多线程到底怎么实现？好复杂！” 小编时常在论坛里，看到有童鞋发出这样的疑问。 小编觉得多线程就好似冰山美人，外冷内热。乍一看，好像很不好相处，近一步，则会发 现其实她很温柔。 到底有多温柔呢？一起来看看~ QUI 界面 写代码之前，我们先画脚本的Qui 界面。如下图： 项方式案；高中资 思路 我们拿记事本作为多开的对象。脚本由以下三个按钮点击事件组成： 1、点击QUI 界面中的"一键启动"按钮，启动记事本，启动的记事本个数由InputBox1里 填入的数值决定。启动线程，将线程id 、窗口句柄记录到ini 文件中。在线程调用的子程 序里，对记事本输入内容。 2、点击“关闭所有窗口”按钮，则读取ini 中保存的线程id 、窗口句柄，关闭线程之后关 闭窗口。 3、点击“暂停”按钮，则读取ini 文件中和InputBox2文本框中对应数值的窗线程id ， 暂停该线程。再次点击“暂停”按钮，则读取ini 文件中和InputBox2文本框中对应数值 的窗线程id ，恢复该线程。 “一键启动”按钮点击事件 步骤： 1、启动记事本窗口。 2、修改记事本的标题名称。 3、每个记事本窗口对应启动一个线程。 4、将窗口句柄、线程id 记录到ini 文件中。 仅工艺中资料 1、启动记事本窗口。 获取InputBox1中的数值。利用for循环打开记事本窗口。 For i = 1 To Form1.InputBox1.Text //打开记事本 RunApp "Notepad.exe" Next 打开记事本之后，我们需要判断下记事本是不是已经打开，如果打开了则获取窗口句柄，如果没有打开，则继续循环判断记事本是不是已经打开。避免当游戏窗口还没有打开获取不到窗口句柄的情况。 do hwnd = Plugin.Window.Find(0, "无标题- 记事本")//获取记事本句柄 Loop while (Hwnd=0) 2、修改记事本窗口的标题。 修改了窗口标题，便于我们管理多窗口。且：第1点中说到的判断记事本窗口是不是打开，当游戏窗口标题都是一样的情况下，这个方法就会失效。第一个窗口打开了，第二个窗口不管有没有打开，那么获取到的还是第一个窗口的句柄。 Do If stext ="第"&i&"窗口" Then Exit Do End If call Plugin.Window.SetText(hwnd,"第"&i&"窗口") stext = Plugin.Window.GetText(hwnd) Loop //循环的第一次修改窗口标题，第二次开始判断标题有没有修改成功，没有的话则继续修改，成功的话则退出do 循环。 3、启动多线程。( 线程相关知识 ) 线程ID = BeginThread(打字) 在for循环里加入这一句启动线程的代码，每循环一次开启一个新的线程。 所以，在启动完线程之后，要趁热把线程id记录起来。 学习按键精灵制作炫酷脚本运行提示窗口 来源：按键学院【按键精灵】小编现在的心情十分激动，即将要去思密达旅行~这头一次坐飞机，会不会晕鸡呢？在无比激动的心情下，小编食指一抖又打开电脑到处逛逛，突然看见，有款十分炫酷的脚本，它的脚本运行提示信息是那样那样的，哇~好高端的样子~ 炫酷的脚本运行提示 这款脚本，小编是在简单游上看到的，蕃茄大大的脚本，它的运行提示信息，不是使用气泡，而是使用大漠的Foobar制作的提示窗口，看起来不仅赏心悦目，而且脚本运行的状态信息，一目了然。 哈哈，咱们也照葫芦画瓢，也学习着做一个炫酷提示，做什么好呢？有了，就做——思密达美食副本运行提示信息 步骤 ★使用大漠的CreateFoobarRoundRect 函数创建一个圆角形窗口 ★使用大漠的FoobarFillRect 函数填充矩形颜色（绘制颜色不一的矩形框，美化窗口）★使用大漠的FoobarDrawPic 函数绘制图像（用于显示图片） ★使用大漠的FoobarDrawText 函数绘制文字 ★★ 比较麻烦的地方，是计算矩形条在圆角窗口里的显示位置，以及整个窗口的配色方案 函数CreateFoobarRoundRect（创建一个圆角矩形窗口） 语法dm.CreateFoobarRoundRect(hwnd,x,y,w,h,rw,rh) 参数定义hwnd : 指定的窗口句柄,如果此值为0,那么就在桌面创建此窗口x : 左上角X坐标(相对于hwnd客户y : 左上角Y坐标(相对于hwnd客户区坐标) w: 矩形区域的宽度 h : 矩形区域的高度 rw : 圆角的宽度 rh : 圆角的高度 返回值创建成功的窗口句柄 注：创建窗口还有其它的形状，例如：CreateFoobarEllipse（创建一个椭圆窗口）、CreateFoobarRect （创建一个矩形窗口） 函数FoobarFillRect (在指定的Foobar窗口内部填充矩形) 语法dm.FoobarFillRect(hwnd,x1,y1,x2,y2,color) 参数定义hwnd :指定的Foobar窗口,此句柄必须是通过CreateFoobarxxxx系列函数创建出来的x1 :左上角X坐标(客户区坐标) y1 : 左上角Y坐标(相对于hwnd客户区坐标) x2 :右下角X坐标(相对于hwnd客户区坐标) y2 : 右下角Y坐标(相对于hwnd客户区坐标) color:填充的颜色值 返回值0 : 失败 1 : 成功 以下哪一个不是按键精灵的产品? 按键箱子 录制的脚本没有以下哪个功能? 记录鼠标特征码 下列哪一个命令不属于"全部命令"? 内核命令 按键精灵自带的抓图工具是? 按键抓抓 哪一种方法能够找到命令的帮助说明? 在全部命令中搜索命令,点击后帮助说明会出现在编辑器下方. 按键精灵不可以在以下哪个系统中使用? Linux 可以使用神盾功能的程序是? 小精灵商业版 旧版本的脚本导入到新版本中,以下哪种方法不可以纠正语法错误? 使用"自动缩进"功能 WaitClick命令的含义是? 按任意鼠标键继续 哪一类脚本程序是按键精灵官方授予销售权的? 小精灵商业版 只要在编辑脚本，切换输入法时，按键精灵就卡住了,可能是下列哪一个原因? Plugin目录下装有不是官方提供的插件引起的 关于加密脚本的描述，下列是错误的是? 只有会员输入密码可以解开加密脚本GetLastClick命令的含义是? 检测上次按过的鼠标键 按键精灵生成的小精灵程序的后缀名是? EXE 按键精灵会员不能享受的论坛权限是? 可以访问按键精灵“版版家园”专区享受版主资源 网页按键精灵是下列哪一个程序? wqm.exe 按键精灵的产品包括以下哪一个? 按键盒子 按键精灵是下列哪一个程序? 按键精灵9.exe 按键精灵会员卡注册码,没有以下哪一种? 天卡(1天) UnlockMouse命令的含义是? 解除锁定鼠标位置 按键精灵会员不能享受的资源是? 免费小精灵的源代码 RightUp命令的含义是? 右键弹起 按键精灵的功能不包括? 自动发明汽车、飞机、火箭等机器 按键精灵能兼容下列哪一种语言? VBS 不能用抓抓工具直接获取的是? PID 关于按键精灵的描述，以下正确的是? 按键精灵是一款绿色的模拟键盘鼠标操作的软件 脚本编辑界面上没有的按钮是?启动 与取色判断命令没有直接关系的参数是? 按键码 以下哪种方式可以在脚本编辑界面中获取到新的插件? 点击"资源库"按钮,然后导入需要的插件 LeftClick命令的含义是? 左键单击 按键精灵官方网站的网址是? https://www.360docs.net/doc/e28089619.html,/ RestoreMousePos命令的含义是? 恢复上次保存的鼠标位置 如果按键精灵在某些环境失效,可以使用下列哪个工具? 神盾 SaveMousePos命令的含义是? 保存当前鼠标所在位置 GetCursorPos命令的含义是? 得到鼠标位置坐标 键盘命令的类型不包括? 锁定 按键精灵里运算符乘号是? * 学习脚本开发：按键精灵制作清理系统 来源：按键学院【按键精灵】有的时候，可能只是因为使用者曾经用他的电脑浏览过太多太多颜色不正经的网站，导致了系统缓存垃圾过多，电脑迟钝的情况。 然后，他使用了我们的脚本，就抱怨是我们的脚本太卡。很冤啊有木有？ 那好吧，咱们在咱们的脚本上加一个功能，帮助使用者清理下系统垃圾，不管垃圾多不多，清清更健康~ 方法1-调用bat文件 1、下载之后，添加到按键精灵附件中。 2、然后，在脚本界面上画一个按钮，将以下代码添加到按钮单击事件中。 PutAttachment ".plugin", "清理垃圾-.bat" RunApp ".plugin\清理垃圾-.bat" 3、最后点击按钮，即弹出清理垃圾的窗口，按任意键则开始清理垃圾。 4、如果不希望出现按任意键开始的提示，可以右击清理垃圾-.bat文件，选择编辑，将红框中的代码去掉即可。 Bat文件制作过程，将下列代码复制到记事本中，然后另存为，另存为的时候，文件后缀名修改为.bat @echo off color 0a title ---清理系统垃圾--- echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★ echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★ echo.★☆☆★ echo.★☆按键学院☆★ echo.★☆☆★ echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★ echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★ echo ============================================== echo 清理垃圾文件期间，速度由电脑文件大小而定。 echo 在没看到结尾信息时请勿关闭本窗口。 echo ============================================== echo. & pause echo 正在清除系统垃圾文件，请稍后...... del /f /s /q %systemdrive%\*.tmp del /f /s /q %systemdrive%\*._mp del /f /s /q %systemdrive%\*.log del /f /s /q %systemdrive%\*.gid del /f /s /q %systemdrive%\*.chk del /f /s /q %systemdrive%\*.old del /f /s /q %systemdrive%\recycled\*.* del /f /s /q %windir%\*.bak del /f /s /q %windir%\prefetch\*.* rd /s /q %windir%\temp & md %windir%\temp del /f /q %userprofile%\cookies\*.* del /f /q %userprofile%\recent\*.* del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*" del /f /s /q "%userprofile%\Local Settings\Temp\*.*" del /f /s /q "%userprofile%\recent\*.*" echo 清除系统LJ完成！ echo. & pause 学习怎么用按键精灵制作游戏辅助——脚本源代码干货分享 一、用按键精灵确定人物朝向（以剑灵自动寻路为例）的代码 在剑灵右上角的小地图里找色/找图，箭头坐标存储在(x1,y1)，箭尾坐标存储在(x2,y2) FindColor1200,0,1920,300,"箭头颜色",x1,y1 If x1 > 0 And y1> 0 Then End If FindColor1200,0,1920,300,"箭尾颜色",x2,y2 If x1 > 0 And y1> 0 Then End If '计算斜率/正切值 斜率= (y1 - y2) / (x1 -x2) '计算角度 角度= Atn(斜率) 二、用按键精灵解决用户密码泄露问题的代码 Function 加解密(源文件, 秘钥) Dim Z, i Dim A, B, C 加解密= "" If Len(源文件) = 0 Then’如果密码为空，则初始化为空 加解密= "" Exit Function End If '调用Rnd函数使以后Rnd函数所产生的Rnd为相同的伪随机数列 Z = Rnd(-秘钥) For i = 1 To Len(源文件)’将密码字符串一个一个字符通过加密，转换成另一个字符 C = Mid(源文件, i, 1) A = Asc(C) B = Int(126 * Rnd) And&H7F’这里的&H7F，是指生成的伪随机代码， 只取7位，以免数据溢出 A = A Xor B’Xor是可逆的，第一次运行时是得到加密后的数据，再运 行一次是得到解密后的数据 C = Chr(A) 加解密= 加解密+ C Next End Function 举个例子吧~ Function 加解密(源文件, 秘钥) Dim Z, i Dim A, B, C 加解密= "" If Len(源文件) = 0 Then 加解密= "" Exit Function 第1课：零编程学会补红蓝脚本的制作 补红蓝脚本的制作 我们应该知道，按键精灵拥有一只眼睛，一双手，眼睛可以帮我们查看屏幕上的颜色，而手可以帮我们不断的点击键盘鼠标。相信多数的朋友对于这双手的操控已经灵活自如了，而要编写出功能强大的脚本，没有眼睛可不行。本教程以此出发，教会读者使用这双眼睛， 更好的控制机器人的手臂。 本章用到的按键精灵基础命令： 1、 IfColor 100,10,112233,0 EndIf 复制代码IfColor做为按键精灵最重要的颜色判断语句（眼睛），有着良好的易用性与 理解性。 语句详细解释： ifColor - 如果颜色 100 - 屏幕X象素 10 - 屏幕Y象素 112233 - 16位进制的颜色（以两位为一种颜色分别代表蓝、红、黄） 0 - 相等（1为不相等。2为模糊匹配） 解释：如果在坐标100，10的颜色为112233则执行。后面的EndIf做为IfColor的配 对。 使用方法：控制命令->抓点坐标/颜色->在面图上点左键，加入到坐标点->退出抓点-> 选好坐标颜色后->插入 2、 //注释 复制代码解释：“//”为按键精灵的注释在“//”后面所跟写的任何文字都将被按键忽 略。 3、 Rem s Goto s 复制代码解释：“Rem s”可以理解为在改位置做一个标记s。而“Goto s”则是无条件跳到此标记执行。这里补一下程序运行概念：每行代码都有行号，脚本解释器要一行一行代码的执行下去，知道执行最后一行代码或碰到EndScript语句（该语句在后面会有讲解）， 没有任何可执行了，程序就退出。 4、 Delay 100 复制代码解释：暂停100毫秒（1000毫秒等于 1秒）看完了概念，我们来实际编写一个游戏的补红补蓝脚本，验证我们是否已经学会了该课 的内容。 首先打开按键精灵，并进入游戏，用PrintScr（一般在F12右边第一个）键截取游戏图象。然后切换到按键精灵程序。按ifcolor的使用方法来抓取我们的血条颜色坐标。并且 插入到代码内。学会用按键精灵制作用脚本运行可执行程序
来自按键精灵的DNF刷第一图源码
按键精灵源代码整理汇总
按键精灵开发教程：获取特殊文件夹路径
游戏辅助教程：按键精灵给源代码加密
按键精灵脚本开发教程：随机数写法
学习脚本制作：按键精灵解决游戏辅助卡死
按键精灵一级认证
按键精灵DNF秒拍卖源码
按键精灵多线程多开剧本开发教程
学习按键精灵：制作炫酷脚本运行提示窗口
按键精灵1--6级答案
学习脚本开发：按键精灵制作清理系统
学习怎么用按键精灵制作游戏辅助——脚本源代码干货分享
按键精灵脚本制作