1. 按鍵精靈 腳本 自動撿物 如何做
可以做成這樣。
但抓圖，需要你自己完成
用多點找色功能去完成
只能給你一個提示
拍下圖後，用裡面的抓抓－－圖像－－抓點
把滑鼠移動到你想要查找的圖上，按下CTRL+1
再移動滑鼠到另一點，再次按CTRL+1
。。。。
可多次（最好不少於8次，不多於10次）
至於移動多少像素，無所謂，但移動的位置都要在你所要找的圖片內
比如你說的這個「礦石」這2個字，因為我不知道你這2個字在游戲中是什麼字體，大小是多少，顏色是什麼，所以不好給你做，你只需把這二個字找出來（用多點找色功能）
再把代碼，復制下來，寫到裡面，就可以實現准確找到這個2個字。
至於你需要由這2個字再相對移動多少像素，去點擊你要拾取的物品，就自己看著修改了。
這個可以做成一個函數，然後，定義多個圖片，界時，可分別拾取不同的物品。
上面所說的，就是方法，但我想你可能一時聽不明白。19點到20點，我會在線，你可以在線給我發消息或是在線HI我。
2. 按鍵精靈 腳本 自動撿物 如何做
思路是這樣的：
1、findpic找到圖的坐標x和y。假設已知物品的像素是寬x高＝w和h，則物品的揀取坐標是x＋（w／2）和y+（h／2）
2、屏幕點擊上述揀取坐標位置，等待人物走到物品上。
3、點擊角色腳下的位置，完成揀取。
3. 按鍵精靈的腳本怎麼用啊
分類: 電腦/網路 >> 軟體
問題描述:
別人給我發了一個腳本
[General]
Description=群刀半自動練級
BeginHotkey=121
beginHotkeyMod=4
RunOnce=0
Enable=0
[Repeat]
Type=0
Number=1
[Comment]
Content=
[Script]
〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓使用說明〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
*循環設為循環1次.F11開始，F12中止.
*單人掛機時建議關閉組隊和查看功能，關閉所有特效，在1024×768下使用.
*F1為60級輕功，F2技能，F3紅，F4藍，判扒F5撿東西，F6回城符，F7單攻技能,F8為15輕功.
*群刀手動引怪時也此沖嫌能輕鬆了，點遠處怪，則使用單攻技能，點身旁森手怪，則群攻。
*動動滑鼠，一直打6、7個怪不是問題，輕松+愉快啊
〓〓〓〓〓〓〓〓〓〓〓〓〓玩家自定義變數〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
VBS hongBF=70
血量少於百分之多少（可自行設定）時，腳本自動吃紅。
VBS dihui=25
血量少於百分之多少（可自行設定）時，腳本自動回城打坐。
〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓主程序〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
Rem 開始打怪
KeyPress 119
Delay 32
Gosub 補紅藍
Gosub 無葯回城
For 3
KeyPress 118 1
第一擊為單攻技能,江湖中出連續技能了，怕發不出來就循環3次吧
Delay 128
EndFor
Rem 技能攻擊
VBSCall Call FindCenterColor(350,220,674,460,"1028ff",x1,y1)
檢測怪的血條
If x1>0 and y1>0
有血條，怪存在
For 3
KeyPress 113 1
使用技能攻擊，同理循環3次
Delay 128
EndFor
技能延時
Gosub 補紅藍
For 3
KeyPress 116 1
Delay 128
EndFor
Gosub 無葯回城
Goto 技能攻擊
循環技能攻擊
EndIf
Goto 開始打怪
無怪，怪卡住或死亡，重新開始下一輪循環
Rem 停止掛機
MoveTo 512 468
LeftClick 1
Delay 3000
KeyDown 17 1
KeyPress 67 1
KeyUp 17 1
Delay 3000
EndScript
〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓子程序〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
Sub 補紅藍
Rem 低血回城
IfColor dihui*1.28+21 5 4a5173 2
SayString 暈，差點掛了，我閃。。。
Delay 32
KeyPress 13 1
Delay 512
KeyPress 117 1
Delay 5000
Delay 5000
Goto 停止掛機
EndIf
Rem 補紅
IfColor hongBF*1.28+21 5 4a5173 2
KeyPress 114 1
Delay 128
EndIf
Rem 補藍
IfColor 57 22 4a3c39 2
KeyPress 115 1
Delay 256
EndIf
Return 補紅藍
Sub 無葯回城
IfColor 706 749 b5ffe7 2
SayString 沒紅了，我再閃。。。
Delay 32
KeyPress 13 1
Delay 512
KeyPress 117 1
Delay 5000
Delay 5000
Goto 停止掛機
EndIf
IfColor 744 749 b5ffe7 2
SayString 沒藍了，我也閃。。。
Delay 32
KeyPress 13 1
Delay 512
KeyPress 117 1
Delay 5000
Delay 5000
Goto 停止掛機
EndIf
Return 無葯回城
上邊的那個 怎麼使用啊？ 誰能教教我
解析:
另存為一個文本文件，存到按鍵的SCRIPT目錄下，開按鍵，即應該可以看到此腳本。
4. 按鍵精靈怎麼設置自動撿東西
知皮//F1紅 F2 F3技能 F8回城卷
VBS dim hp,m,n,a,b,c,d,e,f,g,h,i,j,k,l,q,r
VBS dim ye,zidongzhaoguai,zidongjianwu,xp
VBS m=85:n=10
VBS a="":b="":e="":f="":g="":h="":i="":j="":k="":l="":q="":r=""
VBS c=0:d=0
VBS dim jn1,jn2
VBS jn1=0:jn2=0
UserVar ye=1 選擇職業 0近戰 1遠戰
UserVar hp=50 紅量<%多少時,補紅
UserVar zidongzhaoguai=1 0定點刷怪 1自動刷怪
UserVar zidongjianwu=1 0不自動撿物 1自動撿物
UserVar xp=1 選擇使用陪老哪種XP技能,從右到左1,2,3
Rem 機戰
Gosub 找怪
Gosub 攻擊怪
Gosub 補紅
Gosub 撿錢
Gosub 撿熟練度
Gosub 撿流星
Gosub 撿粉紅水晶
Gosub 撿藍水晶x
Gosub 撿聚態水晶
Gosub 檢測xp
Gosub 無彈回城
Gosub 拒絕交易
Gosub 同意組隊
Gosub 關閉推薦任務
Gosub 關閉導師界面
Delay 32
Goto 機戰
Sub 找怪
If zidongzhaoguai=1
VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
If x<0 and y<0
Delay 32
VBS c=c+1
If c>4
Delay 225
MoveTo 510 500
LeftClick 1
Gosub 快速找怪
VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
If x<0 and y<0
Delay 520
MoveTo 100 330
LeftClick 1
Gosub 快速找怪搭亂差
VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
If x<0 and y<0
Delay 520
MoveTo 510 200
LeftClick 1
Gosub 快速找怪
VBSCall FindColorEx(85,140,855,480,"303b8",1,0.8,x,y)
If x<0 and y<0
Delay 520
MoveTo 920 330
LeftClick 1
Gosub 快速找怪
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
Return
Sub 攻擊怪
VBSCall FindColorEx(479,49,922,399,"303b8",1,0.8,x,y)
If x>=0 and y>=0
VBS c=0
MoveTo x-20 y+20
LeftClick 1
Delay 32
Gosub 攻擊
VBSCall FindColorEx(479,339,922,650,"303b8",1,0.8,x,y)
If x>=0 and y>=0
VBS c=0
MoveTo x-20 y-20
LeftClick 1
Delay 32
Gosub 攻擊
VBSCall FindColorEx(99,339,479,658,"303b8",1,0.8,x,y)
If x>=0 and y>=0
VBS c=0
MoveTo x+20 y-20
LeftClick 1
Delay 32
Gosub 攻擊
VBSCall FindColorEx(83,85,479,399,"303b8",1,0.8,x,y)
If x>=0 and y>=0
VBS c=0
MoveTo x+20 y+20
LeftClick 1
Delay 32
Gosub 攻擊
EndIf
EndIf
EndIf
EndIf
Return
Sub 攻擊
VBSCall FindColorEx(35,100,920,510,"303b8",1,0.8,x,y)
If x>=0 and y>=0
MoveTo x+n y+m
RightClick 1
Gosub 技能1
Gosub 技能2
Else
VBSCall FindColorEx(35,100,920,510,"303b8",1,0.8,x,y)
If x>=0 and y>=0
MoveTo x+n y+m-n
RightClick 1
EndIf
EndIf
Return
Sub 快速找怪
VBSCall FindColorEx(313,10,315,12,"0",1,0.8,x,y)
If x<0 and y<0
KeyDown 17 1
LeftClick 1
KeyUp 17 1
EndIf
Return
Sub 技能1
IfColor 139 45 ae21 2
Delay 32
VBS jn1=jn1+1
If jn1>=4
KeyPress 113 1
VBS jn1=0
EndIf
EndIf
Return
Sub 技能2
IfColor 139 45 ae21 2
Delay 32
VBS jn2=jn2+1
If jn2>=8
KeyPress 114 1
VBS jn2=0
EndIf
EndIf
Return
Sub 補紅
IfColor hp*1.13+121 31 313033 2
KeyPress 112 1
EndIf
Return
Sub 撿錢
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"45b0c9",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS a=x1:b=y1
VBSCall FindColorEx(a+5,b-50,a+45,b-30,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo a b
Delay 32
LeftClick 1
VBS a="":b=""
EndIf
EndIf
EndIf
Return
Sub 撿熟練度
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"ad497f",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS e=x1:f=y1
VBSCall FindColorEx(e+5,f-50,e+45,f-30,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo e f
Delay 32
LeftClick 1
VBS e="":f=""
EndIf
EndIf
EndIf
Return
Sub 撿流星
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"106d21",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS g=x1:h=y1
VBSCall FindColorEx(g-5,h-25,g+45,h-5,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo g h
Delay 32
LeftClick 1
VBS g="":h=""
EndIf
EndIf
EndIf
Return
Sub 撿粉紅水晶
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"8b16ab",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS i=x1:j=y1
VBSCall FindColorEx(i-5,j-30,i+45,j-10,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo i j
Delay 32
LeftClick 1
VBS i="":j=""
EndIf
EndIf
EndIf
Return
Sub 撿藍水晶
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"ffb783",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS k=x1:l=y1
VBSCall FindColorEx(k-5,l-45,k+45,l-8,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo k l
Delay 32
LeftClick 1
VBS k="":l=""
EndIf
EndIf
EndIf
Return
Sub 撿聚態水晶
If zidongjianwu=1
VBSCall FindColorEx(35,100,920,520,"94f729",1,0.8,x1,y1)
If x1>=0 and y1>=0
VBS q=x1:r=y1
VBSCall FindColorEx(q-5,r-30,q+5,r-20,"ffff",1,0.8,x2,y2)
If x2>=0 and y2>=0
MoveTo g h
Delay 32
LeftClick 1
VBS q="":r=""
EndIf
EndIf
EndIf
Return
Sub 檢測xp
VBSCall FindColorEx(800,500,900,550,"cdb886",1,0.8,x,y)
If x>=0 and y>=0
Gosub xp1
Gosub xp2
Gosub xp3
EndIf
Return
Sub xp1
If xp=1
MoveTo 935 540
Delay 32
LeftClick 1
EndIf
Return
Sub xp2
If xp=2
MoveTo 881 547
Delay 32
LeftClick 1
EndIf
Return
Sub xp3
If xp=3
MoveTo 812 551
Delay 32
LeftClick 1
EndIf
Return
Sub 無彈回城
If ye=1
VBSCall FindColorEx(575,6,580,10,"101010",1,0.8,x,y)
If x<0 and y<0
Delay 32
VBS d=d+1
If d=6
KeyPress 119 1
EndIf
EndIf
EndIf
Return
Sub 拒絕交易
VBSCall FindColorEx(133,312,135,314,"ffffff",1,0.8,x1,y1)
VBSCall FindColorEx(311,389,313,391,"916e23",1,0.8,x2,y2)
VBSCall FindColorEx(326,233,328,235,"8b6ff",1,0.8,x3,y3)
If x1>=0 and y1>=0 and x2>=0 and y2>=0 and x3>=0 and y3>=0
MoveTo 312 390
Delay 32
LeftClick 1
EndIf
Return
Sub 同意組隊
VBSCall FindColorEx(270,232,275,238,"c7ff",1,0.8,x1,y1)
VBSCall FindColorEx(220,393,225,396,"aeff",1,0.8,x2,y2)
If x1>=0 and y1>=0 and x2>=0 and y2>=0
MoveTo 223 394
Delay 32
LeftClick 1
EndIf
Return
Sub 關閉推薦任務
VBSCall FindColorEx(905,236,907,238,"c7ff",1,0.8,x1,y1)
VBSCall FindColorEx(605,234,607,236,"c3ff",1,0.8,x2,y2)
If x1>=0 and y1>=0 and x2>=0 and y2>=0
MoveTo 906 237
Delay 32
LeftClick 1
EndIf
Return
Sub 關閉導師界面
VBSCall FindColorEx(269,180,271,182,"c3f7",1,0.8,x1,y1)
VBSCall FindColorEx(276,175,278,177,"dec7b5",1,0.8,x2,y2)
If x1>=0 and y1>=0 and x2>=0 and y2>=0
MoveTo 270 181
Delay 32
LeftClick 1
EndIf
Return
5. 按鍵精靈如何編輯神途腳本
試試這個專用腳本編輯工具。
下載EditPlus_3.41.rar，下載後解壓，然後雙擊注冊進行注冊，就可以正常使用了。如果還需要輸入注冊碼，那就點注冊，下載keygen.exe並打開，隨便輸入用戶名，然後點擊生成注冊碼，將用戶名和注冊碼分別復制到要注冊的框裡面就好了。
1、Goto a
2、Rem a
3、key = WaitKey()
4、If key = 87 Then
5、Delay 1500
6、KeyPress "Q", 1
7、End If
8、Goto a
6. 你好，能教我下這么製作按鍵精靈自動撿東西的腳本，謝謝
到打怪的地方錄制,再按你的要求修改下~~k（ 空格） 數字鍵表友歷示你將要執行的動作~d（ 空格） 數字鍵表示停頓的秒數~~連續設置k的動作會無法執行~所以在設置k後應加d0這樣動作會比較神告衫流暢~~一般游游腔戲腳本設置這兩個比較常用
7. 300高分跪求一個按鍵精靈腳本，功能是滑鼠自動在怪爆出的東西中找到相關物品，然後自動撿取
多點找色，找到後點擊第一個坐標點：
xy=Plugin.Color.FindMutiColor(0,0,2000,2000,"003CE7","1|0|1045E7,2|0|5A82EF,0|1|94AAF7,1|1|F7F7FF",1)
ZB = InStr(XY,"|")
x = Clng(Left(XY, ZB - 1)) : y = Clng(Right(XY, Len(XY) - ZB))
If x > 0 and y > 0 Then
MoveTo x, y
LeftClick 1
End If
第二行代碼中，第一個雙引號里的是第一個16進制色值,第二個雙引號里的偏移的點及偏移點的16進制色值（找的點越多正確率越高），找到的顏色如果全符合，則點擊第一個點
8. 用按鍵精靈編輯dnf刷圖自動撿物品原理，不是源碼，謝謝！
根據坐標電腦進行計算，自動識別。
9. 求一個按鍵精靈傳奇自動打怪、撿裝備腳本!
舉薦樓主用凌霜傳奇輔助免費版功能比如有：移動加速,順時針移動,1.80服雙刀,多倍魔法,超強藍保護,自動丟棄物品,攻擊變色,智能攻擊,攻擊轉身,等功能。支持目前所有的主流登錄器！