End Function
//任务完成交任务
Function J_Mission()
If In_WC = True
Delay 300
MoveTo L+641,T+210
Delay 300
LeftClick 1
Delay 300
//判断是否已经打开 帮会任务NPC 对话界面
i=0
While i=0
FindPic L,T,L+300,T+300,"Attachment:\帮会跑商NPC.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
Delay 300
MoveTo L+117,T+307
Delay 300
LeftClick 1
Delay 300
MoveTo L+76,T+455
Delay 300
LeftClick 1
End If
Wend
Else
i=0
While i=0
FindPic L+664,T,L+800,T+45,"Attachment:\猎场.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
i=1
KeyPress "M", 1
Delay 300
MoveTo L+640,T+120
Delay 300
LeftClick 1
Delay 300
SayString "传送"
Delay 300
MoveTo L+774,T+120
Delay 300
LeftClick 1
Delay 300
MoveTo L+676,T+448
Delay 300
LeftClick 1
Delay 300
KeyPress "M", 1
Delay 300
j=0
While j=0
FindPic L+88,T+89,L+179,T+118,"Attachment:\猎场传送NPC.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
j=1
Delay 300
MoveTo L+95,T+225
Delay 300
LeftClick 1
Delay 300
MoveTo L+134,T+295
Delay 300
LeftClick 1
Delay 3000
a=0
While a=0
FindPic L,T,L+800,T+600,"Attachment:\王城.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
a=1
Delay 300
MoveTo L+641,T+210
Delay 300
LeftClick 1
Delay 300
k=0
While k=0
FindPic L,T,L+300,T+300,"Attachment:\帮会跑商NPC.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
k=1
Delay 300
MoveTo L+117,T+307
Delay 300
LeftClick 1
Delay 300
MoveTo L+76,T+455
Delay 300
LeftClick 1
Delay 400
End If
Wend
End If
Wend
End If
Wend
End If
Wend
End If
End Function
//取得游戏窗口句柄,并获取游戏窗口坐标
Hwnd = Plugin.Window.Find("CJSH2 WndClass",0)
sRect = Plugin.Window.GetClientRect(Hwnd)