Delay 1000
Hwnd = Plugin.Window.Find(0, "地下城与勇士")
Sub c
Delay 500
Call Plugin.Bkgnd.LeftDown(Hwnd, 597, 232)
Delay 100
Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, 597, 232)
Delay 1000
End sub
Sub a
Call Plugin.Bkgnd.LeftDown(Hwnd, 167, 144)
Delay 80
Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, 167, 144)
Delay 80        
End Sub
Sub b
For 25
Call a
Call Plugin.Bkgnd.LeftDown(Hwnd, 412, 268)
Delay 80
Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, 412, 268)
Delay 80
Call Plugin.Bkgnd.LeftDown(Hwnd, 335, 303)
Delay 80
Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, 335, 303)
Delay 80
Call a
Next
End Sub
Rem n
Delay 50
Call c
Call b
Goto n