按鍵精靈 腳本導入圖解

遊客，如果您要查看本帖隱藏內容請回覆

按鍵精靈動畫教程（2）－手把手教你使用網上的腳本


觀看密碼:

1. 494306665

複製代碼

動畫教程下載點:
http://cn.upelink.com/download/251514/4128
http://www.badongo.com/file/8687596

☆此訊息由版主加入，請發帖會員勿編輯去除☆

回帖是給發帖會員的鼓勵！會員請勿在此回覆惡意灌水、複製他人回覆、注音火星文、簡體字等等。

[ 本帖最後由 mccucc 於 2008-4-6 22:19 編輯 ]

希望對我有幫助yociexp184.gif

感謝你的教學，對初學者的我應該非常有幫助

/環境 1024*768
//全螢幕
//遊戲預設按鍵1  攻擊
//遊戲預設按鍵2  每7秒技能
//遊戲預設按鍵3  每9秒技能
//按鍵45789技能
//F7放鈴鐺 在自己主要職業的武器放在F4 F5 F6 相對位置 會視情
形鈴鐺補補
//仙魔集滿 自動仙魔化
//F1 補紅
//F2 補藍
//遊戲預設F9 休息
//遊戲預設TAB 尋怪
UserVar noteam=1 1拒組隊 0 看看再說
UserVar addhp=25 血量<addhp%時，自動吃紅。
UserVar addmp=20 藍量<amdhp%時，自動吃藍。
UserVar addhpT=500 補血延時時間（毫秒）
UserVar addmpT=500 補藍延時時間（毫秒）
UserVar jobKey=DropList{劍客:115|槍手:116|拿馬尾:117|拿鈴
鐺:118}=0 主角的職業
UserVar regen=DropList{打坐回紅:0|打坐回藍:1}=0 打坐回滿攻擊
UserVar key4=DropList{不使用4放技能:0|4放技能:1}=0 數字4技能
開啟，預設關閉
UserVar key5=DropList{不使用5放技能:0|5放技能:1}=0 數字5技能
開啟，預設關閉
UserVar key7=DropList{不使用7放技能:0|7放技能:1}=0 數字7技能
開啟，預設關閉
UserVar key8=DropList{不使用8放技能:0|8放技能:1}=0 數字8技能
開啟，預設關閉
UserVar key9=DropList{不使用9放技能:0|9放技能:1}=0 數字9技能
開啟，預設關閉
//=========================================================
VBS Dim addhp,addnmp,addhpT,addnpT
VBS Dim
chpColor,cmpColor,mhpColor,chplx,chpnx,chprx,chpy,mhplx,mhpn
x,mhprx,mhpy,cmpy,cmplx,cmpnx,cmprx
//x-->X座標, y-->y座標, l -->左邊, r-->右邊, n-->中間, c-->
角色, m-->怪物 hp-->紅色,mp-->藍或魔
//chpColor:角色紅血顏色，cmpColor:角色魔顏色，怪物紅顏色
mreColor
//chplx代表角色血條左邊X座標       chpnx代表角色血條中間x座
標
VBS Dim
ztjnt,ztjn,aniSki3,keyF2,bour,rota,sk1,sk2,,sk3,sk4,sk5,sk7,
sk8,sk9
//ztjnt=300
Delay 1000
rota=now
KeyPress 84,1
ztjn=now
ztjnt=60
//=========================================================
//角色血條顏色
chpColor="2610E0"
//角色藍顏色
cmpColor="EB8400"
//怪物血條顏色
mhpColor="07008C"
////////////////
//角色血條最左邊X座標值
chplx=11
//角色血條最右邊X座標值
chprx=148
//角色血條中間X座標值
chpnx=75
//角色血條Y座標值
chpy=34
///////////////
//怪物血條最左邊X座標值
mhplx=397
//怪物血條最右邊X座標值
mhprx=626
//怪物血條中間X座標值
mhpnx=497
//怪物血條Y座標值
mhpy=41
///////////////
//角色藍條最左邊X座標值
cmplx=11
//角色藍條最右邊X座標值
cmprx=148
//角色藍條中間X座標值
cmpnx=75
//角色藍條Y座標值
cmpy=50
//=========================================================
//=========================================================
Rem 開始掛機
Rem 0
Gosub 銅鈴補紅
Gosub 打坐
Rem 滿血
Gosub 狀態技能
Rem 1
//Gosub rotate
Gosub 尋怪
Rem 2
Gosub 判斷攻擊方式
Rem 3
//Delay 100
Gosub 確認無他怪
Rem 4
//Gosub 揀物
Goto 開始掛機
//=========================================================
Sub 打坐
    If regen=0
        Gosub 打坐回紅
    Else
        Delay 32
        // Gosub 坐回魔
    EndIf
