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

[發問] 製藥高手幫看看鹽酸瓶只輪迴一次就停了

z5975035 發表於 2012-3-19 11:49:00 | 只看該作者 回帖獎勵 |倒序瀏覽 |
automacro initiate {
        run-once 1
        call {
                # 以下設定卡普拉所在座標,可根據不同的卡普拉 NPC 座標作更改
                $npcLocation =  aldebaran 143 119
                # 其他想要初始化設定什麼的可以在下面新增
                do conf storageAuto 0
                do conf sellAuto 0
                do conf autoTalkCont 0
                do conf logPartyChat 1
                do conf sitAuto_sp_lower 0
                do conf sitAuto_sp_upper 0
                do conf sitAuto_over_50 0
                # 一組材料重 14
                do eval $::Macro::Data::varStack{controlAmount} = int(($::char->{'weight_max'} * 0.5 - $::char->{'weight'}) / 14)
                # $controlAmount = @eval(int(($.maxweight * 0.5 - $.weight) / 14))
                log 最大可攜帶 $controlAmount 組材料而不負重
                if ($controlAmount > 0) goto jump1
                        log ***** 注意!未攜帶材料前已負重,可能導致巨集執行錯誤! *****
                :jump1
                if (@invamount(鹽酸瓶製作說明書) != 0) goto jump2
                        log ***** 注意!鹽酸瓶製作說明書尚未帶在身上 *****
                :jump2
                log 設定值初始化完畢
        }
}
# 補貨判斷
automacro refillCheck {
        sp > 95%
        inventory "鹽酸瓶製作說明書" == 1
        inventory "藥缽" = 0
        inventory "空瓶" >= 0
        inventory "不死心臟" >= 0
        # 以下為倉庫物品存量判斷
        var medicineBowls > 200
        var emptyBOTtles > 200
        var poisonSpores > 200
        call start
        run-once 1
}
# 補貨
macro start {
        lock pharmacy
        pause 1
        do talk @npc (143 119)
        do talk cont
        do talk resp 1
        pause 2
        # 若身上有上次做出來的鹽酸瓶,則存入倉庫
        if (@invamount(鹽酸瓶) == 0) goto jump
                $usedMedicineBowls = @eval($tempMedicineBowls - @invamount(藥缽))
                $finishedAmount = @invamount(鹽酸瓶)
                do storage add @inventory(鹽酸瓶) @invamount(鹽酸瓶)
        # 本 if 為計算成功率用
        if ($usedMedicineBowls <= 0) goto jump
                $rateOfSuccess = @eval($finishedAmount / $usedMedicineBowls)
                do eval $::Macro::Data::varStack{rateOfSuccess} = sprintf("%.2f",$::Macro::Data::varStack{rateOfSuccess} * 100) . '%';
                do p 上批製造 $usedMedicineBowls 個鹽酸瓶成功率 $rateOfSuccess
        :jump
        # 由倉庫取出材料
        do storage get @storage(藥缽) @eval(200 - @invamount(藥缽))
        do storage get @storage(空瓶) @eval(200 - @invamount(空瓶))
        do storage get @storage(不死心臟) @eval(200 - @invamount(不死心臟))
        [
        $medicineBowls = @storamount(藥缽)
        $emptyPotionBottles = @storamount(空瓶)
        $poisonSpores = @storamount(不死心臟)
        $medicineBowls = @invamount(藥缽)
        ]
        # 由隊頻顯示並記錄倉庫材料剩餘量與成品數量
        do p 藥缽尚餘 $medicineBowls 個
        do p 空瓶尚餘 $emptyPotionBottles 個
        do p 不死心臟尚餘 $poisonSpores 個
        do p 鹽酸瓶庫存 @storamount(鹽酸瓶) 個
        pause 1
        do storage close
        release refillCheck
        release pharmacy
}
# 製藥判斷
automacro pharmacy {
        sp > 20
        inventory "鹽酸瓶製作說明書" == 1
        inventory "藥缽" >= 1
        inventory "空瓶" >= 1
        inventory "不死心臟" >= 1
        exclusive 1
        run-once 1
        call {
                do ss 228 10
                do send 8E 01 E0 1B 00 00 00 00 00 00
                release pharmacy
        }
}
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


johnusemail 當前離線
UID
1624821
熱心
625 值
嘉獎
0 次
違規
0 次
在線時間
154 小時
經驗
318 點
積分
1634
精華
0
最後登錄
2016-5-7
閱讀權限
40
註冊時間
2011-1-19
論壇幣
502 幣
聯合幣
29 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 5Rank: 5Rank: 5
johnusemail 2012-3-19 20:52:53
automacro refillCheck {
        sp > 95%                 <===這行吧,你做完一輪要補貨前魔要滿95%才會補貨之後才可以第二輪
        inventory "鹽酸瓶製作說明書" == 1              (等等吧魔滿看看有補貨嗎)
        inventory "藥缽" = 0
        inventory "空瓶" >= 0
        inventory "不死心臟" >= 0
        # 以下為倉庫物品存量判斷
        var medicineBowls > 200
        var emptyBottles > 200
        var poisonSpores > 200
        call start
        run-once 1
}
回覆

使用道具 舉報

