Hwnd = Plugin.Window.Find(0, "地下城与勇士") sWindow = Plugin.Window.IsWindow(Hwnd) If sWindow = 0 Then MsgBox "请确认打开了DNF" EndScript End If Call Plugin.Window.Active(Hwnd) Call Plugin.Window.Move(Hwnd, 0, 0) Delay 1000 //打开拍卖行,并判断是否打开 Rem 拍卖行 KeyPress "B", 1 Delay 1000 FindPic 0, 0, 640, 477, "Attachment:\拍卖行.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then Goto 移动 Else Delay 200 KeyPress "Esc", 1 Delay 200 Goto 拍卖行 End If Rem 移动 MoveTo intX, intY Delay 1000 LeftDown 1 Delay 1000 MoveTo 324, 125 Delay 1000 LeftUp 1 Delay 200 //判断拍卖行是否在相应位置 FindPic 356,118,384,148,"Attachment:\(B).bmp",0.9,intX,intY If intX> 0 And intY> 0 Then Else KeyPress "Esc", 1 Delay 200 Goto 拍卖行 End If //搜索物品名 MoveTo 204, 187 Delay 200 LeftClick 1 Delay 200 KeyPress "A", 1 Delay 200 KeyPress "A", 1 Delay 200 KeyPress "Space", 1 Delay 200 MoveTo 507, 186 Delay 200 LeftClick 1 Delay 200 MoveTo 507, 186 Delay 200 //搜索结果不存在处理 FindPic 0,0,1024,768,"Attachment:\公告.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo 320, 260 Delay 200 LeftClick 1 delay 300 End If //初始化搜索条件 MoveTo 590, 188 Delay 200 LeftClick 1 Delay 500