intX1 = - 1
intY1 = - 1
If intX1 >= 0 and intY1 >= 0 Then
Call Plugin.Bkgnd.LeftClick(hwnd, 383, 328)
Delay 1000
Call Plugin.Bkgnd.KeyPress(hwnd, 123)
Delay 1000
Call Plugin.Bkgnd.LeftClick(hwnd, 25, 207)
Delay 1000
Call Plugin.Bkgnd.LeftClick(hwnd,70,368)
Delay 1000
Call Plugin.Bkgnd.LeftClick(hwnd, 25, 207)
Delay 1000
Call Plugin.Bkgnd.LeftClick(hwnd,72,250)
Delay 10000
Call Plugin.Bkgnd.KeyPress(hwnd, 123)
End If
End Sub
Sub 是否死亡
intX0 = - 1
intY0 = - 1
If intX0 > 0 And intY0 > 0 Then
Call Plugin.Bkgnd.LeftClick(hwnd, intX0 + 10, intY0 + 8)
Delay 5000
Call 修理()
Call 选择起点()
End If
End Sub
Sub 修理
Call Plugin.Bkgnd.KeyPress(hwnd, 123)
Delay 100
Call Plugin.Bkgnd.KeyPress(hwnd, 77)
Call Plugin.Bkgnd.LeftClick(hwnd, 442, 226)
Delay 2000
Rem PD1
Color = Plugin.BkgndColor.GetPixelColor(hwnd, 442, 226)
If Color = "14090388" Then
Delay 500
Goto PD1
End If
Call Plugin.Bkgnd.KeyPress(hwnd, 123)
Call Plugin.Bkgnd.LeftClick(hwnd, 476, 275)
Delay 500
Call Plugin.Bkgnd.LeftDoubleClick(hwnd, 476,275)
Delay 2000
Call Plugin.Bkgnd.LeftClick(hwnd, 439, 197)
Delay 2000
Call Plugin.Bkgnd.LeftClick(hwnd, 491,311)
Delay 2000
Call Plugin.Bkgnd.LeftClick(hwnd, 444, 221)
End Sub
Sub 选择起点
Call 判断当前地图()
//TracePrint "siwangdian:" & siwangdian
//TracePrint "ditu:" & ditu
//TracePrint "cyzsw:" & cyzsw
If siwangdian = 0 Then
If ditu = "五行天龙阵" Then
If cyzsw = 0 Then
Call 脱离卡死离开天龙()
Else
Call 走出天龙()
End If
End If
Goto 天龙阵入口
ElseIf siwangdian = 1 Then
If ditu = "天龙阵入口" Then
Call 走进天龙()
End If
Goto BOSS宁仲德
ElseIf siwangdian = 2 Then
If ditu = "天龙阵入口" Then
Call 走进天龙()
End If
Goto BOSS司马伯道
ElseIf siwangdian = 3 Then
If ditu = "天龙阵入口" Then
Call 走进天龙()
End If
Goto BOSS垄都
ElseIf siwangdian = 4 Then
If ditu = "天龙阵入口" Then
Call 走进天龙()
End If
Goto BOSS夏侯云冲
ElseIf siwangdian = 5 Then
If ditu = "天龙阵入口" Then
Call 走进天龙()
End If
Goto BOSS程志远
End If
End Sub
Sub 小地图走路(X0, Y0, Color0)
If zhiye =2 Then
Call 释放技能(intXJn1, intYJn1, time1, 10,200)
ElseIf zhiye = 3 Then