| 本帖最後由 happy5821 於 2010-1-1 16:03 編輯 
 Rem bb
 VBSCall FindColorEx(0,0,1260,980,"BD75FF",1,1.8,x,y)
 VBSCall FindColorEx(0,0,1260,980,"4A3052",1,1.8,x,y)
 VBSCall FindColorEx(0,0,1260,980,"42B6FF",1,1.8,x,y)
 VBSCall FindColorEx(0,0,1260,980,"395963",1,1.8,x,y)
 //區域模■找色  0,0,1024,768為區域範圍 "FFFFFF"為顏色 1為查找方式(中間向外) 0.8為模■值 x,y為找到顏色後的坐標變量
 If x>0 and y>0
 //如果找到顏色  比如找到顏色就會賦值給坐標變量  通過判斷坐標變量可以知道有沒有找到怪
 MoveTo x+10,y+10
 //把鼠標移動到該色的坐標 如果找的是怪名字或血條  可能移動不到怪身上 這時就要用鼠標偏移 如:MoveTo x+10 y+10
 Delay 50
 //延時
 LeftClick 1
 KeyPress 51,1
 Delay Time/10000
 KeyPress 50,1
 Delay Time/10000
 KeyPress 49,1
 Delay Time/10000
 KeyPress 52,1
 Delay Time/10000
 KeyPress 32,1
 Delay Time/10000
 //左鍵單擊進行攻擊
 IfColor 547,28,10108c,0
 Goto bb
 Else
 EndIf
 //條件結束
 IfColor 675,964,101494,0
 KeyDown 113,1
 Delay 200
 KeyUp 113,1
 Delay 200
 Else
 EndIf
 IfColor 770,964,101494,0
 KeyDown 112,1
 Delay 200
 KeyUp 112,1
 Delay 200
 KeyDown 54,1
 Delay 200
 KeyUp 54,1
 Delay 200
 Else
 EndIf
 IfColor 655,979,9c4121,0
 KeyDown 115,1
 Delay 200
 KeyUp 115,1
 Delay 200
 Else
 EndIf
 IfColor 1120,932,10108c,0
 KeyDown 53,1
 Delay 200
 KeyUp 53,1
 Delay 200
 Else
 EndIf
 以上顏色找怪引為場景有接近的顏色
 請問有啥方法作出快速判定怪物在打啥不然滑鼠都亂點
 還有問一下圖形判定怪物要吧圖檔放在電腦裡面的哪裡
 他才有辦法較出來比對
 |