dnf自动分解脚本?dnf自动搬砖?dnf自动召唤脚本?按键精灵资源站 按键精灵教程,学习脚本制作,脚

你是否正在寻找关于dnf自动分解脚本的内容？让我把最高级的东西奉献给你：

dnf自动分解脚本.傻瓜式操作

发布: 2012-03-14 19:00:59 | 作者: | 来源: 按键精灵资源站

)分解机
)分解机视频

不让加链接我草，自己复制链接去下吧！威盘！

这是用最简单的抓图，抓点来编写的脚本，没有华丽的外观，和功能调试按钮。主要是和广大小白交流学习使用，。下面附上源代码。使用时分辨率调到1280*768把游戏窗口化（小窗口）再把游戏拉到左上角，边框上和左贴在屏幕边上。选外部聊天窗口（游戏窗口后右边一个聊天窗）
功能不多：自动买腰带1500的，自动走出赛利亚房间在门口开分解机分解，无耐久自动找诺顿修理。并走回赛利亚房，循环。
启动脚本前，请确认自己在赛利亚房间，人在门口正前方3步左右。键盘设置:上W下S副职业O
代码： Rem wc
Delay 3000
FindPic 0,0,400,300,"Attachment:\赛利亚.bmp",0.9,赛利亚X,赛利亚Y
If 赛利亚X > 0 And 赛利亚Y > 0 Then
End If
MoveTo 赛利亚X, 赛利亚Y+50
LeftClick 1
Delay 500
FindPic 0,0,400,500,"Attachment:\wpd.bmp",0.5,wpdX,wpdY
If wpdX > 0 And wpdY > 0 Then
End If
MoveTo wpdX+10, wpdY-80
LeftClick 1
Delay 300
FindPic 0,0,500,500,"Attachment:\jiez.bmp",0.8,jiezX,jiezY
If jiezX > 0 And jiezY > 0 Then
End If
For 32
Delay 100
MoveTo jiezX+70, jiezY+75
Delay 100
LeftClick 1
Delay 100
LeftClick 1
Next
KeyPress "Esc", 20
Delay 100
KeyPress "Esc", 10
Delay 100
KeyPress "S", 12
Delay 1500
KeyPress "O", 1
Delay 30
KeyPress "Num 1", 1
KeyPress "Num 1", 1
KeyPress "Num 1", 1
KeyPress "Num 1", 1
KeyPress "Enter", 1
MoveTo 363, 319
LeftClick 1
Delay 1000
MoveTo 367, 159
LeftClick 1
Delay 1000
FindPic 0,0,150,250,"Attachment:\jq.bmp",0.8,jqX,jqY
If jqX > 0 And jqY > 0 Then
End If
MoveTo jqX+89, jqY+150
LeftClick 1
Delay 200
FindPic 0,0,550,400,"Attachment:\wpl.bmp",0.8,wplX,wplY
If wplX > 0 And wplY > 0 Then
End If
Delay 200
FindPic 0,0,600,450,"Attachment:\QQQQ.bmp",0.8,QQQQX,QQQQY
If QQQQX > 0 And QQQQY > 0 Then
End If
Delay 200
MoveTo wplX+5, wplY-145
Call fj()
Sub fj()
Delay 300
Call wlj()
LeftClick 1
Delay 300
KeyPress "Enter", 1
Delay 2800
KeyPress "Enter", 1
End Sub
MoveTo wplX+35, wplY-145
Call fj()
MoveTo wplX+65, wplY-145
Call fj()
MoveTo wplX+95, wplY-145
Call fj()
MoveTo wplX+125, wplY-145
Call fj()
MoveTo wplX+155, wplY-145
Call fj()
MoveTo wplX+185, wplY-145
Call fj()
MoveTo wplX+215, wplY-145
Call fj()
MoveTo wplX+5, wplY-115
Call fj()
MoveTo wplX+35, wplY-115
Call fj()
MoveTo wplX+65, wplY-115
Call fj()
MoveTo wplX+95, wplY-115
Call fj()
MoveTo wplX+125, wplY-115
Call fj()
MoveTo wplX+155, wplY-115
Call fj()
MoveTo wplX+185, wplY-115
Call fj()
MoveTo wplX+215, wplY-115
Call fj()
MoveTo wplX+5, wplY-85
Call fj()
MoveTo wplX+35, wplY-85
Call fj()
MoveTo wplX+65, wplY-85
Call fj()
MoveTo wplX+95, wplY-85
Call fj()
MoveTo wplX+125, wplY-85
Call fj()
MoveTo wplX+155, wplY-85
Call fj()
MoveTo wplX+185, wplY-85
Call fj()
MoveTo wplX+215, wplY-85
Call fj()
MoveTo wplX+5, wplY-55
Call fj()
MoveTo wplX+35, wplY-55
Call fj()
MoveTo wplX+65, wplY-55
Call fj()
MoveTo wplX+95, wplY-55
Call fj()
MoveTo wplX+125, wplY-55
Call fj()
MoveTo wplX+155, wplY-55
Call fj()
MoveTo wplX+185, wplY-55
Call fj()
MoveTo wplX+215, wplY-55
Call fj()
Delay 300
KeyPress "Esc", 1
Delay 200
MoveTo 367, 158
KeyPress "Esc", 1
Delay 100
LeftClick 1
Delay 100
KeyPress "Esc", 1
Delay 200
KeyPress "I", 1
Delay 500
MoveTo wplX+200, wplY-25
LeftClick 1
Delay 500
KeyPress "W", 13
Goto wc
FindPic 0,0,600,450,"Attachment:\QQQQ.bmp",0.8,QQQQX,QQQQY
If QQQQX > 0 And QQQQY > 0 Then
End If
Sub wlj()
IfColor QQQQX-108,QQQQY-23,"8DC5DD",1 Then
IfColor QQQQX-108,QQQQY-23,"8DC5DD",1 Then
MoveTo 240, 357
Delay 100
KeyPress "Esc",1
Delay 200
MoveTo 240, 357
LeftClick 1
Delay 200
MoveTo 240, 357
Delay 200
KeyPress "Esc", 1
Delay 200
LeftClick 1
KeyPress "Esc", 1
KeyPress "N", 1
Delay 1000
FindPic 0,0,300,300,"Attachment:\ld.bmp",0.6,ldX,ldY
If ldX > 0 And ldY > 0 Then
End If
MoveTo ldX+15, ldY+15
RightClick 1
Delay 15000
KeyPress "N", 1
Delay 1000
FindPic 0,0,400,400,"Attachment:\ld2.bmp",0.6,ld2X,ld2Y
If ld2X > 0 And ld2Y > 0 Then
End If
MoveTo ld2X-5, ld2Y+50
LeftClick 1
Delay 200
FindPic 0,0,400,400,"Attachment:\ld2.bmp",0.6,ld2X,ld2Y
If ld2X > 0 And ld2Y > 0 Then
End If
MoveTo ld2X+10, ld2Y+165
LeftClick 1
Delay 1000
LeftClick 1
Delay 1000
KeyPress "Enter", 1
Delay 1000
KeyPress "Esc", 1
Delay 100
KeyPress "Esc", 1
KeyPress "N", 1
Delay 1000
FindPic 0,0,600,450,"Attachment:\lns.bmp",0.6,lnsX,lnsY
If lnsX > 0 And lnsY > 0 Then
End If
MoveTo lnsX+20, lnsY+20
Delay 200
RightClick 1
Delay 15000
KeyPress "N", 1
Delay 1500
FindPic 0,0,600,450,"Attachment:\QQ.bmp",0.8,QQX,QQY
If QQX > 0 And QQY > 0 Then
End If
MoveTo QQX, QQY+100
RightClick 1
Delay 1500
KeyPress "W", 3
Goto wc
Else
End If
Else
End If
End Sub

以上就是关于dnf自动分解脚本的全部内容，相信你一定会非常满意。

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-8916-1.html