[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] 2012-3-20 08:12:37
一開始要輸入macro start開始執行巨集
修改以下巨集(紅字部分
automacro refillCheck {
        sp > 95%
        inventory "鹽酸瓶製作說明書" == 1
        inventory "藥缽" = 0
        inventory "空瓶" >= 0
        inventory "不死心臟" >= 0
        # 以下為倉庫物品存量判斷
        var medicineBowls > 200
        var emptyPotionBottles > 200
        var poisonSpores > 200
        call start
        run-once 1
}
回覆

使用道具 舉報

[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] 2012-3-20 14:37:11
還是不行那再試試以下(紅字部分

automacro initiate {
        run-once 1
        call {
                # 以下設定卡普拉所在座標,可根據不同的卡普拉 NPC 座標作更改
                $npcLocation =  aldebaran 143 119
                # 其他想要初始化設定什麼的可以在下面新增
                do conf storageAuto 0
                do conf sellAuto 0
                do conf autoTalkCont 0
                do conf logPartyChat 1
                do conf sitAuto_sp_lower 0
                do conf sitAuto_sp_upper 0
                do conf sitAuto_over_50 0
                # 一組材料重 14
                do eval $::Macro::Data::varStack{controlAmount} = int(($::char->{'weight_max'} * 0.5 - $::char->{'weight'}) / 14)
                # $controlAmount = @eval(int(($.maxweight * 0.5 - $.weight) / 14))
                log 最大可攜帶 $controlAmount 組材料而不負重
                if ($controlAmount > 0) goto jump1
                        log ***** 注意!未攜帶材料前已負重,可能導致巨集執行錯誤! *****
                :jump1
                if (@invamount(鹽酸瓶製作說明書) != 0) goto jump2
                        log ***** 注意!鹽酸瓶製作說明書尚未帶在身上 *****
                :jump2
                log 設定值初始化完畢
        }
}
# 補貨判斷
automacro refillCheck {
        sp > 95%
        inventory "鹽酸瓶製作說明書" == 1
        inventory "藥缽" = 0
        inventory "空瓶" >= 0
        inventory "不死心臟" >= 0
        # 以下為倉庫物品存量判斷
        var medicineBowls > 200
        var emptyPotionBottles > 200
        var poisonSpores > 200
        call start
        run-once 1
}
# 補貨
macro start {
        lock pharmacy
        pause 1
        do talk @npc (143 119)
        do talk cont
        do talk resp 1
        pause 2
        # 若身上有上次做出來的鹽酸瓶,則存入倉庫
        if (@invamount(鹽酸瓶) == 0) goto jump
                $usedMedicineBowls = @eval($tempMedicineBowls - @invamount(藥缽))
                $finishedAmount = @invamount(鹽酸瓶)
                do storage add @inventory(鹽酸瓶) @invamount(鹽酸瓶)
        # 本 if 為計算成功率用
        if ($usedMedicineBowls <= 0) goto jump
                $rateOfSuccess = @eval($finishedAmount / $usedMedicineBowls)
                do eval $::Macro::Data::varStack{rateOfSuccess} = sprintf("%.2f",$::Macro::Data::varStack{rateOfSuccess} * 100) . '%';
                do p 上批製造 $usedMedicineBowls 個鹽酸瓶成功率 $rateOfSuccess
        :jump
        # 由倉庫取出材料
        do storage get @storage(藥缽) @eval(200 - @invamount(藥缽))
        do storage get @storage(空瓶) @eval(200 - @invamount(空瓶))
        do storage get @storage(不死心臟) @eval(200 - @invamount(不死心臟))
        [
        $medicineBowls = @storamount(藥缽)
        $emptyPotionBottles = @storamount(空瓶)
        $poisonSpores = @storamount(不死心臟)
        $tempMedicineBowls = @invamount(藥缽)
        ]
        # 由隊頻顯示並記錄倉庫材料剩餘量與成品數量
        do p 藥缽尚餘 $medicineBowls 個
        do p 空瓶尚餘 $emptyPotionBottles 個
        do p 不死心臟尚餘 $poisonSpores 個
        do p 鹽酸瓶庫存 @storamount(鹽酸瓶) 個
        pause 1
        do storage close
        release refillCheck
        release pharmacy
}
# 製藥判斷
automacro pharmacy {
        sp > 20
        inventory "鹽酸瓶製作說明書" == 1
        inventory "藥缽" >= 1
        inventory "空瓶" >= 1
        inventory "不死心臟" >= 1
        exclusive 1
        run-once 1
        call {
                do ss 228 10
                do send 8E 01 E0 1B 00 00 00 00 00 00
                release pharmacy
        }
}
回覆

使用道具 舉報

z5975035 當前離線
UID
1605085
熱心
45 值
嘉獎
0 次
違規
0 次
在線時間
28 小時
經驗
29 點
積分
29
精華
0
最後登錄
2013-8-28
閱讀權限
20
註冊時間
2010-12-15
論壇幣
36 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 2Rank: 2
5
z5975035 2012-3-31 20:21:54
已經可以用了謝謝各位歐......感恩
回覆

使用道具 舉報

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


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-9-22 21:34 , Processed in 0.048277 second(s), 18 queries , Memcache On.

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

回頂部
第二步?
第三步?