本帖最後由 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
以上顏色找怪引為場景有接近的顏色
請問有啥方法作出快速判定怪物在打啥不然滑鼠都亂點
還有問一下圖形判定怪物要吧圖檔放在電腦裡面的哪裡
他才有辦法較出來比對 |