下载文档原格式
学习怎么用按键精灵制作游戏辅助——脚本源代码干货分享一、用按键精灵确定人物朝向（以剑灵自动寻路为例）的代码在剑灵右上角的小地图里找色/找图，箭头坐标存储在(x1,y1)，箭尾坐标存储在(x2,y2) FindColor1200,0,1920,300,"箭头颜色",x1,y1If x1 > 0 And y1> 0 ThenEnd IfFindColor1200,0,1920,300,"箭尾颜色",x2,y2If x1 > 0 And y1> 0 ThenEnd If'计算斜率/正切值斜率= (y1 - y2) / (x1 -x2)'计算角度角度= Atn(斜率)二、用按键精灵解决用户密码泄露问题的代码Function 加解密(源文件, 秘钥)Dim Z, iDim A, B, C加解密= ""If Len(源文件) = 0 Then’如果密码为空，则初始化为空加解密= ""Exit FunctionEnd 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)加解密= 加解密+ CNextEnd Function举个例子吧~Function 加解密(源文件, 秘钥)Dim Z, iDim A, B, C加解密= ""If Len(源文件) = 0 Then加解密= ""Exit FunctionEnd If'调用Rnd函数使以后Rnd函数所产生的Rnd为相同的伪随机数列Z = Rnd(-密钥)For i = 1 To Len(源文件)C = Mid(源文件, i, 1)A = Asc(C)B = Int(126 * Rnd) And&H7FA = A Xor BC = Chr(A)加解密= 加解密+ CNextEnd FunctionEvent Form1.Load//获取小节名（如"e1df741f-d5ec-4ad7-969d-adb139c6a24f"），同一个Q文件生成的小节名不变a = GetMacroID()//获取到当前脚本/小精灵de ID加密文件=Plugin.File.ReadINI("e1df741f-d5ec-4ad7-969d-adb139c6a24f","Form1 .InputBox2.T ext", ".\uservar.ini")解密文件= 加解密(加密文件, 1234567890)'这里的1234567890是假使的密钥，可以修改，注意保密Form1.InputBox2.T ext = 解密文件End Event//写入密码信息源文件= Form1.InputBox2.T ext加密文件= 加解密(源文件, 1234567890)CallPlugin.File.WriteINI("e1df741f-d5ec-4ad7-969d-adb139c6a24f","Form1.InputBox2.T ext", 加密文件, ".\uservar.ini")//输出信息RunApp "notepad.exe"SayString Form1.InputBox1.T extKeyPress "Enter", 1SayString 源文件三、按键精灵快速排序的代码su = "6|1|2|7|9|3|4|5|10|8"su=Split(su, "|")L = UBound(su)Call ks(0, L)Function ks(L, B)If L > B ThenExit FunctionEnd If //判断数组上标下标是否超出范围i = Lj = Bkey =int( su(L) ) //数组第一位提取作为基数While j>iWhile int ( su(j)) >= key and j > i //要先从最右边开始找找到第一个小于key的数这里添加的j>i的判断是为了防止j的值不断递减导致下标越界j = j - 1WendWhile int (su(i)) <= key and j > i //从最左边开始找找到第一个大于key的数（这里的字符串数组需要转换为数值型）i = i + 1WendIf j>i then // 将和基数key对比得到的两个数对换将大于key的值往右边放小于key的值往左边放T = su(i)su(i) = su(j)su(j) = TEnd IfWend // 这个While 循环当i=j 第一轮比较完退出su(L) = su(i) // 重新设置数组第一个元素为基数su(i) = key// 基数归位（排完一轮之后左边的数<基数<右边的数那么基数就到了排序中它该在的位置。
按键精灵判断DNF人物位置源码按键精灵判断DNF人物位置源码DNF这游戏，每次进图的时候，boos位置还有门口位置和障碍物每次可能都不一样.这让不少制作脚本的新手很苦恼，前段时间有人在按键精灵官方论坛分享了判断人在哪里和boss在哪里的脚本，这里就共享给大家。
思路大致如下：把副本的小地图分为横6纵9然后找色判断。
源码发出来就是：Delay 3000Plugin hwnd = Window.GetKeyFocusWnd()Delay 50Delay 100Plugin Window.Move(hwnd,0,0)Delay 300Plugin 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=47x1=627n=1//MessageBox x//MessageBox yFor 9x1=627y2=y1+18For 6//MoveTo x1,y1//Delay 500//MessageBox 1x2=x1-18//MoveTo x2,y2//MessageBox 2//If 550<109<="">If x2<y2<="">//MessageBox x2//MessageBox y1//MessageBox y2Goto 查图endMessageBox nEndIfx1=x1-18n=n+1EndFory1=y1+18EndForRem 查图endMessageBox "人物="& ny1=47x1=627m=1Plugin XY = Color.FindMutiColor(509, 19, 634, 244, "33FF", "4|0|DDFF,10|0|55FF,1|3|55FF,4|3|55FF,8|3|55FF", 0.9) MyArray = Split(XY, "|")X = Clng(MyArray(0)): Y = Clng(MyArray(1))For 9x1=627y2=y1+18For 6//MoveTo x1,y1//Delay 500//MessageBox 1x2=x1-18//MoveTo x2,y2//MessageBox 2//If 550<109<="">If x2<y2<="">//MessageBox x2//MessageBox y1//MessageBox y2Goto 查图2end MessageBox nEndIfx1=x1-18m=m+1EndFory1=y1+18EndForRem 查图2end MessageBox "boss="& m EndScript。
自由幻想按键精灵源代码摘要：I.引言- 介绍自由幻想按键精灵源代码的背景和重要性II.自由幻想按键精灵的概述- 解释什么是自由幻想按键精灵- 介绍自由幻想按键精灵的主要功能和特点III.源代码的获取- 说明如何获取自由幻想按键精灵的源代码- 提供一个下载链接或其他获取方式的参考IV.源代码的解析- 分析源代码的结构和主要部分- 解释源代码中关键功能的实现方式V.源代码的修改与定制- 介绍如何修改源代码以满足特定需求- 提供一个简单的修改示例VI.结论- 总结自由幻想按键精灵源代码的价值和应用- 鼓励读者尝试和使用源代码正文：自由幻想按键精灵源代码是一款免费、开源的按键精灵制作工具，它可以帮助用户快速地制作属于自己的按键精灵，从而实现自动操作、自动点击等便捷功能。
自由幻想按键精灵源代码的重要性在于，它为用户提供了更多的自定义和开发可能性，使得用户可以更好地适应自己的需求和操作习惯。
自由幻想按键精灵的主要功能和特点包括：支持多种操作系统、兼容多种游戏和应用、拥有丰富的脚本编辑功能、支持多线程操作等。
这些特点使得自由幻想按键精灵成为许多用户的首选工具。
获取自由幻想按键精灵源代码十分简单。
用户只需访问官方网站或相关下载站点，即可找到源代码的下载链接。
在下载完成后，用户可以根据官方文档或教程，逐步了解和分析源代码。
源代码的解析是使用和开发自由幻想按键精灵源代码的关键。
一般来说，源代码包括主程序、脚本编辑器、核心功能模块等多个部分。
用户可以通过分析这些部分，了解自由幻想按键精灵的工作原理，以及如何根据自己的需求进行修改和定制。
源代码的修改与定制是自由幻想按键精灵源代码最大的价值所在。
用户可以根据自己的需求，修改源代码中的相关功能和参数，从而实现更符合自己习惯的按键精灵。
例如，用户可以修改按键精灵的点击速度、添加自定义功能等。
总之，自由幻想按键精灵源代码为用户提供了极大的使用和开发空间。
无论你是初学者还是资深用户，都可以从源代码的学习和使用中，获得更多的知识和乐趣。
自由幻想按键精灵源代码摘要：1.自由幻想按键精灵源代码简介2.自由幻想按键精灵源代码的功能特点3.自由幻想按键精灵源代码的应用场景4.自由幻想按键精灵源代码的发展前景正文：一、自由幻想按键精灵源代码简介自由幻想按键精灵源代码是一款备受欢迎的脚本编写软件，其主要功能是帮助用户实现各种自动化操作，从而提高工作效率。
这款软件拥有简单易用的界面，支持多种编程语言，适用于各种场景。
二、自由幻想按键精灵源代码的功能特点1.多功能：自由幻想按键精灵源代码支持多种操作，包括模拟鼠标点击、键盘按键、窗口操作等，可以实现各种复杂的自动化任务。
2.跨平台：该软件可以在多种操作系统上运行，包括Windows、MacOS 和Linux 等。
3.易于上手：自由幻想按键精灵源代码提供了丰富的教程和示例，让用户可以快速掌握其使用方法。
4.强大的脚本编辑功能：该软件支持多种脚本编写语言，包括Lua、JavaScript 等，用户可以根据需要选择合适的语言编写脚本。
三、自由幻想按键精灵源代码的应用场景自由幻想按键精灵源代码在日常生活和工作中有着广泛的应用，包括：1.游戏辅助：用户可以利用该软件编写游戏辅助脚本，实现自动攻击、自动寻路等功能，提高游戏体验。
2.重复性任务自动化：例如批量处理文件、自动填写表单等。
3.测试工具：开发人员可以利用自由幻想按键精灵源代码编写测试脚本，对软件进行自动化测试。
四、自由幻想按键精灵源代码的发展前景随着科技的发展，自动化技术在各个领域得到广泛应用。
自由幻想按键精灵源代码作为一款优秀的自动化脚本编写软件，有着广阔的发展前景。
未来，该软件可能会在以下方面进行优化和升级：1.支持更多的编程语言和功能模块。
2.提供云端服务，让用户可以随时随地使用和编辑脚本。
3.加强与人工智能技术的结合，实现更智能的自动化操作。
总之，自由幻想按键精灵源代码是一款实用的自动化脚本编写软件，具有广泛的应用前景。
dm.SetDict 0, "8.txt"dm.SetDict 1, "数字识别.txt"dm.SetDict 2, "对比.txt"Select Case Form1.选择.ListIndexCase 0加几= "7"Case 1加几= "8"Case 2加几= "8"Case 3加几= "8"case ElseEnd SelectCall 强化装备//Call 上架//Call 买刀//Call 取碳//Call 找凯利Sub 强化装备X坐标= Array(480,510,540,570,600,630,660,690,480,510,540,570,600,630,660,690,480,510,540,570,600, 630,660,690,480,510,540,570,600,630,660,690)Y坐标= Array(320, 320, 320, 320, 320, 320, 320, 320, 350, 350, 350, 350, 350, 350, 350, 350, 380, 380, 380, 380, 380, 380, 380, 380, 410, 410, 410, 410, 410, 410, 410, 410)i = 0//For UBound(X坐标) + 1For Form1.买刀.textRem 强化Delay 30dm.MoveTo 276,349dm.LeftClickDelay 200Rem ddm.MoveTo X坐标(i), Y坐标(i)Delay 100dm.LeftClickDelay 50dm.MoveTo 276, 349dm_ret = dm.FindStr(286,315,499,413,"确认","ddc593-000000",1.0,intX,intY)If intX >= 0 and intY >= 0 Thendm.KeyPress 13Elsedm.KeyPress 13End IfDelay 3500dm_ret = Plugin.Sys.GetTime()A时= Clng(dm_ret/1000)DoDelay 200dm_ret = dm.FindPic(126,304,449,509,"确认.bmp|空.bmp","000000",0.9,0,intX,intY) If dm_ret = 0 Thendm.KeyPress 13Goto 判断ElseIf dm_ret = 1 Thendm.KeyPress 13Goto 判断End Ifdm_ret = Plugin.Sys.GetTime()B时= Clng(dm_ret/1000)If B时-A时>= 10 ThenGoto 判断End IfLoop While 7=7Rem 判断dm.MoveTo X坐标(i), Y坐标(i)Delay 100cj = 0dm_ret = eDict(0)Delay 100Dodm_ret = dm.FindStrFast(0,0,800,600,加几, "ffffff-000000",1,intX,intY)If dm_ret = 0 ThenExit DoElsecj=cj+1If cj = Clng(Form1.检查.Text) ThenGoto 强化End IfEnd IfLoopi = i + 1Next//Select Case Form1.选择.ListIndexCase 0加几= "7"Case 1加几= "8"Case 2加几= "8"jj=1call 大于8Case 3加几= "8"jj=2call 大于8case ElseEnd SelectIf Form1.不上架.Value = 1 Then EndScriptElseCall 上架End IfEnd sub。
按键精灵源码//做这东西主要是为了新人学习之用希望对新人们有一些帮助//声明一些下面要用到的变量（其实不声明也可以不过为了养成//编程的好习惯还是希望大家声明一下)Dim XY_qi,Xq,Yq,n,m,Shu,Fu,A,X,Y//下面这部分是用来设置各种参数用户定义变量 XY_qi=800/400 输入数字起点坐标格式如：10/10 用户定义变量 Hen=5 输入横向特征点个数用户定义变量 n=1 输入横向递进值用户定义变量 Zong=10 输入纵向特征点个数用户定义变量 m=2 输入纵向递进值用户定义变量Ms=2 显示方式设置：1为弹出窗口模式2为粘帖模式用户定义变量 Color1=FFFFFF 设置字体颜色或者背景颜色//初始化数据部分//把Color1转化为字符串类型Color1=Str(Color1)//........................转换成字符类型//取得"/"在字符串的地几个A=InStr(XY_qi,"/")//.........................搜索字符串中指定字符的位置//取得"/"左边的数据Xq=Left(XY_qi,A-1)//........................返回指定数目的从字符串的左边算起的字符//取得"/"右边的数据Yq=Right(XY_qi,Len(XY_qi)-A)//.........从字符串右边返回指定数目的字符//给Shu,X,Y 赋值取得字符串长度Shu=""X=Xq:Y=Yq//纵向特征点个数循环 Zong 遍//给X赋值X=Xq//横向特征点个数循环 Hen 遍//利用GetPixelColor函数开始找颜色调用外部VBScript子程序 Color2=得到指定点的颜色(X,Y) //找到的颜色值和自己设置的颜色值做比较如果表达式 (Color2<>Color1) 为真,则//如果2个颜色不一样则给Fu赋值"1"Fu="1"否则//否则给Fu赋值为"0"Fu="0"条件结束//没循环1次X的值增大nX=X+n//每循环1次Shu的值连接一个FuShu=Shu&Fu循环结束//每循环一次Y的值增大mY=Y+m循环结束//如果模式选择1在显示数字特征码如果表达式 (Ms=1) 为真,则调用外部VBScript子程序 Color2=得到指定点的颜色(X,Y) //如果模式选择2则把数据写入剪切板否则如果(Ms=2)为真,则调用子程序 Nt调用子程序 Ts条件结束脚本停止运行//写入剪切板子程序子程序 NtShuZi=ShuSet objIE = CreateObject("InternetExplorer.Application")objIE.Navigate("about:blank")objIE.document.parentwindow.clipboardData.SetData "Text", ShuZiobjIE.Quit子程序结束,回到调用处//弹出对话框子程序子程序 Tsset Obj = createobject("WScript.Shell")Hua="数字特征码为："&vbcr&Shu&vbcr&"请打开记事本粘帖"调用外部VBScript子程序 Color2=得到指定点的颜色(X,Y)子程序结束,回到调用处//打开画图程序，并最大化，调整默认大小再运行脚本就OK。
新版按键精灵X版底层使用代码分享按键精灵X版是一款功能强大的自动化软件，可以实现自动化操作和重复任务的执行。
下面是一个底层使用代码的示例：首先，你需要导入 `按键精灵X` 的底层库`Jitbit.KeybordBuddyX`，例如：```csharpusing Jitbit.KeyboardBuddyX;```然后，你可以创建一个 `Automation` 对象：```csharpAutomation automation = new Automation(;```现在，你可以使用 `automation` 对象来执行自动化操作，比如模拟按键输入：```csharpautomation.Type("Hello, World!");```上面的代码会模拟按下键盘上的每个字符来输入 "Hello, World!"。
除了输入文本，你还可以模拟按下特殊键，比如回车键：```csharpautomation.PressSpecialKey(SpecialKey.Enter);```这会模拟按下回车键。
还可以模拟按下组合键，比如 Ctrl+C：```csharpautomation.PressSpecialKey(SpecialKey.Control);automation.PressKey('C');```这会模拟先按下 Ctrl 键，再按下 C 键。
除了模拟按键输入，按键精灵X还支持模拟鼠标操作，比如移动鼠标和点击鼠标：```csharpautomation.MoveMouseTo(100, 100); // 移动鼠标到 (100, 100) 的位置automation.ClickMouse(MouseButton.Left); // 单击鼠标左键```点击鼠标的 `MouseButton` 参数可以是 `Left`、`Right` 或`Middle`。
按键精灵打怪代码1.程序最多可以运行多少个节点？即增长后的节点数的最大值2.只用输出一个度分布的概率图就行了，其他的都不要输出，节约时间，图不用柱状图，用点表示就行，横纵坐标都要取对数3.原则上，取了对数的图形的点都应该在一条直线上，对这些点做直线拟合，算出直线的斜率4.随机删除总节点数N的百分之a的节点，a取整数1<a请尽快完成以上内容，周五之前发给我，不清楚的地方电话联系我。
记住程序一定要优化！程序里面添加一个时间函数，看看每次程序运行的时间bRem i7//如何区域内文字为则执行///////////////////dm_ret = dm.FindStrFast(270,33,357,63,"魔灵秃鹫|魔灵蜘蛛|嗜血金雕","fffff7-000000",0.9,intX6,intY6)If intX6 >= 0 and intY6 >= 0 ThenCall 打怪()ElseEnd IfNextSub 打怪()//打怪程序End SubSub OnScriptExit()dm.UnBindWindowEnd Sub[/hide]Sub 打怪()//打怪程序还没写有源码的没给一个End SubSub OnScriptExit()dm.UnBindWindow/////////////////////////////////////////////////////////////////// ///////////1为抢怪技能UserVar asjdaisd="请设置" ---------技能设置----------UserVar k=DropList{单开:1|双开:2|三开:3|四开:4|五开:5}=0 设置内容UserVar jn1="2" 设置技能1键位UserVar jn2="3" 设置技能2键位UserVar jn3="4" 设置技能3键位UserVar s1=60 设置技能1施放间隔时间（单位：秒）UserVar s2=90 设置技能2施放间隔时间（单位：秒）UserVar s3=120 设置技能3施放间隔时间（单位：秒）UserVar y1=10 技能1吟唱时间（秒）UserVar y2=10 技能2吟唱时间（秒）UserVar y3=10 技能3吟唱时间（秒）UserVar jg=1 抢怪间隔（秒）//---------------[分隔线]--------------------VBS dim key(2),sj(3)VBS dim jn1,jn2,jn3,s1,s2,s3,s4,t1,t2,t3,t4,zf,hx//声明变量key(0)=Asc(jn1):key(1)=Asc(jn2):key(2)=Asc(jn3) sj(0)=s1:sj(1)=s2:sj(2)=s3:sj(3)=s4//把自定义参数的返回值转换成数组元素t1=now:t2=now:t3=now:t4=now//返回当前系统日期时间到变量dim d,k,fs(4)d=0While d<=k-1Delay 10Plugin hx(d)=Window.Foreground() KeyDown 18,1Delay 10KeyPress 27,1Delay 10KeyUp 18,1d=d+1EndWhile//---------------[分隔线]--------------------Rem 开始挂机Gosub 抢怪+检查辅助技能Goto 开始挂机//---------------[分隔线]--------------------Sub 抢怪+检查辅助技能c=0While c=<k-1Plugin Window.SendKeyPress(hx(c),192)</k-1</aDelay 100Plugin Window.SendKeyPress(hx(c),49) Delay jg*1000If DateDiff("s",t1,now)>=sj(0)Plugin Window.SendKeyDown(hx(c),key(0)) Delay 32Plugin Window.SendKeyUp(hx(c),key(0)) Delay y1*1000t1=nowEndIfIf DateDiff("s",t2,now)>=sj(1)Delay 10Plugin Window.SendKeyDown(hx(c),key(1)) Delay 32Plugin Window.SendKeyUp(hx(c),key(1)) Delay y2*1000t2=nowEndIfIf DateDiff("s",t3,now)>=sj(2)Delay 10Plugin Window.SendKeyDown(hx(c),key(2)) Delay 32Plugin Window.SendKeyUp(hx(c),key(2))t3=nowEndIfIf DateDiff("s",t3,now)>=sj(2)Delay 10Plugin Window.SendKeyDown(hx(c),key(2)) Delay 32Plugin Window.SendKeyUp(hx(c),key(2)) Delay y3*1000t3=now EndIfc=c+1 EndWhile Return。
来自按键精灵的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 1000Rem 主程序Call 选择角色()Call 疲劳改键()Call 移动区域()Call 地图选择()Goto 主程序Sub 选择角色()If jsgh=0 ThenIfColor 210,440,"6B949C",0 Thenjsx=117jsy=137If jhks<5 ThenFor jhks-1jsx=jsx+130NextElseFor jhks-5jsx=jsx+130Nextjsy=jsy+185End Ifjhks=jhks+1MoveTo jsx, jsyLeftClick 1Delay 1000MoveTo 322, 448LeftClick 1ElseIf jhks>jssl ThenCall 报警提醒()End IfFor 3IfColor 316,271,"484849",0 ThenElseMoveTo 39, 434LeftClick 1Delay 300KeyPress "Esc", 1Delay 1000End IfNextMoveTo 316, 344LeftClick 3For 30IfColor 210,440,"6B949C",0 ThenGoto 主程序ElseDelay 1000End IfNextCall 报警提醒()End IfEnd IfEnd SubSub 疲劳改键()For 30IfColor 40,400,"608A9D",0 ThenIfColor 278,437,"F78C00",0 ThenGoto 疲劳改键ElseMoveTo 39, 434LeftClick 1Delay 300KeyPress "Esc", 1Delay 1000End IfNextIf jsgh=1 ThenCall 报警提醒()End IfGoto 主程序ElseDelay 1000End IfNextCall 报警提醒()Rem 疲劳改键For 3IfColor 316,271,"484849",0 ThenElseKeyPress "Esc", 1Delay 1000End IfNextMoveTo 315, 317LeftClick 3Delay 1000MoveTo 407, 163LeftClick 1Delay 300KeyPress "W", 1Delay 300KeyPress "A", 1Delay 300KeyPress "S", 1Delay 300KeyPress "D", 1Delay 300MoveTo 372, 401LeftClick 1LeftClick 1Delay 1000For 3IfColor 566,38,"8DEDFF",0 ThenElseMoveTo 344, 188LeftClick 1Delay 1000MoveTo 404, 240LeftClick 1Delay 1000End IfNextMoveTo 163, 401LeftClick 1Delay 300Call 出售物品()End SubSub 移动区域()KeyDown "S", 1Delay 8000KeyUp "S", 1Delay 300If dtxz<2 ThenMoveTo 400, 360RightClick 1Delay 1000KeyDown "D", 1zyj=1End IfIf dtxz>1 And dtxz<6 ThenKeyDown "S", 1Delay 300KeyDown "A", 1Delay 3500KeyUp "S", 1zyj=0End IfIf dtxz>5 And dtxz<11 ThenKeyDown "D", 1zyj=1End IfIf dtxz>10 And dtxz<18 ThenMoveTo 20, 90RightClick 1Delay 5000MoveTo 280, 380RightClick 1Delay 1000KeyDown "D", 1zyj=1End IfFor 50IfColor 573,428,"8DC5DD",0 ThenGoto 移动区域ElseDelay 1000End IfNextCall 报警提醒()Rem 移动区域If zyj=0 ThenKeyUp "A", 1ElseKeyUp "D", 1End IfDelay 300End SubSub 地图选择()If dtxz=0 Thendtx=147dty=389End IfIf dtxz=1 Thendtx=309dty=384End IfIf dtxz=2 Thendtx=147dty=389End IfIf dtxz=3 Thendtx=472dty=352End IfIf dtxz=4 Thendtx=123End IfIf dtxz=5 Thendtx=340dty=188 End IfIf dtxz=6 Thendtx=130dty=376 End IfIf dtxz=7 Thendtx=295dty=391 End IfIf dtxz=8 Thendtx=441dty=331 End IfIf dtxz=9 Thendtx=504dty=256 End IfIf dtxz=10 Thendtx=366dty=181 End IfIf dtxz=11 Thendtx=192dty=227 End IfIf dtxz=12 Thendtx=340dty=188 End IfIf dtxz=13 Thendtx=494dty=192 End IfIf dtxz=14 Thendtx=518dty=269 End IfIf dtxz=15 Thendtx=472End IfIf dtxz=16 Thendtx=309dty=384End IfIf dtxz=17 Thendtx=147dty=389End Ifcswp=0Rem 地图选择If zyj=0 ThenKeyDown "D", 1Delay 500KeyUp "D", 1KeyDown "A", 1ElseKeyDown "A", 1Delay 500KeyUp "A", 1KeyDown "D", 1End IfFor 30IfColor 573,428,"8DC5DD",0 ThenIf zyj=0 ThenKeyUp "A", 1ElseKeyUp "D", 1End IfDelay 300For 10IfColor 573,428,"8DC5DD",0 ThenKeyPress "D", 3Delay 300MoveTo dtx, dtyLeftClick 1Delay 1000ElseCall 地图内部()Goto 地图选择End IfNextDelay 30000Goto 主程序ElseDelay 1000End IfNextCall 报警提醒()End SubSub 地图内部()For 30IfColor 40,400,"608A9D",0 ThenKeyPress "Esc", 3Delay 300KeyPress jtj1, 1Delay 300KeyPress jtj2, 1Delay 300KeyPress jtj3, 1Delay 300For 50IfColor 582,49,"263C44",0 ThenIfColor 582,88,"102129",0 ThenIfColor 562,68,"102931",0 ThenIfColor 602,68,"102131",0 ThenFor 5KeyPress "X", 1Delay 300NextElseGoto 地图内部End IfElseGoto 地图内部End IfElseGoto 地图内部End IfElseGoto 地图内部End IfNextGoto 地图内部ElseDelay 1000End IfNextCall 报警提醒()Rem 地图内部KeyPress ctj1, 1Delay 300KeyPress ctj2, 1Delay 300cswp=cswp+1If jqaj>0 ThenFor 10KeyPress jqaj, 1Delay 300NextEnd IfIf csaj>0 ThenIf cswp>10 ThenFor 3IfColor 566,38,"8DEDFF",0 ThenElseKeyPress "I", 1Delay 1000End IfNextKeyPress csaj, 1Delay 300Call 出售物品()cswp=0End IfEnd IfFor 3IfColor 316,271,"484849",0 ThenElseKeyPress "Esc", 1Delay 1000End IfNextMoveTo 316, 396LeftClick 3Delay 5000End SubSub 出售物品()MoveTo 547, 353LeftClick 1Delay 300MoveTo 356, 207LeftClick 3Delay 1000zby=234For 2zbx=347For 7MoveTo zbx, zbyDelay 500FindPic 325,0,640,480,"Attachment:\金币.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenFindPic 325,0,640,480,"Attachment:\封装.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseFindPic 325,0,640,480,"Attachment:\无法.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseLeftClick 1Delay 500LeftClick 1Delay 500End IfEnd IfElseFindPic 325,0,640,480,"Attachment:\无法.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseGoto 出售物品End IfEnd Ifzbx=zbx+30Nextzby=zby+30NextRem 出售物品MoveTo 403, 207LeftClick 3Delay 1000FindPic 0,0,640,480,"Attachment:\魔盒.bmp",0.9,ux,uyIf ux > 0 And uy > 0 ThenMoveTo ux+6, uy+12LeftClick 1Delay 500LeftClick 1Delay 500LeftClick 1End IfDelay 300KeyPress "Esc", 1Delay 300End SubSub 报警提醒()Rem 报警提醒If bjfs=0 ThenFor 2BeepDelay 1000NextEnd ifIf bjfs=1 ThenPath = Plugin.Sys.GetDir(0)Path=Path & "\W.wav"Call Plugin.Media.Play(Path)Delay 2000End ifGoto 报警提醒End Sub。
Hwnd = Plugin.Window.MousePoint()Rem XXCall 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 XX2. 奶妈挂机加血（自动用蓝药，配合奶妈7秒叶子）Hwnd = Plugin.Window.MousePoint()Call Plugin.Window.Size(Hwnd, 900, 600)Call Plugin.Window.Move(Hwnd, 4, 143)Rem XXIfColor 325,208,"163CDB",0 ThenElseCall Plugin.Bkgnd.KeyPress(Hwnd, 50)End IfIfColor 257,208,"163CDB",0 ThenElseDelay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 51)Delay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 52)End IfIfColor 163,222,"9C841A",0 ThenElseCall Plugin.Bkgnd.KeyPress(Hwnd, 53)End IfIfColor 77,226,"453A10",0 ThenElse'==========以下是按键精灵录制的内容==========（这个是控制鼠标去点掉宠物附体回蓝的，属于前台的）Delay 291MoveTo 374, 506MoveTo 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 1KeyUp "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 47MoveTo 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, 206Delay 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 1Delay 48 MoveTo 631, 206 Delay 1 MoveTo 631, 207 Delay 46 MoveTo 637, 219 Delay 37 MoveTo 637, 220 Delay 1KeyUp "2", 1Delay 1MoveTo 640, 229Delay 77MoveTo 647, 243Delay 46MoveTo 648, 247Delay 63MoveTo 648, 249Delay 30MoveTo 648, 250Delay 77MoveTo 648, 251Delay 134MoveTo 650, 252Delay 44MoveTo 656, 256Delay 38MoveTo 674, 269Delay 32MoveTo 704, 295Delay 27MoveTo 745, 326Delay 70MoveTo 954, 476Delay 11MoveTo 978, 490Delay 2MoveTo 1000, 504Delay 283MoveTo 1113, 582Delay 51MoveTo 1099, 584Delay 50MoveTo 1084, 582'==========以上是按键精灵录制的内容========== End IfGoto XX3. 奶妈7秒叶子Hwnd = Plugin.Window.MousePoint()Rem AACall Plugin.Bkgnd.KeyPress(Hwnd, 49)Delay 14000Goto AA4. 奶妈无限群加Hwnd = Plugin.Window.MousePoint()Rem xxCall Plugin.Bkgnd.KeyPress(Hwnd, 49)Call Plugin.Bkgnd.LeftClick(Hwnd, 450-dx, 380-dy)Delay 1000Goto xx5. 剑半后台挂机，自动回宗派躲验证（怪物血条得露出来才行，其他的按键是后台操作）Hwnd = Plugin.Window.MousePoint()Call Plugin.Window.Size(Hwnd, 800, 500)Call Plugin.Window.Move(Hwnd, 0, 140)Rem 重置时间Dim t1t1=nowRem XXIfColor 215,206,"1332B1",0 ThenCall 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)ElseCall Plugin.Bkgnd.KeyPress(Hwnd, 68)Call Plugin.Bkgnd.KeyPress(Hwnd, 9)Delay 500End IfIfColor 215,206,"1332B1",0 ThenGoto XXElseif datediff("n",t1,now)>=35 then（35分钟自动回宗派）Delay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 57)Delay 5000IfColor 215,206,"1332B1",0 ThenGoto XXElseDelay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 57) Delay 80000MoveTo 757, 759Delay 2000LeftClick 1Delay 2000MoveTo 422, 471Delay 2000LeftClick 1Delay 150000MoveTo 399, 700Delay 1000LeftClick 1Delay 70000MoveTo 542, 620Delay 15000LeftClick 1Delay 1000Goto 重置时间End IfElseGoto XXEnd IfEnd IfGoto XX6. 奶妈半后台打怪Hwnd = Plugin.Window.MousePoint()Call Plugin.Window.Size(Hwnd, 800, 500)Call Plugin.Window.Move(Hwnd, 480, 0)Rem 重置时间Dim t1t1=nowRem XXIfColor 695,66,"1332B1",0 ThenCall 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) ElseCall Plugin.Bkgnd.KeyPress(Hwnd, 68)Call Plugin.Bkgnd.KeyPress(Hwnd, 9)Delay 500End IfIfColor 695,66,"1332B1",0 ThenGoto XXElseif datediff("n",t1,now)>=35 thenDelay 1011Call Plugin.Bkgnd.KeyPress(Hwnd, 48)Delay 5011IfColor 695,66,"1332B1",0 ThenGoto XXElseDelay 1000Call Plugin.Bkgnd.KeyPress(Hwnd, 48)Delay 80011MoveTo 1236, 621Delay 2011LeftClick 1Delay 2011MoveTo 896, 331Delay 2011LeftClick 1Delay 150051MoveTo 876, 567Delay 1011LeftClick 1Delay 70011MoveTo 1030, 484Delay 10011LeftClick 1Delay 2000Goto 重置时间End If ElseEnd IfEnd IfGoto XX。
最新DNF代码⼤全最新DNF代码⼤全以下地图代码[post]地图ID洛兰地图ID:1=洛兰地图ID:2=洛兰深处洛兰之森地图ID:3=幽暗密林地图ID:4=幽暗密林深处地图ID:5=雷鸣废墟地图ID:6=猛毒雷鸣废墟地图ID:7=格拉卡地图ID:8=烈焰格拉卡天空之城地图ID:11=亚蒙下层地图ID:12=亚蒙上层地图ID:13=世帕罗塔下层地图ID:14=世帕罗塔上层地图ID:15=天空之海浅海地图ID:16=天空之海深海天帷巨兽地图ID:21=神殿外围地图ID:22=树精丛林地图ID:23=炼狱地图ID:24=极昼地图ID:25=第⼀脊椎地图ID:26=第⼆脊椎暗⿊城地图ID:31=浅栖之地地图ID:32=蜘蛛洞⽳地图ID:34=熔岩⽳地图ID:35=暗精灵墓地地图ID:40=⼭脊地图ID:41=冰⼼少年地图ID:42=利库天井（39-42）最低进⼊等级36地图ID:43=⽩⾊废墟（45-48）最低进⼊等级42地图ID:44=冰雪宫殿（48-51）最低进⼊等级45地图ID:45=斯卡萨之巢（53-56）最低进⼊等级50洛斯玛尔地图ID:50=堕落的盗贼地图ID:51=迷乱之村哈穆其他隐藏图：悬空17遗迹33机械⽜1500悲鸣1501死亡の塔11000================================================================= ============代码⼤全(⽅便查找)20001波动剑20002-20007⾃⾝尖兵柱打低级怪效果好20008修罗半⽉20009怒⽓爆发（⽆伤害）偏上20010怒⽓爆发的伤害20011红阵20012冰阵20013绿阵20014墓碑20015⾃⼰⾝上墓碑20016银光落刃20017抓头20018阿修罗震⽆影像20019⼩邪光斩20020前突刺第⼆⼑20021虚电球修罗⼤电20022裂波斩20023嗜灵⿁斩20024⽕波20025⽕波爆阿修罗适⽤20026⿁闪20029⾥⿁/双⼑20030击退阵地光阵20031阿修罗周⾝烧⼟⽓阵20032阿修罗光球定珠20033五段斩第⼀⼑剑舞20034五段斩第⼆⼑20035五段斩第三⼑20036五段斩第四⼑20037五段斩第五⼑（⽤了必卡屏掉线）剑舞20038不动明王的球20039格挡⽓球20040瘟疫之罗刹[紫阵]20041⾎之咆哮狂战吸怪最后砍出的⼀⼑斩20043狂战⼤崩⼭20044狂战⼤崩⼭【⽕⼭浮空】20045卡洛地⾯20046卡洛空中20047卡洛灼烧20048⼩⿊爆炸定珠爆20049嗜魂之⼿⼩⿊爆20050⼩崩⼭20051⽩⼿觉醒20052狂战觉醒20053⿁泣觉醒20055修落翅膀20057修罗觉醒轮⼦20058修罗觉醒眼睛----------------------------格⽃家的技能原代码21001背摔21002念⽓波21004抛沙21005狮⼦吼21009⼨拳21010念⽓罩30517念⽓罩21011雷霆背摔21012柔道抓轰炮21013板砖21014擒⽉炎21015蜘蛛⽹21016下段踢21017龙风卷21018毒雾21021⽓功觉醒21024升龙21028毒雷柱21029街头风暴21031⾦刚碎21038柔道烈⽯破天21041电光龙头21042龙虎啸虎头21043龙虎啸⼿27144⽓功螺旋丸--------------------------------- 神枪⼿技能原代码220开头的都是⼦弹和⼦弹的攻击效果: 22001-22003左轮⼦弹22004-22006⾃动22007-22009步枪⼦弹220102*********⼿炮22013-22015⼿弩⼦弹22017蓄电激光22200银弹22201⽕弹22203狙击枪22204激光22206原⼦弹22207踏射22212激光？很象引爆圈22213爆炎弹22214机器⼈22215Ez8⾃爆22216蛇毒炮22217BBQ22218狙击爆炸22219⼿雷22220感电⼿雷22221冰冻⼿雷22223空投⽀援22224空中战机的⼦弹22225空中战机的导弹22226空中战机爆炸22227空投爆炸22228机械觉醒-拳头22229⿊玫瑰战队22234⿊玫瑰⼿炮射击22236⿊玫瑰步枪⼦弹--------------------------------- 魔法师技能原代码23001稻草⼈23002炫纹⽆属性23003炫纹⽕23004炫纹⽔23005炫纹暗23006炫纹光23007魔法星弹23008杰克爆弹23009雪⼈23010雷光珠23011⿊猫23012虚⽆之球23018魔⼒印记23019雷电23020天雷闪23022冰墙23023⽕炎冲击23025⿊洞23027极冰盛宴23028圆舞棍23029落花掌23030强压炫纹23031黄龙23033⼤⽕柱应该是元素觉醒的那些柱⼦23034⼤冰柱23035⼤暗柱23036⼤彩柱23038⼜⼤⽕爆23039还是⽕爆23040⼀圈爆23041⼀条⿊雾23042闪电30553精灵王半⽉30555精灵王激光30560⼤电精灵电30561⼤冰精灵冰30562⼤电精灵⼩电30563上⽕精灵爆30564上⽕精灵半⽉30565地上⼩⽕30566地上⼩针30567召唤宝宝的万剑诀---------------圣职者技能原代码24001落凤锤24003恶魔之⼿24008蓝拳旋风24009破魔符24010镇压符24011落雷符24015狂乱锤击24016潜龙24017满蓄⼒空斩打24019⽞武24020⽩虎24021⼤眼睛--⽩虎的球----------------------特殊代码类020002002是修复HP 021002112是修复MP02200是修复HP+MP02300是霸体02400是透明02500是祝福LV1502600是速LV15仓库代码:51201霸体代码:2310⼤蓝代码:2102⼤⾎代码:20021063复制怪68013树刺8043冲击波8031貌似⼩风筝8032光8033爆炸冲击波8034油桶爆炸8035板凳8035光球8101~3房⼦8104战车8104指挥官8104雪球8107雪刺8108~13雪坡8138龙头雕塑8139雪崩8140召唤⼥⼈8141三连电8142固定暴风眼8143蛋--8144蛋孵化出⼩龙8145蛋8146蛋破8147⽆形态攻击8149桌⼦8148彩⾊冰柱有伤害8150洞8151钟到8160都是装饰8161树8162雪坡8168卡屏8169激光的瞄准8170⼩蝌蚪8171会飞的⽕箭弹8172不会飞8173⽓8174爆炸⽓8175远程打⼈伤害⼩8176~8199⽆8201⽯头⼈吐得8202对⽅地下东西8203查理拳8204挥动的查理拳8205查理拳8206爆炸8309封印8310战法觉醒技能8311~2剑8313封印8314⽊盆8315~6⽊桶8317垃圾桶8318~20箱⼦8321~2杯⼦8323⽊凳8324⽯头8325灯8326破烂8328凳⼦8329桌⼦8330桌⼦布8331垃圾桶8332蛋8333不明东西后⽆8401⼩⼑8403爆炸8404药8405⼑8406飞⼑8407~8柱⼦8409雪球8410~3雪刺8414书8415~7飞书8418~9不明东西8458钉⼦8460封印8461飞⼑8462柱⼦8463~4轰炸8465沙发8466帐篷8468~9沙⼦8470地裂8471~2箱⼦8473地裂8501台⼦8502书柜8503⽹8504红章鱼8505⿊8506红8508⿊烟8509⽔8510红东西8511蝌蚪8512绿8513蓝8514⽔8515~6泥巴8517GDL8518蓝GDL⽖⼦8519蓝GDL 8520红8521~32绿黄绿蓝绿绿蓝红绿黄绿蓝8533~4台⼦格⽃战⼠8535蛋孵化章鱼8536地板8537蛋孵化8538蛋孵化boss章鱼⼤鱼死出⼩鱼8539蛋8540光8541星星猫技能⽆法触发8542台⼦上有鱼8543鱼8544格⽃蹲伏8545战⼠蹲伏8546毒8547⽔泡8548紫光8549东西死了8550书柜8551台⼦⼤叔8552鱼雷8553⽓8554稻草⼈⽓8555~8699⽆8700⽓8701飞⼑mz7l'4']+8801装饰8802光掉⾎8803雪坡8804地下的东西8809冰冻冰精灵可以化8810~3栅栏8814装饰8815⽊桶8816桌⼦8817凳⼦8818~20灯8821~2⾖⼦8823冰精灵8824箱⼦20002002是修复HP21002112是修复MP2200是修复HP+MP2300是霸体2400是透明2500是祝福LV152600是速LV1530001⽯头30002⽯头30003毒⾎30004暗球30005暗球爆30006爆弹30007飞镖脚下转30008想⾃杀尽管⽤是敌⼈30009青铜⽯⼈的爆炸刺慎⽤会掉30010-2空⾻鱼尾巴垃圾技能30013⿊⾊苍蝇光环眩晕效果垃圾技能30014神殿绿教⼠飞镖脚下固定30015⼩激光30016⽩⾊液体没伤害30017⿊⾊同上30018⿊⾊球⼦弹药没⽤30021绿刺球脚下转30025冰奈斯的魔法攻击30026风魔⼿⾥剑飞盘固定30027⼩光环圈⽯化光环30028第2颈椎的BOSS抓钩30029第2颈椎的BOSS戳刺30035脚下爆炸30036⼤激光300383940树精地刺3004142祭祀的⼑30043地雷30044爆了30045也爆30046灼伤的也很厉害30047同上30048同上30049同上30050同上30051同上30052同上30053天帷boss天落震更震30054天帷boss天落震30055⽕爆炸30056⽕爆炸30057冰割不林放的30058同上30059冰⼤姐⼤招啊！30065炸弹爆30066-30067⽕焰爆炸⽕焰烟⽕-地下有⽕⼤爆炸带灼伤3006869⽯柱3007071⼩电柱300727374⼩电柱3007576⽯头3007677爆弹30084⼩冰刺30082冰⽕-----------------------------------------------------------------------30300⿁魂蝴蝶30301悬空BOSS激光30302悬空BOSS眼睛30303悬空BOSS地上眼30304地上眼激光30400紫雾⽕烧30401反射镜30402滚的球30403持续⽕烧30410赋予怪随即状态30411投掷100元飞镖30495岩浆爆⽐普通⾼点30496迷乱深渊召唤柱30497迷乱深渊闪电云30498迷乱⼤闪电地上范围30499地晕震30500⽕焰陨⽯出亚德炎⼰被困时长会消失？30501⽕焰陨⽯⽆限亚德炎⼰被困时长会消失？30502倒数数字待研究30503天空深渊⽕陨⽯⽆限⽕精灵会被困住30504插地魔棒30505脚下紫光超垃圾30506召唤沿江爆⽆攻击30507深渊柱困⼰30508爽⽕爆⽆震荡区别法师屏幕2301330509宇宙光环垃圾..30510脚下冰霜⽆效果30511邪龙锁链30512⼩极爆30513天惟深渊boss⽔泡30514天惟深渊boss跟踪⽔雾球30515天惟深渊BOSS雷云30516脚下⽕光环浮现⽆效果30518深渊困⼰柱30519深渊困⼰柱30520召唤的花30521召唤花是敌⼈30522深渊boss太阳30523⼩⽕爆炸30524脚下⼩⼑30525藤蔓⽣长有效果⽆攻击30526盗贼划⼑30527蜷缩的溜蛋⾍转动有⼈说屎壳郎滚粪球30528深渊柱⼦困.. 30529垃圾桶物质泥怪物碰卡死30530迷乱boss蝴蝶转冰属性？30531蝴蝶脚下定30532垃圾泥穿越30533垃圾桶物质泥怪物碰卡死30534⼩⽼⿏⾼地30535地下插雷管?假冒伪劣30536⽯雕像的炸弹30537狗替⾝30538⼥盗贼替⾝变⽆限前压腿被打解除30539脚下时闪－⽆效果30540狗屁卡掉30541⽼⿏召唤30542⽼⿏召唤30543⽆头技能定骑⼠⼀⼈⼀次效果30544⼤⽑雷浮空爆3054530546⼩射光⽔激光没⽤30547好像⼩震,⽆效果30548头上冒※⽆效果30549头上冒※⽆效果3055030569全屏⽕30551格⽃改技能暗⾃暴⼩爆炸30552格⽃改技能冰⾃暴⼩爆炸。
刀魂之卡斯：20010邪光斩：20019银光落刃：20016捉头前豹：20017列波斩：20022鬼斩：20023十字斩：20028双刀厉鬼：20029光球：20032出血捉头：20049小奔山：20050念气波：21002抛沙：21004金刚碎：21031银弹：42006爆炎蛋：22213冰冻蛋：42003反坦克炮：22218魔法星蛋：23007杰克诈蛋：23008冰霜雪人：23009电光曼：23010黑猫：23011改良魔法星dan：23043暴炎加热炉：23056魔道酸雨云：23044虎袭：24031意念：24002恶魔之手：24003破魔符：24009盗贼的1级学的手里剑：250015级学的黑球：2500316进制（选择数值）：魔法师- 稻草人=01C70897魔法师- 冰霜雪人=01EE49B7魔法师- 电光曼=01BFF261魔法师- 火炎冲击=01A75856魔法师- 黑洞=01EBA7DF魔法师- 黄龙=01AAE055魔法师- 改良魔法星dan=01AA91BB 格斗家- 背摔=01C1D0E5格斗家- 抛沙=01BD6C1F格斗家- 念气环绕=01B6A977格斗家- 寸拳=01EAC8F0格斗家- 念气罩1=0042189A格斗家- 抓轰炮=01C18015格斗家- 蜘蛛网=01B4C630格斗家- 毒雾=00B66922格斗家- 毒雷柱=007DA63A格斗家- 街头风bao=01D43D31格斗家- 电光龙头=01E7A759鬼剑士- 波动剑=0062CD5C鬼剑士- 怒气爆发=0062CE30鬼剑士- 墓碑=0087EC8E鬼剑士- 银光落刃=007B2EEA鬼剑士- 抓头=007AFCD9鬼剑士- 小邪光斩=008418AC鬼剑士- 虚电球=01BA4B3D鬼剑士- 裂波斩=0062D144鬼剑士- 火波=029BB154鬼剑士- 锁人球=007ADEFE鬼剑士- 十字斩=007AE4DD鬼剑士- 里鬼双刀=007A5ECC鬼剑士- 地光阵=007B032A鬼剑士- 光球定珠=007B0872鬼剑士- 幻影剑舞第五刀=007AEF6E 鬼剑士- 不动明王的球=007AD78F鬼剑士- 格挡气球=007ACC62鬼剑士- 大崩山=007AE7C2鬼剑士- 大崩山火山浮空=006620E0 鬼剑士- 卡洛灼烧=0066196D鬼剑士- 小黑暴诈定珠bao=0061633E 鬼剑士- 小崩山=007AEC57鬼剑士- 狂战觉醒=0062D708鬼剑士- 鬼泣觉醒=0062FD8E鬼剑士- 修落翅膀=007A6478鬼剑士- 修罗觉醒轮子=007AC88C神枪手- 蓄电激光=018E8CFD神枪手- 踏射=005FAEB3神枪手- 地狱烈火1=0062E2AB神枪手- bao炎弹=00691CF1神枪手- Ez8自爆=009E5B85神枪手- 空中战机的导dan=008176EE神枪手- 空中战机=0081623C神枪手- 冰冻弹=00691A07神枪手- 银弹=0060FF82圣职者- 落凤锤=0062FDD1圣职者- 意念=0077C4EA圣职者- 移动墙=00C290C8圣职者- 白虎的球=006BFE00盗贼的自己找16进制（修改值）：冰刺：8022全屏爆(秒友)：8362地火：20044这个无名：8462念气波(群体)：8485天雷(秒无敌)：8498鱼刺：8654轮子：20057风暴：21017黑洞：23025岩浆爆：30495冰秒：30554全秒：88543全秒2：860143爆炎：860330分针：860622气空炮：860816*石化：899987*睡觉：899988*混乱100%：899989*冰冻100%：899993(红眼专用）蹦山秒杀：22218地火20048580：爆zha99999伤害小范围8568：爆zha 4000 伤害8586 ：4秒爆炸机器人99999伤害天界boss 技能23028：13922伤害23031：10802伤害30513：天惟深渊boss 水泡860466：全屏860204：大爆zha860084：龙卷风30567：万剑860622：天刺30567：万剑22206：量子860593：喷毒.版本2显示鼠标(1)进程ID ＝取窗口进程ID (窗口1.取窗口句柄())内存.提升权限()内存.打开进程(进程ID)无敌开＝热键.注册(窗口1.取窗口句柄(), 0, #F7键, &无敌)两倍攻击＝热键.注册(窗口1.取窗口句柄(), 0, #F8键, &两倍攻击) 卖＝热键.注册(窗口1.取窗口句柄(), 0, #Ins键, &卖)修＝热键.注册(窗口1.取窗口句柄(), 0, #Del键, &修)sss ＝热键.注册(窗口1.取窗口句柄(), 0, #F9键, &SSS)技能叠加＝热键.注册(窗口1.取窗口句柄(), 0, #F11键, &技能叠加) 加速＝热键.注册(窗口1.取窗口句柄(), 0, #F12键, &加速)无CD ＝热键.注册(窗口1.取窗口句柄(), 0, #Home键, &无CD)判断.时钟周期＝500职业.加入项目(“小人物：鬼剑士”, )职业.加入项目(“小人物：神枪手”, )职业.加入项目(“小人物：法师”, )职业.加入项目(“小人物：格斗家”, )职业.加入项目(“小人物：大叔”, )快捷键.加入项目(“小人物：A建”, )快捷键.加入项目(“小人物：S建”, )快捷键.加入项目(“小人物：D建”, )快捷键.加入项目(“小人物：F建”, )快捷键.加入项目(“小人物：G建”, )快捷键.加入项目(“小人物：H建”, )快捷键.加入项目(“小人物：F1建”, )快捷键.加入项目(“小人物：F2建”, )快捷键.加入项目(“小人物：F3建”, )快捷键.加入项目(“小人物：F4建”, )快捷键.加入项目(“小人物：F5建”, )快捷键.加入项目(“小人物：F6建”, ).子程序无CD内存操作.写代码(“10CF69C+2FC4+8+0+214=0”)内存操作.写代码(“10CF69C+2FC4+8+4+214=0”)内存操作.写代码(“10CF69C+2FC4+8+8+214=0”)内存操作.写代码(“10CF69C+2FC4+8+C+214=0”)内存操作.写代码(“10CF69C+2FC4+8+10+214=0”)内存操作.写代码(“10CF69C+2FC4+8+14+214=0”)内存操作.写代码(“10CF69C+2FC4+8+360+214=0”)内存操作.写代码(“10CF69C+2FC4+8+364+214=0”)内存操作.写代码(“10CF69C+2FC4+8+368+214=0”)内存操作.写代码(“10CF69C+2FC4+8+36C+214=0”)内存操作.写代码(“10CF69C+2FC4+8+370+214=0”)内存操作.写代码(“10CF69C+2FC4+8+374+214=0”)内存操作.写代码(“010CF69C+2FC4+8+0+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+0+388”))) ' A键内存操作.写代码(“010CF69C+2FC4+8+4+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+4+388”))) ' S键内存操作.写代码(“010CF69C+2FC4+8+8+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+8+388”))) ' D键内存操作.写代码(“010CF69C+2FC4+8+C+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+C+388”))) ' F键内存操作.写代码(“010CF69C+2FC4+8+10+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+10+388”))) ' g内存操作.写代码(“010CF69C+2FC4+8+14+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+14+388”))) ' h内存操作.写代码(“010CF69C+2FC4+8+360+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+360+388=4”))) ' F1内存操作.写代码(“010CF69C+2FC4+8+364+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+364+388=4”))) ' F2内存操作.写代码(“010CF69C+2FC4+8+368+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+368+388=4”))) ' F3内存操作.写代码(“010CF69C+2FC4+8+36C+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+36C+388=4”))) ' F4内存操作.写代码(“010CF69C+2FC4+8+370+204=” ＋到文本(内存操作.读代码(“010CF69C+2FC4+8+370+388=4”))) ' F5内存操作.写代码(“010CF69C+2FC4+8+374+204=” ＋到文本 (内存操作.读代码(“010CF69C+2FC4+8+374+388=4”))) ' F6。
学习怎么用按键精灵制作游戏辅助——脚本源代码干货分享一、用按键精灵确定人物朝向（以剑灵自动寻路为例）的代码在剑灵右上角的小地图里找色/找图，箭头坐标存储在(x1,y1)，箭尾坐标存储在(x2,y2) FindColor1200,0,1920,300,"箭头颜色",x1,y1If x1 > 0 And y1> 0 ThenEnd IfFindColor1200,0,1920,300,"箭尾颜色",x2,y2If x1 > 0 And y1> 0 ThenEnd If'计算斜率/正切值斜率= (y1 - y2) / (x1 -x2)'计算角度角度= Atn(斜率)二、用按键精灵解决用户密码泄露问题的代码Function 加解密(源文件, 秘钥)Dim Z, iDim A, B, C加解密= ""If Len(源文件) = 0 Then’如果密码为空，则初始化为空加解密= ""Exit FunctionEnd 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)加解密= 加解密+ CNextEnd Function举个例子吧~Function 加解密(源文件, 秘钥)Dim Z, iDim A, B, C加解密= ""If Len(源文件) = 0 Then加解密= ""Exit FunctionEnd If'调用Rnd函数使以后Rnd函数所产生的Rnd为相同的伪随机数列Z = Rnd(-密钥)For i = 1 To Len(源文件)C = Mid(源文件, i, 1)A = Asc(C)B = Int(126 * Rnd) And&H7FA = A Xor BC = Chr(A)加解密= 加解密+ CNextEnd FunctionEvent Form1.Load//获取小节名（如"e1df741f-d5ec-4ad7-969d-adb139c6a24f"），同一个Q文件生成的小节名不变a = GetMacroID()//获取到当前脚本/小精灵de ID加密文件=Plugin.File.ReadINI("e1df741f-d5ec-4ad7-969d-adb139c6a24f","Form1 .InputBox2.T ext", ".\uservar.ini")解密文件= 加解密(加密文件, 1234567890)'这里的1234567890是假使的密钥，可以修改，注意保密Form1.InputBox2.T ext = 解密文件End Event//写入密码信息源文件= Form1.InputBox2.T ext加密文件= 加解密(源文件, 1234567890)CallPlugin.File.WriteINI("e1df741f-d5ec-4ad7-969d-adb139c6a24f","Form1.InputBox2.T ext", 加密文件, ".\uservar.ini")//输出信息RunApp "notepad.exe"SayString Form1.InputBox1.T extKeyPress "Enter", 1SayString 源文件三、按键精灵快速排序的代码su = "6|1|2|7|9|3|4|5|10|8"su=Split(su, "|")L = UBound(su)Call ks(0, L)Function ks(L, B)If L > B ThenExit FunctionEnd If //判断数组上标下标是否超出范围i = Lj = Bkey =int( su(L) ) //数组第一位提取作为基数While j>iWhile int ( su(j)) >= key and j > i //要先从最右边开始找找到第一个小于key的数这里添加的j>i的判断是为了防止j的值不断递减导致下标越界j = j - 1WendWhile int (su(i)) <= key and j > i //从最左边开始找找到第一个大于key的数（这里的字符串数组需要转换为数值型）i = i + 1WendIf j>i then // 将和基数key对比得到的两个数对换将大于key的值往右边放小于key的值往左边放T = su(i)su(i) = su(j)su(j) = TEnd IfWend // 这个While 循环当i=j 第一轮比较完退出su(L) = su(i) // 重新设置数组第一个元素为基数su(i) = key// 基数归位（排完一轮之后左边的数<基数<右边的数那么基数就到了排序中它该在的位置。
代码功能：大章鱼须代码：1025代码功能：研究所冰章鱼脚代码：8541代码功能：怪+泡爆砸（56 怪爆掉一大半血。
）（50 已下怪。
爆血还剩一滴血）代码：30513代码功能：竖立的白色光环代码：8693代码功能：地下金色圆环代码：807448代码功能：小白钝后跳斩代码：20059代码功能：老鼠召唤代码：30542代码功能：老鼠召唤代码：30542代码功能：念气罩代码：30517代码功能：拔刀斩代码：8087代码功能：超大地裂代码：8079 代码功能：追人的宝箱代码：9628 代码功能：50 级班图战士代码：8125代码功能：4 秒爆炸机器人99999 伤害代码：8586 代码功能：蓝拳打地代码：24006代码功能：落凤锤代码：24001代码功能：狂乱锤击代码：24015代码功能：满蓄力空斩打代码：24017 代码功能：无形态攻击代码：8147 代码功能：迷乱深远闪电云代码：30497代码功能：雷云代码：30515代码功能：小极爆代码：30512代码功能：黑色闪电代码：44002代码功能：旧版悲鸣僵死无敌紫阵代码：1064代码功能：油桶爆炸代码：8034代码功能：大爆炸代码：8067 代码功能：拔刀斩代码：860055 代码功能：全屏代码：20044 代码功能：全屏代码：8026代码功能：召唤研究所冰封男代码：8612代码功能：巡航导弹代码：8552 代码功能：好像是战斗的（华丽）代码：23030 代码功能：透明波动（华丽）代码：23031 代码功能：火爆（华丽）代码：23031 代码功能：地震波（华丽）代码：23040 代码功能：波动代码：21001代码功能：波动华丽代码：21008代码功能：冲击波代码：21012 代码功能：爆炸代码：21013代码功能：金波闪代码：21016代码功能：伏虎霸王拳代码：21024代码功能：伏虎霸王拳代码：21025代码功能：伏虎霸王拳代码：21026 代码功能：伏虎霸王拳代码：21027代码功能：波动代码：21039代码功能：僵尸球代码：30004代码功能：蛊惑虫代码：30013代码功能：周身电代码：30201 代码功能：防进身波代码：30305 代码功能：爱丽丝姐姐的火波代码：30360 代码功能：波动代码：30391 代码功能：暗黑城守门人代码：30398代码功能：紫光后火代码：30400代码功能：定冰代码：30552 代码功能：绿头人帮你打一下代码：860010 代码功能：金身不灭代码：860042代码功能：大鸟代码：860049代码功能：靠是加血代码：8600498489 高伤害好用8087 拔刀斩8079 超大地裂1064 旧版 .悲鸣僵尸无敌 紫阵 8628追人的宝箱8125 50 级班图战士 8586 4秒爆炸机器人 99999 伤害 24006蓝拳【打地？】 24001落凤锤 24015狂乱锤击 24017 满蓄力空斩打8147 无形态攻击30497 迷乱深渊闪电云30515 雷云30512小极爆 44002 黑色闪电1065 骷髅无敌紫阵8034 油桶爆炸8067 大爆砸860055 拔刀斩20059 忍者击20044 全屏8026 全屏8552 巡航导弹30552 定冰860010 绿头人帮你打一下860042 金身不灭860049 大鸟860059 自动导先黑洞860109 好电860140 原子爆弹85999485568602028171862930499305122227820021 啊修罗光圈20024 暴流破20022 裂波斩20025 大暴20027 彩波20028 十字200302003幻影剑舞32003幻影剑舞42003幻影剑舞52003幻影剑舞62003格挡气球92004血斩12005小奔8384 导弹导弹83998412 冰刺暴冰刺暴84118410 冰刺暴8413 冰刺暴跟砖84188419 大跟砖8459 LV 25 佣兵8460花喷毒8475毒烟8476红电8482像银落的波8488黑电8489全雷配合高防好用8498网8503章鱼转8504章鱼转85058506 章鱼转010DDD10 怪物基址22201 范围看不见的火烧白色伤害837 狂招哥布林857 盗贼门1025 大章鱼须1030 捆怪专用1056烧怪岩浆1057烧怪岩浆1058天降岩浆1072 大章鱼须2722 电网球好看8018 恩弹怪可担无敌代码功能小爆炸（不能杀队友）代码860575代码功能小爆炸（可杀队友）代码8349EC 59 天雷闪超爽不过好象卡屏的72 EA 闪电连无伤害59 77 半月斩伤害未知5475 大激光牛BCD 56 闪电还可以5B 75 地雷敌人踩到就暴CD 56 冰冻手雷无伤害1D 52 气功觉醒无伤害46 4E 血之咆哮1A 20 大面积天雷超爽D3 20 全屏1700 伤害打自己- -58 77 冰自暴无伤害69 EA 阴沟一般般554E 狂战觉醒无伤害D4 56 机械觉醒无伤害5A 21 章鱼稳定胜在数量多59 77 半月斩伤害未知6B 1F 大叔龙卷风还可以5A 21 章鱼稳定胜在数量多78 21 手雷稳定4000 伤害机械用多了卡屏掉出游戏86 21召唤枪手37 2002 5A 天雷4000 伤害魔界花40 级38 775B 77 精灵王激光19 C4 轰爆弹的爆炸9E C5 轰雷树果实的爆炸64 C8 冰属性投石（几率冻结敌人19超大落雷202C超级爆炸即大暴不秒队友版20BC魔剑剑气2193召唤小机械人219C时尚60 级武227F 1F 自动攻击的椅子6B 1F 天谴旋风AE 20 召唤碉堡32 21 全屏天雷（自己和队友+ 秒无敌）30 4E 银光落刃无伤害31 52 电光龙头5677 全屏火2F 77 邪龙的锁链F9 59 火石头秒FA 59 冰石头秒27 4E 冰刃·波动剑D9 59 加迅速效果E5 59 火系爆炸效果超爽2C 77 爽火爆5E 75 灼伤的也很厉害6B1F 冲击波CD 1F 小电D3 1F 新全屏攻击2000 伤害39 4E 伤害（3000-4000）3C 4E 伤害（2000 左右）47 4E 伤害还可以30 77 伤害较大CD 56 伤害较大（伤害高）46 4E 伤害（500+ 群攻击）0C 52 伤害（1000+ 伤害）E5 59 火系爆炸效果直线攻击22 77 迷乱大闪电地上范围2D 77 宇宙光环好..31 77 天惟深渊boss 水泡32 77 天惟深渊boss 跟踪水雾球50 77 大毛雷浮空爆52 77 小射光水62 1F 油桶爆炸60 09 透明D7 21 满级手雷手雷爆杂效果F6 21 类似大枪觉醒91 22 大枪45 引力炮的炸弹爆炸CB 1F 天上下雪球。
来自按键精灵的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 1000Rem 主程序Call 选择角色()Call 疲劳改键()Call 移动区域()Call 地图选择()Goto 主程序Sub 选择角色()If jsgh=0 ThenIfColor 210,440,"6B949C",0 Thenjsx=117jsy=137If jhks<5 ThenFor jhks-1jsx=jsx+130NextElseFor jhks-5jsx=jsx+130Nextjsy=jsy+185End Ifjhks=jhks+1MoveTo jsx, jsyLeftClick 1Delay 1000MoveTo 322, 448LeftClick 1ElseIf jhks>jssl ThenCall 报警提醒()End IfFor 3IfColor 316,271,"484849",0 ThenElseMoveTo 39, 434LeftClick 1Delay 300KeyPress "Esc", 1Delay 1000End IfNextMoveTo 316, 344LeftClick 3For 30IfColor 210,440,"6B949C",0 ThenGoto 主程序ElseDelay 1000End IfNextCall 报警提醒()End IfEnd IfEnd SubSub 疲劳改键()For 30IfColor 40,400,"608A9D",0 ThenIfColor 278,437,"F78C00",0 ThenGoto 疲劳改键ElseMoveTo 39, 434LeftClick 1Delay 300KeyPress "Esc", 1Delay 1000End IfNextIf jsgh=1 ThenCall 报警提醒()End IfGoto 主程序ElseDelay 1000End IfNextCall 报警提醒()Rem 疲劳改键For 3IfColor 316,271,"484849",0 ThenElseKeyPress "Esc", 1Delay 1000End IfNextMoveTo 315, 317LeftClick 3Delay 1000MoveTo 407, 163LeftClick 1Delay 300KeyPress "W", 1Delay 300KeyPress "A", 1Delay 300KeyPress "S", 1Delay 300KeyPress "D", 1Delay 300MoveTo 372, 401LeftClick 1LeftClick 1Delay 1000For 3IfColor 566,38,"8DEDFF",0 ThenElseMoveTo 344, 188LeftClick 1Delay 1000MoveTo 404, 240LeftClick 1Delay 1000End IfNextMoveTo 163, 401LeftClick 1Delay 300Call 出售物品()End SubSub 移动区域()KeyDown "S", 1Delay 8000KeyUp "S", 1Delay 300If dtxz<2 ThenMoveTo 400, 360RightClick 1Delay 1000KeyDown "D", 1zyj=1End IfIf dtxz>1 And dtxz<6 ThenKeyDown "S", 1Delay 300KeyDown "A", 1Delay 3500KeyUp "S", 1zyj=0End IfIf dtxz>5 And dtxz<11 ThenKeyDown "D", 1zyj=1End IfIf dtxz>10 And dtxz<18 ThenMoveTo 20, 90RightClick 1Delay 5000MoveTo 280, 380RightClick 1Delay 1000KeyDown "D", 1zyj=1End IfFor 50IfColor 573,428,"8DC5DD",0 ThenGoto 移动区域ElseDelay 1000End IfNextCall 报警提醒()Rem 移动区域If zyj=0 ThenKeyUp "A", 1ElseKeyUp "D", 1End IfDelay 300End SubSub 地图选择()If dtxz=0 Thendtx=147dty=389End IfIf dtxz=1 Thendtx=309dty=384End IfIf dtxz=2 Thendtx=147dty=389End IfIf dtxz=3 Thendtx=472dty=352End IfIf dtxz=4 Thendtx=123End IfIf dtxz=5 Thendtx=340dty=188 End IfIf dtxz=6 Thendtx=130dty=376 End IfIf dtxz=7 Thendtx=295dty=391 End IfIf dtxz=8 Thendtx=441dty=331 End IfIf dtxz=9 Thendtx=504dty=256 End IfIf dtxz=10 Thendtx=366dty=181 End IfIf dtxz=11 Thendtx=192dty=227 End IfIf dtxz=12 Thendtx=340dty=188 End IfIf dtxz=13 Thendtx=494dty=192 End IfIf dtxz=14 Thendtx=518dty=269 End IfIf dtxz=15 Thendtx=472End IfIf dtxz=16 Thendtx=309dty=384End IfIf dtxz=17 Thendtx=147dty=389End Ifcswp=0Rem 地图选择If zyj=0 ThenKeyDown "D", 1Delay 500KeyUp "D", 1KeyDown "A", 1ElseKeyDown "A", 1Delay 500KeyUp "A", 1KeyDown "D", 1End IfFor 30IfColor 573,428,"8DC5DD",0 ThenIf zyj=0 ThenKeyUp "A", 1ElseKeyUp "D", 1End IfDelay 300For 10IfColor 573,428,"8DC5DD",0 ThenKeyPress "D", 3Delay 300MoveTo dtx, dtyLeftClick 1Delay 1000ElseCall 地图内部()Goto 地图选择End IfNextDelay 30000Goto 主程序ElseDelay 1000End IfNextCall 报警提醒()End SubSub 地图内部()For 30IfColor 40,400,"608A9D",0 ThenKeyPress "Esc", 3Delay 300KeyPress jtj1, 1Delay 300KeyPress jtj2, 1Delay 300KeyPress jtj3, 1Delay 300For 50IfColor 582,49,"263C44",0 ThenIfColor 582,88,"102129",0 ThenIfColor 562,68,"102931",0 ThenIfColor 602,68,"102131",0 ThenFor 5KeyPress "X", 1Delay 300NextElseGoto 地图内部End IfElseGoto 地图内部End IfElseGoto 地图内部End IfElseGoto 地图内部End IfNextGoto 地图内部ElseDelay 1000End IfNextCall 报警提醒()Rem 地图内部KeyPress ctj1, 1Delay 300KeyPress ctj2, 1Delay 300cswp=cswp+1If jqaj>0 ThenFor 10KeyPress jqaj, 1Delay 300NextEnd IfIf csaj>0 ThenIf cswp>10 ThenFor 3IfColor 566,38,"8DEDFF",0 ThenElseKeyPress "I", 1Delay 1000End IfNextKeyPress csaj, 1Delay 300Call 出售物品()cswp=0End IfEnd IfFor 3IfColor 316,271,"484849",0 ThenElseKeyPress "Esc", 1Delay 1000End IfNextMoveTo 316, 396LeftClick 3Delay 5000End SubSub 出售物品()MoveTo 547, 353LeftClick 1Delay 300MoveTo 356, 207LeftClick 3Delay 1000zby=234For 2zbx=347For 7MoveTo zbx, zbyDelay 500FindPic 325,0,640,480,"Attachment:\金币.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenFindPic 325,0,640,480,"Attachment:\封装.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseFindPic 325,0,640,480,"Attachment:\无法.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseLeftClick 1Delay 500LeftClick 1Delay 500End IfEnd IfElseFindPic 325,0,640,480,"Attachment:\无法.bmp",1,ux,uyIf ux > 0 And uy > 0 ThenElseGoto 出售物品End IfEnd Ifzbx=zbx+30Nextzby=zby+30NextRem 出售物品MoveTo 403, 207LeftClick 3Delay 1000FindPic 0,0,640,480,"Attachment:\魔盒.bmp",0.9,ux,uyIf ux > 0 And uy > 0 ThenMoveTo ux+6, uy+12LeftClick 1Delay 500LeftClick 1Delay 500LeftClick 1End IfDelay 300KeyPress "Esc", 1Delay 300End SubSub 报警提醒()Rem 报警提醒If bjfs=0 ThenFor 2BeepDelay 1000NextEnd ifIf bjfs=1 ThenPath = Plugin.Sys.GetDir(0)Path=Path & "\W.wav"Call Plugin.Media.Play(Path)Delay 2000End ifGoto 报警提醒End Sub。
