1115自動練功修正版[台版港版都可用][視窗模式]

我是可以用 會自己點自動打怪  可是一樣不會點自走

卸卸大大大大卸卸卸卸大大大大卸卸

YCT51BYCT52BYCT66BYCT51B.....................

哇哇哇!!感謝大大的無私分享^^
本文章轉自外掛聯合國http://www.wgun.net
本文章轉自外掛聯合國http://www.wgun.net

哇哇哇!!感謝大大的無私分享^^
本文章轉自外掛聯合國http://www.wgun.net
本文章轉自外掛聯合國http://www.wgun.net

#[HOTKEY]HOME

function main

        SetInputMode(3)

        //取窗口原點坐標

        

        while true

                Wait(100)//大地圖上判斷,按下自動攻擊

                a()

                b()

        wend

end function

function A

        GetActiveWindowXY(WinX0, WinY0)

        if FindImageEx("未啟動.sel", Color(10, 10, 10), WinX0+520, WinY0+328, WinX0+655, WinY0+406, true, FoundX, FoundY) then

                Wait(300)

                if FindImageEx("啟動.sel", Color(10, 10, 10), WinX0+527, WinY0+427, WinX0+674, WinY0+519, true, FoundX, FoundY) then

                        //在圖像上的(5, 5)位置點擊鼠標

                        MouseLeftClick(FoundX+5, FoundY+5)

                        Wait(300)

                end if

        end if

end function

function b

        GetActiveWindowXY(WinX0, WinY0)

        //如果找到圖像"回合.sel",進入戰鬥畫面後判斷

        if not FindImageEx("回合.sel", Color(10, 10, 10), WinX0+243, WinY0+292, WinX0+442, WinY0+420, true, FoundX, FoundY) then

                do until FindImageEx("自動.sel", Color(10, 10, 10), WinX0+685, WinY0+259, WinX0+770, WinY0+354, true, FoundX, FoundY)

                        Wait(300)

            a()

                        MouseMove(WinX0+350, WinY0+400)

                loop

                //在圖像上的(1, 1)位置點擊鼠標

                MouseLeftClick(FoundX+1, FoundY+1)

                Wait(300)

                MouseMove(WinX0+350, WinY0+400)

        end if        

end function
複製代碼
本文章轉自外掛聯合國http://www.wgun.net

#[HOTKEY]HOME

function main

        SetInputMode(3)

        //取窗口原點坐標

        

        while true

                Wait(100)//大地圖上判斷,按下自動攻擊

                a()

                b()

        wend

end function

function A

        GetActiveWindowXY(WinX0, WinY0)

        if FindImageEx("未啟動.sel", Color(10, 10, 10), WinX0+520, WinY0+328, WinX0+655, WinY0+406, true, FoundX, FoundY) then

                Wait(300)

                if FindImageEx("啟動.sel", Color(10, 10, 10), WinX0+527, WinY0+427, WinX0+674, WinY0+519, true, FoundX, FoundY) then

                        //在圖像上的(5, 5)位置點擊鼠標

                        MouseLeftClick(FoundX+5, FoundY+5)

                        Wait(300)

                end if

        end if

end function

function b

        GetActiveWindowXY(WinX0, WinY0)

        //如果找到圖像"回合.sel",進入戰鬥畫面後判斷

        if not FindImageEx("回合.sel", Color(10, 10, 10), WinX0+243, WinY0+292, WinX0+442, WinY0+420, true, FoundX, FoundY) then

                do until FindImageEx("自動.sel", Color(10, 10, 10), WinX0+685, WinY0+259, WinX0+770, WinY0+354, true, FoundX, FoundY)

                        Wait(300)

            a()

                        MouseMove(WinX0+350, WinY0+400)

                loop

                //在圖像上的(1, 1)位置點擊鼠標

                MouseLeftClick(FoundX+1, FoundY+1)

                Wait(300)

                MouseMove(WinX0+350, WinY0+400)

        end if        

end function
複製代碼
本文章轉自外掛聯合國http://www.wgun.net

好像還是不行呢 是這段關係嗎  自動尋怪好像只有 啟動  跟 停止呢

if FindImageEx("未啟動.sel", Color(10, 10, 10), WinX0+520, WinY0+328, WinX0+655, WinY0+406, true, FoundX, FoundY) then

問一下大大
它適用於  雙開  以上嗎?

看起來好像很威的樣子呢@@ 但是我不會用ˋˊ