//点击自动按钮 Plugin Bkgnd.LeftClick(hwnd,740-dx,335-dy) Delay 500 Plugin Bkgnd.LeftClick(hwnd,740-dx,335-dy) Delay 600 Rem wait Plugin c1=BkgndColor.GetPixelColor(hwnd,636-dx,639-dy) Plugin c2=BkgndColor.GetPixelColor(hwnd,638-dx,639-dy) Plugin c3=BkgndColor.GetPixelColor(hwnd,400-dx,420-dy) c1=hex(c1) c2=hex(c2) c3=hex(c3) If c1="3A8F6" and c2="86AFD" Delay 150 Goto fightend ElseIf c3="90DDFF" Plugin Bkgnd.LeftClick(hwnd,400-dx,420-dy) Delay 100 Goto fightend Else Delay 3000 Goto wait EndIf Rem fightend Plugin Bkgnd.LeftClick(hwnd,405-dx,405-dy) Delay 300 Return fight Sub piccheck Plugin c1=BkgndColor.GetPixelColor(hwnd,141-dx,106-dy) Plugin c2=BkgndColor.GetPixelColor(hwnd,184-dx,106-dy) Plugin c3=BkgndColor.GetPixelColor(hwnd,397-dx,392-dy) Plugin c4=BkgndColor.GetPixelColor(hwnd,638-dx,606-dy) Plugin c5=BkgndColor.GetPixelColor(hwnd,636-dx,606-dy) Plugin c6=BkgndColor.GetPixelColor(hwnd,93-dx,215-dy) c1=hex(c1) c2=hex(c2) c3=hex(c3) c4=hex(c4) c5=hex(c5) c6=hex(c6) If c3="FFFFFF" and c1<>"200F13" and c2<>"210806" pic="登陆画面" ElseIf c1<>"200F13" and c2<>"210806" and c3="10A080" pic="服务器选择" ElseIf c1<>"200F13" and c2<>"210806" and c3="75B8D7" pic="角色选择" ElseIf c1<>"200F13" and c2<>"210806" and c3="50B1DF" pic="出现错误" ElseIf c1="200F13" and c2="210806" and c4="86AFD" and c5="3A8F6" If c6="1A9F7" pic="开始画面" Else pic="游戏画面" EndIf ElseIf c4="2204D" or c5="334A" pic="战斗画面" Else pic="未进入游戏" EndIf Return piccheck Sub zhanghao //输入帐号密码 Plugin Bkgnd.LeftDown(hwnd,504-dx,373-dy) Delay 100 Plugin Bkgnd.LeftUp(hwnd,504-dx,373-dy) Plugin Bkgnd.KeyPress(hwnd,35) For 20 Plugin Bkgnd.KeyPress(hwnd,8) Delay 30 EndFor Plugin Window.SendString(hwnd,username) Delay 1000 Plugin Bkgnd.LeftDown(hwnd,500-dx,400-dy) Delay 200 Plugin Bkgnd.LeftUp(hwnd,500-dx,400-dy) Plugin Bkgnd.KeyPress(hwnd,35) For 20 Plugin Bkgnd.KeyPress(hwnd,8) Delay 30 EndFor Plugin Window.SendString(hwnd,password) Delay 1000 //点击确认 Plugin Bkgnd.LeftClick(hwnd,400-dx,460-dy) Delay 100 Plugin Bkgnd.LeftClick(hwnd,400-dx,460-dy) Delay 100 Return zhanghao Sub quxiao Delay 500 Plugin Bkgnd.LeftClick(hwnd,410-dx,410-dy) Delay 100 Plugin Bkgnd.LeftClick(hwnd,460-dx,430-dy) Delay 100 Plugin Bkgnd.RightClick(hwnd,410-dx,410-dy) Delay 100 Plugin Bkgnd.RightClick(hwnd,410-dx,410-dy) Delay 100 Return quxiao Sub service