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

[發問] 機場掛如何密客戶和幫他放狀態?

zakvoy 發表於 2011-4-1 17:24:59 | 只看該作者 回帖獎勵 |正序瀏覽 |
20論壇幣
好像看到那是公開發言的 而且我想幫客戶放++
我想改成傳送地點用密的 而且傳送失敗要密他再來一次
此外 我的資料夾名稱與同位置資料夾全部都英文名 所以OP會講中文
已更新至最新版

我的巨集腳本如下

automacro a {
        console "您現在已在遊戲中"
        exclusive 1
        call {
        if (@invamount(藍色魔力礦石) == 0) goto qk
        pause 3
        do look 4
        do deal no
        do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
        #a-1 b-2 c-3 d-4 = 聊天室名稱
        pause 1
        do sit
        release all
        stop
        :qk
        do sit
        stop
        }
}
automacro b {
        console "(.*) ((.*)) 向您要求一個交易"
        run-once 1
        call {
        do deal
        pause 20
        #20秒內不動作取消交易
        do deal no
        }
}
automacro c {
        console "(.*) 加入物品以交易: (.*)"
        call {
        do deal no
        #加入物品取消交易
        }
}
automacro d {
        console "(.*) 加入 (.*) z 以交易"
        run-once 1
        call {
        $a = $.lastMatch2
        if ($a = 2,500) goto bb
        if ($a = 2,000) goto bb
        if ($a = 3,000) goto bb
        if ($a = 1,500) goto bb
        #$a = ".*" = 傳陣金額
        pause 1
        do deal no
        #當金額!=你販賣的金額取消交易
        stop
        :bb
        pause 1
        do deal
        pause 1
        do deal
        pause 15
        do deal no
        #輸入金額15秒內未完成交易者取消交易
        }
}
automacro f {
        console "您 獲得  (.*) zeny."
        run-once 1
        call {
        pause 1
        do chat leave
        $a = $.lastMatch1
        if ($a = 2,500) goto a1
        if ($a = 2,000) goto b2
        if ($a = 3,000) goto c3
        if ($a = 1,500) goto d4
        #$a = ".*" = 傳陣金額
        :a1
        call aa1
        #執行macro aa1
        stop
        :b2
        call bb2
        stop
        :c3
        call cc3
        stop
        :d4
        call dd4
     
        }
}
automacro e {
        console "交易已取消"
        call {
        release all
        }
}
macro aa1 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sl 27 $x0 $y0
        pause 1
        do warp ra_fild05
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do c [阿巫敦拉草原]左-上可到沙狼區 再往上可進冰洞
        call start
        stop
        :ax
        pause 1
        call axx
        #執行macro axx
}
macro axx {
        call aa1
        #執行macro aa1
}
macro bb2 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sl 27 $x0 $y0
        pause 1
        do warp yuno_fild03
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do c [諾可羅德.火焰洞窟]下方地圖為優配擂斯外
        call start
        stop
        :ax
        pause 1
        call bxx
}
macro bxx {
        call bb2
}
macro cc3 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sl 27 $x0 $y0
        pause 1
        do warp rachel
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do c [阿盧納貝茲教皇國首都.拉赫]上方地圖可達神殿 準他可傳菲音斯(石波or無名島)
        call start
        stop
        :ax
        pause 1
        call cxx
}
macro cxx {
        call cc3
}
macro dd4 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sl 27 $x0 $y0
        pause 1
        do warp prontera
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do c [米德加茲共和國首都.普隆德拉]
        call start
        stop
        :ax
        pause 1
        call dxx
}
macro bxx {
        call dd4
}
macro start {
        if (@invamount(藍色魔力礦石) == 0) goto qk
        pause 3
        do look 4
        do deal no
        do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
        #a-1 b-2 c-3 d-4 = 聊天室名稱
        pause 1
        do sit
        release all
        stop
        :qk
        do sit
        stop
}

收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


