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

[發問] 請問如何做好下了文件

devily 發表於 2009-3-3 21:14:04 | 只看該作者 回帖獎勵 |倒序瀏覽 |
小第下了一份文件是叫

[General]
Description=天龍2
BeginHotkey=122
BeginHotkeyMod=2
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=2
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=

[Script]
UserVar s=1594686126 刀子鼠標特徵碼可自行更正
UserVar bg=954439560 包包鼠標特徵碼可自行更正
// 註:所有涉及到顏色,鼠標形狀的值請自行使用抓點抓色功能得到後修改
VBS dim hong,lan,hongT,lanT,cwhong
// 定義變量名稱
UserVar hong=40 人物血量<hong%時,自動吃紅。可自行調整
// 自定義變量值
UserVar lan=30 人物藍量<lan%時,自動吃藍。可自行調整
// 自定義變量值
UserVar cwhong=50 寵物血量<cwhong%時,自動吃紅。可自行調整
// 自定義變量值
UserVar hongT=256 補血延時時間(毫秒)
// 自定義變量值
UserVar lanT=256 補藍延時時間(毫秒)
// 自定義變量值
UserVar xxx=310 掃描區域左上角X座標可自行調整
UserVar yyy=146 掃描區域左上角Y座標可自行調整
UserVar nnn=21 掃描寬度可自行調整
UserVar zzz=36 掃描高度可自行調整
Delay 30
// 延時30毫秒
///////
VBS Dim phplx,phprx,phpnx,phpy,chplx,chprx,chpnx,chpy,mhplx,mhprx,mhpnx,mhpy,cmplx,cmprx,cmpnx,cmpy
VBS Dim chpColor,cNohpColor,cmpColor,cNompColor,mhpColor,mNompColor,phpColor,pNohpColor
//=
//角色血條顏色
VBS chpColor="0112FF":cNohpColor="111111":cmpColor="FFBBBB":cNompColor="111111"
//怪物血條顏色
VBS mhpColor="0019FF":mNompColor="080911"
//寵物血條
VBS phpCLOLor="0112FF":pNohpColor="111111"
////////////////
//寵物血條最左邊X座標值
VBS phplx=273:phprx=370:phpnx=113:phpy=119
////////////////
//角色血條最左邊X座標值
VBS chplx=273:chprx=392:chpnx=125:chpy=80
///////////////
//怪物血條最左邊X座標值
VBS mhplx=455:mhprx=577:mhpnx=308:mhpy=80
///////////////
//角色藍條最左邊X座標值
VBS cmplx=273:cmprx=392:cmpnx=125:cmpy=85
/////////////////
//條件結束
Rem sss
VBSCall FindPic(211,50,1197,779,"003.bmp",0.9,x,y)
If x>=0 and y>=0
    MoveTo x y
    Delay 5
    For 10
        Beep
        Beep
        Delay 1000
    EndFor
Else
EndIf
VBS n = nnn
// 定義變量n,用於後面的循環
VBS x=xxx
// 定義鼠標移動到怪物身上後變成刀形鼠標的值,請使用抓點抓色功能得到
While n >= 0
    // 如果n大於等於0,則執行循環
    // 定義找怪區域左上角的Y坐標
    VBS y=yyy
    VBSCall setCursorPos(x,y)
    //MoveTo x,y
    // 鼠標移動到坐標x,y
    Delay 2
    // 延時10毫秒
    VBSCall k=GetCursorShape(0)
    // 調用外部VBS子各程序得到當前鼠標形狀並賦值到變量K
    If k = s
        // Delay 4
        // 如果表達式k=s成立,則執行下面的語句
        VBS a=0
        // 該變量用於時間判斷
        Delay 10
        //  RightClick 1
        KeyDown 17,1
        KeyPressH 9,1
        KeyUp 17,1        // RightClick 1
        // 鼠標右鍵單擊
        Delay 32
        // 延時10毫秒
        Rem 有怪
        // 標記 有怪
        IfColor mhprx,mhpy,mhpColor,2
            //IfColor 223,33,0010ff,0
            // 如果坐標223,33的顏色等於「0010ff"則執行下面的語句。坐標223,33為鼠標右鍵點中怪物後,怪物血條最左邊的的坐標
            // 按鍵F1攻擊
            //   Delay 10
            // 延時10毫秒
            Gosub 用力攻擊
            //Goto 有怪
            // 跳轉到標記有怪執行判斷,看怪物死沒有
        Else
            y=y+30
        EndIf
        // 條件結束
    ElseIf k=bg
        Delay 32
        //檢物
        Gosub pick
    Else
        VBS a=a+1
    EndIf
    // 條件結束
    VBS z = zzz
    While z >= 0
        VBS y = y + 15
        // y坐標增加30
        VBS z = z - 1
        VBSCall setCursorPos(x,y)
        //MoveTo x,y
        Delay 2
        VBSCall k=GetCursorShape(0)
        If k = s
            VBS b=0
            // 該變量用於時間判斷
            RightDown 1
            Delay 32
            RightUp 1
            Delay 10
            //  RightClick 1
            KeyDown 17,1
            KeyPressH 9,1
            KeyUp 17,1
            Delay 10
            Rem 怪物
            IfColor mhprx,mhpy,mhpColor,2
                // IfColor 223,33,0010ff,0
                //        Delay 10
                Gosub 用力攻擊
                //Goto 怪物
            Else
                y=y+30
            EndIf
        ElseIf k=bg
            Delay 32
            //檢物
            Gosub pick
        Else
            VBS b=b+1
        EndIf
    EndWhile
    VBS x = x + 30
    // x坐標增加50
    VBS n = n - 1
