近戰小掛~自動練功(明瞭簡單~一清二楚)

Rem 1                                                                                                            
VBSCall FindColorEx(397,135,1217,633,"0000FF",0,0.8,intX,intY)                  使用區域模糊找怪，座標自己重新設定，顏色是找怪頭上的紅色
If intX>0 and intY>0
    MoveTo intX,intY
    LeftClick 1                                                                                            單及左鑑(攻擊)
    Delay 2000                                                                                          延遲2秒
    Gosub XX                                                                                           調用副程式XX
EndIf
Sub XX                                                                                                    副程式XX  <--撿東西用
    VBSCall FindColorEx(674,376,897,469,"00D7FF",0,0.8,intX,intY)               區域模糊找色，座標自己重新設定，顏色是找地上物品的黃色
    If intX>0 and intY>0
        Delay 1000
        KeyPress 32,1                                                                                  空白鑑(檢取)
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500                                                                                   重複5次~因為怕沒檢完
        Goto 2
    Else
        Goto 1
    EndIf
    Rem 2
    IfColor 404,11,0000A1,1                                                                 這行是補血的~坐標一樣自己設定~顏色是找血條的顏色
        KeyPress 81,1
    Else
        Goto 1
    EndIf








#很簡單的近戰外掛，可以以這個為基礎多加技能進去~遠弓的沒練我就不寫了!很懶.....

有沒有哪位大大知曉的能夠教我嗎？？？？？？？？？？？？？？？？？？？？？

請問為什麽 我換了座標還是不能用呢？
座標要換那呢？
有人可以解說嗎？

感谢大大的分享啊！！！！！！！！！！！！！！！！！！！！！！！
不错不错，感觉很好用的

Rem 1                                                                                                            
VBSCall FindColorEx(397,135,1217,633,"0000FF",0,0.8,intX,intY)                  使用區域模糊找怪，座標自己重新設定，顏色是找怪頭上的紅色
If intX>0 and intY>0
    MoveTo intX,intY
    LeftClick 1                                                                                            單及左鑑(攻擊)
    Delay 2000                                                                                          延遲2秒
    Gosub XX                                                                                           調用副程式XX
EndIf
Sub XX                                                                                                    副程式XX  <--撿東西用
    VBSCall FindColorEx(674,376,897,469,"00D7FF",0,0.8,intX,intY)               區域模糊找色，座標自己重新設定，顏色是找地上物品的黃色
    If intX>0 and intY>0
        Delay 1000
        KeyPress 32,1                                                                                  空白鑑(檢取)
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500
        KeyPress 32,1
        Delay 500                                                                                   重複5次~因為怕沒檢完
        Goto 2
    Else
        Goto 1
    EndIf
    Rem 2
    IfColor 404,11,0000A1,1                                                                 這行是補血的~坐標一樣自己設定~顏色是找血條的顏色
        KeyPress 81,1
    Else
        Goto 1
    EndIf

good hi good@!@@@@@@good hi good@!@@@@@@good hi good@!@@@@@@

ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc

QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQ

難道還是只有按鍵精靈嘛=ˇ=`````

感謝分享ㄛ!!!!!!!!
來試試看
不客氣了!!!!!