[X] 當前離線
UID
1561059
熱心
2263 值
嘉獎
0 次
違規
0 次
在線時間
354 小時
經驗
2176 點
積分
49895
精華
0
最後登錄
2013-4-1
閱讀權限
60
註冊時間
2010-10-8
論壇幣
45088 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 7Rank: 7Rank: 7
[X] 2011-4-3 09:08:05
因為2樓的文章無法編輯,所以再發一篇
關於2樓提到那樣的寫法是無法觸發的
試試以下吧
automacro a {
        console "您現在已在遊戲中"
        exclusive 1
        call {
        pause 3
        if (@invamount(藍色魔力礦石) == 0) goto qk
        do look 4
        do deal no
        do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
        #a-1 b-2 c-3 d-4 = 聊天室名稱
        pause 1
        do sit
        release all
        stop
        :qk
        do sit
        stop
        }
}
automacro b {
        console /向您要求一個交易/
        run-once 1
        call {
        do deal
        pause 20
        #20秒內不動作取消交易
        do deal no
        }
}
automacro c {
        console /加入物品以交易/
        call {
        do deal no
        #加入物品取消交易
        }
}
automacro d {
        console /(.*) 加入 (.*) z 以交易/
        run-once 1
        call {
        $n = $.lastMatch1
        $a = $.lastMatch2
        if ($a = 2,500) goto bb
        if ($a = 2,000) goto bb
        if ($a = 3,000) goto bb
        if ($a = 1,500) goto bb
        #$a = ".*" = 傳陣金額
        pause 1
        do deal no
        #當金額!=你販賣的金額取消交易
        stop
        :bb
        pause 1
        do deal
        pause 1
        do deal
        pause 15
        do deal no
        #輸入金額15秒內未完成交易者取消交易
        }
}
automacro f {
        console /您 獲得  (.*) zeny./
        exclusive 1
        run-once 1
        call {
        pause 1
        do chat leave
        $a = $.lastMatch1
        if ($a = 2,500) goto a1
        if ($a = 2,000) goto b2
        if ($a = 3,000) goto c3
        if ($a = 1,500) goto d4
        #$a = ".*" = 傳陣金額
        :a1
        call aa1
        #執行macro aa1
        stop
        :b2
        call bb2
        stop
        :c3
        call cc3
        stop
        :d4
        call dd4
        }
}
automacro e {
        console "交易已取消"
        call {
        release all
        }
}
macro aa1 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sp 34 @player ($n) 10
        pause 1
        do sp 29 @player ($n) 10
        pause 1
        do sl 27 $x0 $y0
        pause 1
        do warp ra_fild05
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do pm "$n" [阿巫敦拉草原]左-上可到沙狼區 再往上可進冰洞
        call start
        stop
        :ax
        pause 1
        do pm "$n" 傳陣施放失敗,請稍後
        call axx
        #執行macro axx
}
macro axx {
        call aa1
        #執行macro aa1
}
macro bb2 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sp 34 @player ($n) 10
        pause 1
        do sp 29 @player ($n) 10
        pause 1
        do sl 27 $x0 $y0
        pause 1
        do warp yuno_fild03
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do pm "$n" [諾可羅德.火焰洞窟]下方地圖為優配擂斯外
        call start
        stop
        :ax
        pause 1
        do pm "$n" 傳陣施放失敗,請稍後
        call bxx
}
macro bxx {
        call bb2
}
macro cc3 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sp 34 @player ($n) 10
        pause 1
        do sp 29 @player ($n) 10
        pause 1
        do sl 27 $x0 $y0
        pause 1
        do warp rachel
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do pm "$n" [阿盧納貝茲教皇國首都.拉赫]上方地圖可達神殿 準他可傳菲音斯(石波or無名島)
        call start
        stop
        :ax
        pause 1
        do pm "$n" 傳陣施放失敗,請稍後
        call cxx
}
macro cxx {
        call cc3
}
macro dd4 {
        $aa1 = @invamount(藍色魔力礦石)
        #施放傳送之陣"前"的藍色魔力礦石數量
        $x = @arg("$.pos", 1)
        $y = @arg("$.pos", 2)
        $x0 = @eval($x - @rand(1,3))
        $y0 = @eval($y - @rand(1,3))
        do sp 34 @player ($n) 10
        pause 1
        do sp 29 @player ($n) 10
        pause 1
        do sl 27 $x0 $y0
        pause 1
        do warp prontera
        #a = 地圖名稱
        pause 1
        $aa2 = @invamount(藍色魔力礦石)
        #施放傳送之陣"後"的藍色魔力礦石數量
        if ($aa1 == $aa2) goto ax
        #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
        do pm "$n" [米德加茲共和國首都.普隆德拉]
        call start
        stop
        :ax
        pause 1
        do pm "$n" 傳陣施放失敗,請稍後
        call dxx
}
macro dxx {
        call dd4
}
macro start {
        pause 3
        if (@invamount(藍色魔力礦石) == 0) goto qk
        do look 4
        do deal no
        do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
        #a-1 b-2 c-3 d-4 = 聊天室名稱
        pause 1
        do sit
        release all
        stop
        :qk
        do sit
        stop
}
回覆

使用道具 舉報

[X] 當前離線
UID
1561059
熱心
2263 值
嘉獎
0 次
違規
0 次
在線時間
354 小時
經驗
2176 點
積分
49895
精華
0
最後登錄
2013-4-1
閱讀權限
60
註冊時間
2010-10-8
論壇幣
45088 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
[X] 2011-4-2 10:50:50
console "(.*) ((.*)) 向您要求一個交易"
妳這樣寫會觸發嗎?
回覆

使用道具 舉報

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


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-11-14 19:55 , Processed in 0.059087 second(s), 16 queries , Memcache On.

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

回頂部
第二步?
第三步?