Return
//=========================================================
Sub 坐回魔
    Gosub 打坐遇怪反擊
  
    //黑血
    IfColor chpnx,chpy,chpColor,1
        Delay 100
        KeyPress 120,1
        //F9
        Delay 1000
        Rem sitre
        Delay 500
        Gosub 打坐遇怪反擊
  
        IfColor cmprx-1,cmpy,cmpColor,0
            Delay 32
            KeyPress 120,1
            Delay 1000
            Goto 滿血
        EndIf
        Delay 1000
        Goto sitre
    Else
        Delay 32
    EndIf
Return
Sub 打坐回紅
    Gosub 打坐遇怪反擊
    IfColor chpnx,chpy,chpColor,1
        //黑血
        //IfColor cmpnx-10,cmpy,cmpColor,1
        Delay 100
        KeyPress 120,1
        //F9
        Delay 1000
        Rem sitre
        Delay 500
        Gosub 打坐遇怪反擊
        IfColor chprx,chpy,chpColor,0
            Delay 32
            KeyPress 120,1
            Delay 1000
            Goto 滿血
        EndIf
        Delay 1000
        Goto sitre
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 打坐遇怪反擊
    IfColor mhplx,mhpy,mhpColor,0
        KeyPress 120,1
        //F9佔起
        Delay 500
        Gosub 用力攻擊
    EndIf
Return
//=========================================================
Sub 尋怪
    IfColor mhplx,mhpy,mhpColor,0
        Delay 32
        IfColor mhprx,mhpy,mhpColor,1
            KeyPress 9,1
        EndIf
        Goto 2
    Else
        Delay 32
        If noteam=1
            KeyPress 27,1
            Delay 300
        EndIf
        KeyPress 9,1
        Delay 200
    EndIf
Return
//=========================================================
Sub 判斷攻擊方式
  
    IfColor mhprx,mhpy,mhpColor,0
        Delay 100
        //bour=now
        Gosub 用力攻擊
    Else
        Delay 450
        Goto 1
        //尋怪
        //Goto 開始掛機
    EndIf
Return
//=========================================================
Sub 確認無他怪
    Delay 1000
    IfColor mhplx,mhpy,mhpColor,0
        Gosub 用力攻擊
    Else
        Goto 4
    EndIf
Return
//=========================================================
Sub 防呆裝置
    If DateDiff("s",bour,Now) >3
        Delay 100
        IfColor mhprx,mhpy,mhpColor,0
            // IfColor 605,11,8C0C68,1
            KeyDown 83,1
            Delay 300
            KeyUp 83,1
            KeyDown 65,1
            Delay 250
            KeyUp 65,1
            KeyPress 9,1
            Delay 200
            // Gosub 打坐
            Goto 2
        EndIf
    EndIf
