急需一个DNF收获工具无毒_按键精灵吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
急需一个DNF收获工具无毒收藏
我需要一个能用的自动DNF收货工具，要无毒的，谁有请发邮箱，谢谢啊~~~最好自动喊话的，收费的不要。。。各位大哥大姐帮帮忙啊~~~~~~~~
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或DNF自动收货源码
本来想把DNF自动收货各种模块都写一下的，现在看来还是算啦，就直接把源码贴上吧。
个人认为主要分为三大块：1.物品数量识别，之前我已经写了这块啦。2.金币输入3.流程控制
下面说一下代码以及使用的一些问题。首先代码前面一百多行都是给三个数组赋值，没办法，按键精灵不能一次性整体给数组赋值，这点我也很无奈，要是把DNF所有东西都加上，不知道这代码得多长啦。然后，调试时，代码没有什么问题，使用后，会发现有一句警告，说set
a=fso.opentextfile("c:交易记录.txt",8)这句代码没什么权限什么的，这是关于VBS的，我也不知道原因，总之这句还是运行啦的，对程序运行没有影响。关于识别物品，我用的是识别图片，这里大家得自己截图啦，看啦代码就应该明白图片应该截多大，以及从哪里开始截图，还有几张其他的用于流程控制的图片，大家自己截图就可以啦，或者改改代码，会用点案件精灵的，这些都是小问题。
关于使用，首先得在C盘根目录件一个文本文档，用于记录收货，取名为“交易记录.txt”。自动喊话我是配合搜狗使用的，zz设置为第一句话，zzz设置为第二句话，不会设置的话，百度一哈，你就晓得。按F10运行脚本时，鼠标必须放在游戏内，对啦，还有一点，DNF不是有一个对话的大框吗，就是什么悄悄话，红会的话，附近的话都在里面的那个大框，我们可以调整到左，右，和游戏内那个框，我们必须把这个框放到右边，看啦代码，你就知道原因啦，否则会严重影响程序的稳定性。安拉F10后，游戏会被移动到左上角，然后开始喊话，如果没有喊话，你就把鼠标在游戏内点一下，在把人物走几步，就会开始喊话啦。
由于我是用的学校的网络，收货时有时会有点卡，一卡好几秒，这就没有按照脚本原计划流程走，有时会出现无法输入金币等问题，或者中间跑出来一个DNF的提示框，当然这次交易就算是失败啦，对方关闭交易框后，这些问题都会自动解决掉。还有就是交易记录，不一定每一笔记录的都是正确的，当出现对方点啦交易，我方也点啦交易，但是在最后确认时，如果对方取消啦，此时，交易应该算是失败的，但是脚本还是会算作成功交易，这里看代码就知道原因啦，应该还有其他更好的办法，大家自己解决吧，不是什么大问题。
要说的也差不多这些啦吧，大家玩游戏，还是可以学点其他的东西的，我当初就是为了在摆地摊时能自动喊话，发现按键精灵就能实现这么个功能，而且学起来也简单，至少现在我知道有这么个东西，以后电脑上要是遇到些重复枯燥的工作，那就可以自己用按键精灵写一个小脚本啊。然后前段时间我还小小的冲动啦下，想自己写个G，然后知道啦易语言这么个东西，类似VB的，也很容易上手，因为没找到不会被和谐的改内存软件，后面也懒得找啦，但至少现在我对于单机游戏做做小外G还是没问题的，最主要的是我又会使用易语言啦啊，前几天还用它写啦个串口调试呢，所以说任何事情还是能意外的学到些东西，好啦，代码如下：
num0,num1,num2,num3,num4,num5,num6,num7,num8,num9,co,x,y,i,num
Dim sum,sum1,flag,flag1
Dim 图片位置
Dim Hwnd,fso,a
Dim 生锈的铁片,最下级砥石,最下级硬化剂,碎布片,炉岩碳,风化的碎骨
Dim 无色小晶块,红色小晶块,蓝色小晶块,黑色小晶块,白色小晶块
Dim 龙人之眼,莹石,锆石,尖晶石,血滴石,金刚石,紫玛瑙,圣痕丝绸,无重力碎片
Dim 撒勒的印章,克尔顿印章
Dim 锋利的尖刺,邪恶的结晶,耀眼的结晶,坚韧的触须
Dim 灵魂晶石，灾难的征兆,魔法石碎片
Dim 锋利的狼牙
Dim 蓝冰恶魔挑战书,狂乱恶魔挑战书, 强韧恶魔挑战书,威严恶魔挑战书
Dim 下级元素结晶,上级元素结晶
Dim 服务器喇叭,频道喇叭
Dim 龙头炮的炮身,王之石像碎块,使徒的气息,泰拉石,眼睛
Dim 物品(45),单价(45),图片位置(45)
物品(0)="生锈的铁片"
物品(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)="频道喇叭"
//单价设置区
单价(0)=100'生锈的铁片
单价(1)=100'最下级砥石
单价(2)=100'最下级硬化剂
单价(3)=100'碎布片
单价(4)=30'炉岩碳
单价(5)=100'风化的碎骨
单价(6)=30'无色小晶块
单价(7)=150'红色小晶块
单价(8)=50'蓝色小晶块
单价(9)=50'黑色小晶块
单价(10)=50'白色小晶块
单价(11)=200'龙人之眼
单价(12)=200'莹石
单价(13)=100'锆石
单价(14)=500'尖晶石
单价(15)=100'血滴石
单价(16)=100'金刚石
单价(17)=100'紫玛瑙
单价(18)=200'圣痕丝绸
单价(19)=600'无重力碎片
单价(20)=200'撒勒的印章
单价(21)=500'克尔顿印章
单价(22)=1000'锋利的尖刺
单价(23)=500'邪恶的结晶
单价(24)=500'耀眼的结晶
单价(25)=200'坚韧的触须
单价(26)=3000'灵魂晶石
单价(27)=3000'灾难的征兆
单价(28)=500'魔法石碎片
单价(29)=300'锋利的狼牙
单价(30)=5000'蓝冰恶魔挑战书
单价(31)=15000'狂乱恶魔挑战书
单价(32)=15000'强韧恶魔挑战书
单价(33)=15000'威严恶魔挑战书
单价(34)=20'下级元素结晶
单价(35)=3000'上级元素结晶
单价(36)=100000'服务器喇叭
单价(37)=200'龙头炮的炮身
单价(38)=500'王之石像碎块
单价(39)=8000'使徒的气息
单价(40)=10000'泰拉石
单价(41)=20000'眼睛
单价(42)=500'树根
单价(43)=10000'白色大晶体
单价(44)=30000'红色大晶体
单价(45)=30000'频道喇叭
//图片位置
图片位置(0)="C:DNF图片\生锈的铁片.bmp"
图片位置(1)="C:DNF图片\最下级砥石.bmp"
图片位置(2)=&"C:DNF图片\最下级硬化剂.bmp"
图片位置(3)=&"C:DNF图片\碎布片.bmp"
图片位置(4)="C:DNF图片\炉岩碳.bmp"
图片位置(5)=&"C:DNF图片\风化的碎骨.bmp"
图片位置(6)=&"C:DNF图片\无色小晶块.bmp"&&&&
图片位置(7)=&"C:DNF图片\红色小晶块.bmp"&&&&&
图片位置(8)="C:DNF图片\蓝色小晶块.bmp"&&&&
图片位置(9)="C:DNF图片\黑色小晶块.bmp"&&&&
图片位置(10)="C:DNF图片\白色小晶块.bmp"&
图片位置(11)="C:DNF图片\龙人之眼.bmp"&&&&&
图片位置(12)="C:DNF图片\莹石.bmp"&&&&&
图片位置(13)="C:DNF图片\锆石.bmp"&&&&
图片位置(14)="C:DNF图片\尖晶石.bmp"&&&&&
图片位置(15)="C:DNF图片\血滴石.bmp"&&&&&
图片位置(16)="C:DNF图片\金刚石.bmp"
图片位置(17)="C:DNF图片\紫玛瑙.bmp"
图片位置(18)="C:DNF图片\圣痕丝绸.bmp"&&&&&
图片位置(19)="C:DNF图片\无重力碎片.bmp"
图片位置(20)="C:DNF图片\撒勒的印章.bmp"&&&&&
图片位置(21)="C:DNF图片\克尔顿印章.bmp"&&&&&
图片位置(22)="C:DNF图片\锋利的尖刺.bmp"&&&&
图片位置(23)="C:DNF图片\邪恶的结晶.bmp"
图片位置(24)="C:DNF图片\耀眼的结晶.bmp"&&&&&
图片位置(25)="C:DNF图片\坚韧的触须.bmp"
图片位置(26)="C:DNF图片\灵魂晶石.bmp"
图片位置(27)="C:DNF图片\灾难的征兆.bmp"
图片位置(28)="C:DNF图片\魔法石碎片.bmp"&&&&
图片位置(29)="C:DNF图片\锋利的狼牙.bmp"
图片位置(30)="C:DNF图片\蓝冰恶魔挑战书.bmp"&&&&&
图片位置(31)="C:DNF图片\狂乱恶魔挑战书.bmp"&&&&&
图片位置(32)="C:DNF图片\强韧恶魔挑战书.bmp"&&&&&
图片位置(33)="C:DNF图片\威严恶魔挑战书.bmp"&&&&&
图片位置(34)="C:DNF图片\下级元素结晶.bmp"&&
图片位置(35)="C:DNF图片\上级元素结晶.bmp"&&
图片位置(36)="C:DNF图片\服务器喇叭.bmp"
图片位置(37)="C:DNF图片\龙头炮的炮身.bmp"
图片位置(38)="C:DNF图片\王之石像碎块.bmp"
图片位置(39)="C:DNF图片\使徒的气息.bmp"
图片位置(40)="C:DNF图片\泰拉石.bmp"
图片位置(41)="C:DNF图片\眼睛.bmp"
图片位置(42)="C:DNF图片\树根.bmp"
图片位置(43)="C:DNF图片\白色大晶体.bmp"
图片位置(44)="C:DNF图片\红色大晶体.bmp"
图片位置(45)="C:DNF图片\频道喇叭.bmp"
//数字代码区
num0="0110"
num1="0001"
num2="1111"
num3="0110"
num4="0010"
num5="0110"
num6="0110"
num7="0100"
num8="0110"
num9="0110"
Hwnd = Plugin.Window.MousePoint()
Call Plugin.Window.Move(Hwnd, 0, 0)
Delay 2000
Set fso=CreateObject("Scripting.FileSystemObject")
set a=fso.opentextfile("c:交易记录.txt",8)
Call 检查是否正在交易
if sum1&&sum
//MessageBox("开始输入金币")
&Call 输入金币(sum)
Call& 检查对方是否点交易()
Sub 交易前喊收货()
&If flag1=0
&&KeyPressS "Enter", 1
&&Delay 200
&&FindColor
60,398,92,407,"AADDEE",intX,intY
&&If intX &
&&&KeyPressS
&&&KeyPressS
&&&KeyPressS
"Enter", 1
&&&flag1=1
&&KeyPressS "Enter", 1
&&Delay 200
&&FindColor
60,398,92,407,"AADDEE",intX,intY
&&If intX &
&&&KeyPressS
&&&KeyPressS
&&&KeyPressS
"Enter", 1
&&&flag1=0
&Delay 1000
&Call 等待交易
Sub 交易中提示()
&&& KeyPress
"Enter", 1
&&& KeyPress
&&& KeyPress
&&& KeyPress
&&& KeyPress
&&& KeyPress
"Space", 1
&&& KeyPress
"Enter", 1
Sub 检查对方是否点交易()
&&Delay 150
&&IfColor 165,266,"BBFFFF",2
&If flag=1 Then
//&&MessageBox("对方已点交易")
&&s=Plugin.GetSysInfo.GetDateTime()&
&&a.writeline("")
&&a.writeline("------------------------------")
&&a.writeline("时间："&s)
&&a.write("物品：")
&&For m=0 to 45
找图并传递图片(物品(m),单价(m),图片位置(m))
&&If sum1=sum
//&&&MessageBox("sum1=sum")
&&&LeftClick
&&&LeftClick
&&&a.writeline("")
//&&&FindPic
299,111,347,140,"C:DNF图片\成功交易公告.bmp",0.6,intX,intY
//&&&If intX
&&&a.writeline("花费："&sum)
&&&a.close
&&&a.writeline("物品变化，重新检测")
&&&a.close
Sub 输入金币(数字串)
MoveTo 198,300
Delay 1000
LeftClick 2
KeyPress "BackSpace", 15
Dim 数字码，位数,n
位数=Len(数字串)
&&&&&&&&&&&
数字码=Asc(数字串)
&&&&&&&&&&&
&&&&&&&&&&&
KeyPress 数字码,1
&&&&&&&&&&&
&&&&&&&&&&&
数字串=Right(数字串,n)
LeftClick 1
Sub 检查是否有交易()&
&IfColor 915,453,"FFFFFF",2 Then
&MoveTo 881, 544
&Delay 200
&LeftClick 2
&&Delay 500
Sub 检查是否正在交易
//&Delay 500
FindPic(81,107,316,135,"C:DNF图片\物品交易.bmp",0.6,intX,intY)
//&If intX & 0
&FindColor
160,115,217,130,"FFFFFF",intX,intY
&If intX & 0&
//&&MessageBox("正在交易")
&&Call 等待放入物品
//&&Delay 100
&&Call 交易前喊收货()
Sub 检查交易是否提前结束
//&MessageBox("进来sum"&sum)
FindPic(81,107,316,135,"C:\物品交易.bmp",0.6,intX,intY)
//&If intX & 0
&FindColor
160,115,217,130,"FFFFFF",intX,intY
&If intX & 0&
//&&MessageBox("交易未结束，开始找图")
&&For m=0 to 45
//&&&MessageBox("m="&m)
找图并传递图片(物品(m),单价(m),图片位置(m))
//&&MessageBox(sum)
Sub 等待交易
&Delay 2000
&Call FindPic
(448,263,644,331,"C:DNF图片\交易公告.bmp",0.6,intX,intY) //扫描交易框
&Delay 200
&&If intX &
&&MoveTo 523,403
&&LeftClick 2
&&Delay 2000
Sub 等待放入物品
//&MessageBox("等待放入物品")
&&For i=1 to 16
//&&MessageBox("进入循环体")
FindPic(60,160,110,210,"C:DNF图片\物品栏空.bmp",0.6,intx,inty)
//&&&MessageBox("查看交易栏")
&&&If intx
//&&&&MessageBox("交易栏无物品")
//&&&&MessageBox("交易栏有物品")
//&MessageBox(i)
&&Delay 1000
&&KeyPress "esc",1
&&Delay 100
检查交易是否提前结束
Sub 找图并传递图片(物品,单价,图片位置)
&Dim intx,inty
FindPic(72,174,307,259,图片位置,0.6,intx,inty)
MessageBox("找到"&物品)
MessageBox("单价"&单价)
Call 识别数字并计算(物品,单价,intx,inty)
MessageBox("未找到"&物品)
Sub 识别数字并计算(物品,单价,x,y)
bx,by,数量
&&& 数量=""
&&& by=y+1
&&&&&&&&&&&
&&&&&&&&&&&
&&&&&&&&&&&&&&&
IfColor x,y,"FFFFFF",0 Then
&&&&&&&&&&&&&&&&&&&
&&&&&&&&&&&&&&&
&&&&&&&&&&&&&&&&&&&
&&&&&&&&&&&&&&&
&&&&&&&&&&&&&&&
&&&&&&&&&&&&&&&
&&&&&&&&&&&
&&&&&&&&&&&
If co=num0
&&&&&&&&&&&
ElseIf co=num1
&&&&&&&&&&&
ElseIf co=num2
&&&&&&&&&&&
ElseIf co=num3
&&&&&&&&&&&
ElseIf co=num4
&&&&&&&&&&&
ElseIf co=num5
&&&&&&&&&&&
ElseIf co=num6
&&&&&&&&&&&
ElseIf co=num7
&&&&&&&&&&&
ElseIf co=num8
&&&&&&&&&&&
ElseIf co=num9
&&&&&&&&&&&
&&&&&&&&&&&
数量=num&数量
If num="1"
&&&&&&&&&&&
&&&&&&&&&&&
&&& endfor
&&& End If
MessageBox("数量"&数量)
&If flag=1
&&a.write(数量&"个"&物品&"&
sum=sum+单价*数量
s=Plugin.GetSysInfo.GetDateTime()&&&
//&a.writeline("------------------------------")
//&a.writeline("时间："&s)
MessageBox(sum)
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。求高手用按键精灵制作DNF自动收货工具，脚本，请发到 谢谢~_百度知道
求高手用按键精灵制作DNF自动收货工具，脚本，请发到 谢谢~
我有更好的答案
其他类似问题
为您推荐：
dnf自动收货工具的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