黃易群俠傳M脫機外掛應用程式黃易神行
684
0

[發問] 有大大能幫助小弟一下嗎?

小純 發表於 2009-10-10 03:45:26 | 只看該作者 回帖獎勵 |倒序瀏覽 |
#[HOTKEY]F11
# 在此定義全局變量
#SetArgsOnCompile
dim fzjn1_T,fzjn2_T,fzjn3_T,red,blue,ye,red1,blue1,ye1
function main
    fzjn1_T=GetConfigNumber("按鍵5的輔助技能")
    fzjn2_T=GetConfigNumber("按鍵6的輔助技能")
    fzjn3_T=GetConfigNumber("按鍵7的輔助技能")
    SetInputMode(3)
    SetTimer("fzjn1", fzjn1_T*2000, true)
    SetTimer("fzjn2", fzjn1_T*1000, true)
    SetTimer("fzjn3", fzjn1_T*1000, true)
    do
        fuhuo()
        find()
        hit()
        drink()
    loop
end function
//--------------------------------------------------------------------------------------------------------
function find()
    GetActiveWindowXY(WinX0, WinY0)
    do
        keypress("TAB")
        wait(300)
        Wait(200)
        print("開始尋找怪物")
    loop until FindImageEx("321.sel", Color(100, 100, 100), WinX0+426, WinY0+0, WinX0+445, WinY0+18, true, FoundX, FoundY)
   
end function
//-------------------------------------------------------------------------------------------------------------

function hit()   
    //取窗口原點坐標
//    dim aa,ab,ac,ad
    GetActiveWindowXY(WinX0, WinY0)
//    aa=GetConfigNumber("aa")
//    ab=GetConfigNumber("ab")
//    ac=GetConfigNumber("ac")
//    ad=GetConfigNumber("ad")
    do //循環
        qiehuan()
        fuhuo()
        keypress("9")
        wait(500)
        drink()
        wait(100)
        keypress("3")
        wait(500)//設定你的攻擊熱鍵的秒數  如果是重砲手  秒數要改2000~3000
        drink()
        wait(100)
        keypress("4")
        wait(500)//設定你的攻擊熱鍵的秒數  如果是重砲手  秒數要改2000~3000
        Wait(100)
    loop while CheckColor(WinX0+451, WinY0+31, Color(102, 35, 48), 10)
    SetTime=GetTime()
    do
        keypress("9")
        wait(100)   
        KeyPress("1")
        Wait(500)
    loop until GetTime()-SetTime > 2000   //在當前時間比StartTime大超過20000毫秒時?
print("撿道具")   
end function

//----------------------------------------------------------------------------------------------------------

function qiehuan()
    //取窗口原點坐標
    GetActiveWindowXY(WinX0, WinY0)
   
    //如果找到圖像"目標不在視野範圍內.sel"
    if FindImageEx("目標不在視野範圍內.sel", Color(100, 100, 100), WinX0+407, WinY0+133, WinX0+629, WinY0+147, true, FoundX, FoundY) then
        //此時FoundX和FoundY的值分別為找到的圖像的左上角X,Y坐標
        keypress("TAB")
        wait(1000)
        
    end if
end function

//-----------------------------------------------------------------------------------

function drink()        //喝水函數
    red=GetConfigNumber("HP量")
    blue=GetConfigNumber("AP量")
    ye=GetConfigNumber("SP量")
   
    red1=GetConfigNumber("HP量坐下")
    blue1=GetConfigNumber("AP量坐下")
    ye1=GetConfigNumber("SP量坐下")
   
    dim DigitImgs[10]
    LoadImage("1.Sel", DigitImgs[1])
    LoadImage("2.Sel", DigitImgs[2])
    LoadImage("3.Sel", DigitImgs[3])
    LoadImage("4.Sel", DigitImgs[4])
    LoadImage("5.Sel", DigitImgs[5])
    LoadImage("6.Sel", DigitImgs[6])
    LoadImage("7.Sel", DigitImgs[7])
    LoadImage("8.Sel", DigitImgs[8])
    LoadImage("9.Sel", DigitImgs[9])
    LoadImage("0.Sel", DigitImgs[10])
   
    GetActiveWindowXY(WinX0, WinY0)
   
    //在屏幕上讀數字
    if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+149, WinY0+700, WinX0+193, WinY0+720, true, rednumber) then
        if CNum(rednumber)<=red then
            keypress("-")
            wait(300)
            print("HP量"& red & "使用HP*1")
        end if
    end if

   
    if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+146, WinY0+717, WinX0+194, WinY0+729, true, bluenumber) then
        if CNum(bluenumber)<=blue then
            keypress("=")
            wait(300)
            print("AP量"& blue & "使用ap*1")
        end if
    end if
   
    if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+146, WinY0+731, WinX0+194, WinY0+743, true, yenumber) then
        if CNum(yenumber)<=ye then
            keypress("0")
            wait(300)
            print("SP量"& ye & "使用sp*1")
        end if
    end if