EndWhile
Goto sss
Sub pick
    RightDown 1
    Delay 32
    RightUp 1
    Delay 400
Return
//If a>=1830 and b>=27450
// 如果大約5分鐘左右沒有找到怪,則執行下面的語句
//   MoveTo 512,150
//  LeftClick 1
//  Delay 2000
//  MoveTo 512,150
//    LeftClick 1
//   Delay 2000
//EndIf
Sub 紅藍卜卜
    IfColor hong/100*(chprx-chplx)+chplx chpy cNohpColor 2
        //IfColor hong/100*121+65 31 212021 2
        // 如果坐標300,80的顏色大約等於「111111」則,其中121為人物血條最右邊的X坐標減去人物血條最左邊的X坐標,65為人物血條最左邊的X坐標,31為人物血條的Y坐標
        KeyPress 119 1
        //按下補血快捷鍵F8
        Delay hongT
        //補血延時
    EndIf
    // 條件結束
    IfColor hong/100*(cmprx-cmplx)+cmplx cmpy cNompColor 2
        //IfColor lan/100*121+65 37 212021 2
        // 如果坐標hong/100*121+65,37的顏色大約等於「212021」則,其中121為人物藍條最右邊的X坐標減去人物藍條最左邊的X坐標,65為人物藍條最左邊的X坐標,37為人物藍條的Y坐標
        KeyPress 120 1
        //按下補藍快捷鍵F9
        Delay lanT
        //補藍延時
    EndIf
    //條件結束
    IfColor hong/100*(phprx-phplx)+phplx phpy pNohpColor 2
        // 如果坐標285,119的顏色大約等於111111則,其中97為寵物務條最右邊的X坐標減去寵物血條最左邊的X坐標,64為寵物血條最左邊的X坐標,70為寵物血條的Y坐標
        KeyPress 121 1
        //按下補血快捷鍵F10
        Delay hongT
        //補血延時
    EndIf
Return
Sub 用力攻擊
    Rem 攻擊
    KeyPress 112,1
    Delay 1000
    KeyPress 113,1
    Delay 1000
    KeyPress 114,1
    Delay 1000
    KeyPress 115,1
    Delay 1000
    //Gosub 技能處理
    Gosub 紅藍卜卜
    Gosub 檢測攻擊目標是否死亡
    IfColor mhplx,mhpy,mhpColor,2
        Delay 450
        Goto 攻擊
    Else
        Delay 600
        //Gosub scanPP
        //Goto 3
        //3 揀物
    EndIf
Return
Sub 檢測攻擊目標是否死亡
    IfColor mhplx,mhpy,mNohpColor,2
        Goto start
    EndIf
Return


小第不太明白... 是否這天龍.txt  放在面便可以求解答
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


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


手機版 | Archiver | 外掛聯合國

GMT+8, 2025-1-31 18:40 , Processed in 0.047294 second(s), 17 queries , Memcache On.

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

回頂部
第二步?
第三步?