Return
//=========================================================
Sub 用力攻擊
    KeyPress 49,1
    Delay 1000
    bour=now
    Rem 呼依死
    Gosub 攻擊技能sk2
    Gosub 補紅藍
    Delay 100
    Gosub 攻擊技能sk3
    Gosub 補紅藍
    Delay 100
    If key4=1
        Gosub 攻擊技能sk4
        Gosub 補紅藍
        Delay 100
    EndIf
    If key5=1
        Gosub 攻擊技能sk5
        Gosub 補紅藍
        Delay 100
    EndIf
    If key7=1
        Gosub 攻擊技能sk7
        Gosub 補紅藍
        Delay 100
    EndIf
     If key8=1
        Gosub 攻擊技能sk8
        Gosub 補紅藍
        Delay 100
    EndIf
     If key9=1
        Gosub 攻擊技能sk9
        Gosub 補紅藍
        Delay 100
    EndIf  
    KeyPress 49,1
    Delay 1000
    Gosub 補紅藍
    Gosub 防呆裝置
    Goto 呼依死
Return
//=========================================================
//F1紅 F2藍
Sub 補紅藍
    IfColor addhp/100*(chprx-chplx)+chplx,chpy,chpColor,1
        KeyPress 112,1
        Delay addhpT
    EndIf
    IfColor addmp/100*(cmprx-cmplx)+cmplx,cmpy,cmpColor,1
        KeyPress 113,1
        Delay addmpT
    EndIf
    Gosub 目標是否死亡
Return
//=========================================================
Sub 目標是否死亡
    IfColor mhplx,mhpy,mhpColor,0
        Delay 32
    Else
        Delay 200
        Goto 3
        //3 揀物
    EndIf
Return
//=========================================================
Sub 揀物
    KeyPress 50,2
    Delay 500
    KeyPress 50,2
    Delay 500
    KeyPress 50,2
    Delay 500
Return
//=========================================================
Sub 狀態技能
    If DateDiff("s",ztjn,Now) >= ztjnt
        Delay 32
        IfColor chprx-1,chpy,chpColor,0
            Delay 500
            KeyPress 84,1
            Delay 1500
            VBS ztjn=now
        EndIf
    EndIf
EndIf
Return
//=========================================================
Sub rotate
    If DateDiff("s",rota,Now) >= 120
        RightDown 1                                    // 按
下右鍵
        Delay 1000
        MoveR -200,0                                  //滑鼠
移動
        Delay 1000
        MoveR -200,0                                  //滑鼠
移動
        Delay 1000
        RightUp 1
        rota=now
    EndIf
Return
//=========================================================
Sub 攻擊技能sk2
    //IfColor 76,50,EB8400,0
    If DateDiff("s",sk1,Now) >= 6
        Delay 200
        KeyPress 50,1
        Delay 800
        VBS sk1=now
    EndIf
    // EndIf
Return
//=========================================================
Sub 攻擊技能sk3
    If DateDiff("s",sk3,Now) >= 8
        Delay 200
        KeyPress 51,1
        Delay 800
        VBS sk3=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 攻擊技能sk4
    If DateDiff("s",sk4,Now) >= 8
        Delay 200
        KeyPress 52,1
        Delay 800
        VBS sk4=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 攻擊技能sk5
    If DateDiff("s",sk5,Now) >= 8
        Delay 200
        KeyPress 53,1
        Delay 800
        VBS sk5=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 攻擊技能sk7
    If DateDiff("s",sk7,Now) >= 8
        Delay 200
        KeyPress 55,1
        Delay 800
        VBS sk7=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 攻擊技能sk8
    If DateDiff("s",sk8,Now) >= 8
        Delay 200
        KeyPress 56,1
        Delay 800
        VBS sk8=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 攻擊技能sk9
    If DateDiff("s",sk9,Now) >= 8
        Delay 200
        KeyPress 57,1
        Delay 800
        VBS sk9=now
    Else
        Delay 32
    EndIf
Return
//=========================================================
Sub 銅鈴補紅
    IfColor chpnx-2,chpy,chpColor,1
        Delay 32
        IfColor cmpnx+28,cmpy,cmpColor,0
            KeyPress 118,1
            Delay 400
            KeyPress 54,1
            Delay 3000
            //KeyPress 115,1
            KeyPress jobKey,1
            Delay 400
        EndIf
    EndIf
Return
//========================================================一開始是要怎設定阿??????

感謝大大教我怎麼導入腳本~謝謝~
辛苦囉^^yociexp178.gif