来自按键精灵的DNF刷第一图源码

来自按键精灵的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

jsx=jsx+130

Next

Else

For jhks-5

jsx=jsx+130

Next

jsy=jsy+185

End If

jhks=jhks+1

MoveTo jsx, jsy

LeftClick 1

Delay 1000

MoveTo 322, 448

LeftClick 1

Else

If jhks>jssl Then

Call 报警提醒()

End If

For 3

IfColor 316,271,"484849",0 Then

Else

MoveTo 39, 434

LeftClick 1

Delay 300

KeyPress "Esc", 1

Delay 1000

End If

Next

MoveTo 316, 344

LeftClick 3

For 30

IfColor 210,440,"6B949C",0 Then

Goto 主程序

Else

Delay 1000

End If

Next

Call 报警提醒()

End If

End If

End Sub

Sub 疲劳改键()

For 30

IfColor 40,400,"608A9D",0 Then

IfColor 278,437,"F78C00",0 Then

Goto 疲劳改键

Else

MoveTo 39, 434

LeftClick 1

Delay 300

KeyPress "Esc", 1

Delay 1000

End If

Next

If jsgh=1 Then

Call 报警提醒()

End If

Goto 主程序

Else

Delay 1000

End If

Next

Call 报警提醒()

Rem 疲劳改键

For 3

IfColor 316,271,"484849",0 Then

Else

KeyPress "Esc", 1

Delay 1000

End If

Next

MoveTo 315, 317

LeftClick 3

Delay 1000

MoveTo 407, 163

LeftClick 1

Delay 300

KeyPress "W", 1

Delay 300

KeyPress "A", 1

Delay 300

KeyPress "S", 1

Delay 300

KeyPress "D", 1

Delay 300

MoveTo 372, 401

LeftClick 1