我想用按键精灵写一个自动打怪和NPC对话的脚本
我想用按键精灵写一个自动打怪和NPC对话的脚本，但是提示我错误 请老鸟帮我看看 那里出错了帮我改下Sub 自动战斗()
Rem 选怪
KeyPress "Tab", 1
IfColor 1047,250,"FF1E",0 Then
Goto 打完收工
Rem 开打
KeyPress "1", 1
Delay 100
KeyPress "2", 1
IfColor 305,978,"361F9C",0 Then
Else
KeyPress "F1", 1
End If
IfColor 936,986,"908A1E",0 Then
Else
KeyPress "F2", 1
End If
Delay 800
KeyPress "3", 1
Delay 800
KeyPress "4", 1
Delay 800
KeyPress "5", 1
Delay 800
KeyPress "6", 1
Delay 800
IfColor 584,57,"7FB8C1",0 Then
Goto 开打
Goto 选怪
Rem 打完收工
End Sub
Rem 交接任务
Sub 交接任务()
MoveTo 213, 451
LeftClick 1
MoveTo 590, 721
Delay 1000
LeftClick 1
End Sub
Sub 交接任务2()
MoveTo 213, 451
Delay 100
LeftClick 1
MoveTo 590, 721
Delay 1000
LeftClick 1
Delay 1000
LeftClick 1
End Sub
给你一段仙域游戏的找怪子程序作为参考，可后台使用
Sub 找怪(a,b,c,d,e)
Delay 200
Call Plugin。Bkgnd。KeyPress(hwnd,77)
Delay 1000
XY = Plugin。
Bkgnd。FindColorEx(Hwnd, x1+A, y1+B, x1+C,y1+D, "0B17DF", e,0。9)
Delay 50
MArray = Split(XY, "|")
X = Clng(MArray(0)): Y = Clng(MArray(1))
If X=-1 Then
m=0
Call Plugin。
Bkgnd。KeyPress(hwnd,27)
Else
Delay 100
Call Plugin。Bkgnd。MoveTo(Hwnd, X, Y)
Call Plugin。Bkgnd。
LeftClick(hwnd,X,Y)
Delay 200
Call Plugin。Bkgnd。KeyPress(hwnd,27)
Delay 500
m=1
End if
End Sub。
答：不能．．．和ＮＰＣ对话只能用鼠标右键．．．没有命令是和ＮＰＣ对话用的． 所以没有宏可以完成． 在人多的情况下．你可以选择按住鼠标右键然后旋转画面．找到一个可以看...详情>>
问：为什么 我一 登录 游戏 就 告诉我 服务器暂时无法登录，请稍后再试。这是怎么回...
答：新区后面有写新自己看.详情>>
