Sub 匹配11 Delay 10 For 2 Delay 100 VBSCall FindPic(0,0,1024,768,"Attachment:\怪物1024.bmp",0.9,x,y) //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名(路径) 0.9为找图的相似度 x,y为找到图片后的坐标变量 If x>=0 and y>=0 //找到怪 l=x+139 n=l-98 m=y+34 Delay 10 EndIf EndFor Delay 10 If shiquKG=0 For o KeyPress shiqu,1 Delay 10 EndFor EndIf Delay 10 IfColor l-50,m,000000ff,0 Delay 10 If gj1=0 Goto 攻击 EndIf Delay 10 Gosub 人物补血补蓝 Delay 10 Gosub 匹配3 Else Goto stat EndIf Return 匹配11 Sub 匹配2 If gj1=1 Goto 人形系 ElseIf gj1=2 Goto 妖兽系 ElseIf gj1=3 Goto 幽冥系 ElseIf gj1=4 Goto 鳞皇系 ElseIf gj1=5 Goto 天空系 ElseIf gj1=6 Goto 金属系 ElseIf gj1=7 Goto 五毒系 ElseIf gj1=8 Goto 元素系 ElseIf gj1=9 Goto 木魔系 EndIf Delay 100 Rem 人形系 Delay 10 VBSCall FindPic(355,17,600,80,"Attachment:\人形系1024.bmp",0.9,x,y) //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名(路径) 0.9为找图的相似度 x,y为找到图片后的坐标变量 If x>=0 and y>=0 Delay 10 //人形系 aa=1 Delay 10 Goto 攻击 Else Goto stat EndIf Rem 妖兽系 Delay 10 VBSCall FindPic(355,17,600,80,"Attachment:\妖兽系1024.bmp",0.9,x,y) //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名(路径) 0.9为找图的相似度 x,y为找到图片后的坐标变量 If x>=0 and y>=0 Delay 10 //妖兽系 aa=2 Delay 10 Goto 攻击 Else Goto stat EndIf Rem 幽冥系 Delay 10 VBSCall FindPic(355,17,600,80,"Attachment:\幽冥系1024.bmp",0.9,x,y) //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名(路径) 0.9为找图的相似度 x,y为找到图片后的坐标变量 If x>=0 and y>=0 Delay 10 //幽冥系 aa=3 Delay 10 Goto 攻击 Else Goto stat EndIf Rem 鳞皇系 Delay 10 VBSCall FindPic(355,17,600,80,"Attachment:\鳞皇系1024.bmp",0.9,x,y) //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名(路径) 0.9为找图的相似度 x,y为找到图片后的坐标变量 If x>=0 and y>=0