//-------------------------------------------------------------------------------------------------------   
if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+149, WinY0+700, WinX0+193, WinY0+720, true, red1number) then
    if CNum(red1number)<=red1 then
            wait(300)
            keypress("x")
            wait(300)
            print("HP量低於"& red1 & "HP,坐下")
            qq()
            wait(300)
            if not CheckColor(WinX0+247, WinY0+647, Color(109, 23, 42), 10) then
                wait(300)
                KeyPress("x")
        do        
            wait(300)
        loop until CheckColor(WinX0+249, WinY0+647, Color(105, 16, 34), 10)   
        end if
end if
end if


   
   
   
    if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+146, WinY0+717, WinX0+194, WinY0+729, true, blue1number) then
        if CNum(blue1number)<=blue1 then
            keypress("x")
            wait(300)
            print("AP量低於"& blue1 & "AP,坐下")
    qq()
    wait(300)
    if not CheckColor(WinX0+247, WinY0+647, Color(109, 23, 42), 10) then
        wait(300)
        KeyPress("x")
        do        
            wait(300)
        loop until CheckColor(WinX0+249, WinY0+647, Color(105, 16, 34), 10)   
    end if
        end if
    end if
   
   
   
    if ReadNumberEx(DigitImgs, Color(30, 30, 30), WinX0+146, WinY0+731, WinX0+194, WinY0+743, true, ye1number) then
        if CNum(ye1number)<=ye1 then
            keypress("x")
            wait(300)
            print("SP量低於"& ye1 & "SP,坐下")
            qq()
            wait(300)
            if not CheckColor(WinX0+247, WinY0+647, Color(109, 23, 42), 10) then
                wait(300)
               
                KeyPress("x")
                do        
                    wait(300)
                loop until CheckColor(WinX0+249, WinY0+647, Color(105, 16, 34), 10)   
            end if
        end if
    end if
end function



//------------------------------------------------------------------------------------------------------
function qq()
    GetActiveWindowXY(WinX0, WinY0)
    if CheckColor(WinX0+447, WinY0+30, Color(109, 37, 47), 10) then
        do
            keypress("9")
            wait(1000)
            keypress("3")
            wait(1000)//設定你的攻擊熱鍵的秒數  如果是重砲手  秒數要改2000~300
            keypress("4")
            wait(1000)//設定你的攻擊熱鍵的秒數  如果是重砲手  秒數要改2000~3000
        loop while CheckColor(WinX0+447, WinY0+30, Color(102, 35, 48), 10)
    end if
end function

//---------------------------------------------------------------------------------------------------

function fuhuo()
    //取窗口原點坐標
    GetActiveWindowXY(WinX0, WinY0)
   
    //如果找到圖像"復活.sel"
    if FindImageEx("復活.sel", Color(100, 100, 100), WinX0+485, WinY0+78, WinX0+537, WinY0+98, true, FoundX, FoundY) then
        //此時FoundX和FoundY的值分別為找到的圖像的左上角X,Y坐標
        beep(800,60000)
        
    end if
end function

//-----------------------------------------------------------------------------------------------------

function fzjn1()
    keypress("5")
    wait(2000)
end function

function fzjn2()
    keypress("6")
    wait(1000)
end function

function fzjn3()
    keypress("7")
    wait(1000)
end function

//----------------------------------------------------------------------------------------------------


大大們 我的腳本是這樣的 有些問題想問一下
hp未到900就坐下了?
在打怪中途坐下了?
坐下後滿血不懂站起來?
輔助技能不會放?
紅色跟藍色的部分該怎改?我連是什麼也不知道-_-"可以作個詳細點的解說嗎?
我的腳本你們有看到有什麼問題嗎?
自動反擊應該怎麼寫 有大大能幫我一下嗎?

最後  謝謝大大們
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


您需要登錄後才可以回帖 登錄 | 註冊


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-11-28 17:11 , Processed in 0.048934 second(s), 16 queries , Memcache On.

版權說明:
  本站不會製作、經銷、代理外掛程式。僅免費提供外掛程式下載前之掃毒及掃木馬等安全檢測驗證,協助會員遠離盜號危險程式。本站所有資料均來自網際網路收集整理,說明文字暨下載連結轉載自原程 式開發站。站上出現之公司名稱、遊戲名稱、程式等,商標及著作權,均歸各公司及程式原創所有,本站程式所有權歸外掛聯合國所有。本程式所有權歸外掛聯合國所有.......

回頂部
第二步?
第三步?