製藥高手幫看看火煙問題

k88084

本帖最後由 k88084 於 2013-5-12 17:09 編輯

約莫只會做10次
之後就會出現紅字
就不做了

automacro initiate {

      run-once 1

      call {

            # 以下設定卡普拉所在座標，可根據不同的卡普拉 NPC 座標作更改

            $npcLocation = 203 123

            # 其他想要初始化設定什麼的可以在下面新增

            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

            # 一組材料重 7

            do eval $::Macro::Data::varStack{controlAmount} = int(($::char->{'weight_max'} * 0.5 - $::char->{'weight'}) / 7)

            # $controlAmount = @eval(int(($.maxweight * 0.5 - $.weight) / 7))

            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

      inventory "透明之布" >= 0

      # 以下為倉庫物品存量判斷

      var medicineBowls > 1

      var Alchol > 1

      var emptyBOTtles > 1

      var TransparentCloth > 1

      run-once 1

      call start

}

# 補貨

macro start {

      lock pharmacy

      pause 1

      do talk @npc ($npcLocation)

      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(285 - @invamount(藥缽))

      do storage get @storage(空瓶) @eval(285 - @invamount(空瓶))

      do storage get @storage(酒精) @eval(285 - @invamount(酒精))

      do storage get @storage(透明之布) @eval(285 - @invamount(透明之布))
      [

      $medicineBowls = @storamount(藥缽)

      $emptyBottles = @storamount(空瓶)

      $Alchol = @storamount(酒精)

      $TransparentCloth = @storamount(透明之布)

      $tempMedicineBowls = @invamount(藥缽)

      ]

      # 由隊頻顯示並記錄倉庫材料剩餘量與成品數量

      do p 藥缽尚餘 $medicineBowls 個

      do p 空瓶尚餘 $emptyBottles 個

      do p 酒精尚餘 $Alchol 個

      do p 透明之布尚餘 $TransparentCloth 個

      do p 火煙瓶庫存 @storamount(火煙瓶) 個

      pause 1

      do storage close

      release refillCheck

      release pharmacy

}

# 製藥判斷

automacro pharmacy {

      sp > 20

      inventory "火煙瓶製作說明書" == 1

      inventory "藥缽" >= 1

      inventory "空瓶" >= 1

      inventory "酒精" >= 1

      inventory "透明之布" >= 1

      exclusive 1

      run-once 1

      call {

            do ss 228 10

            do send 8E 01 DF 1B 00 00 00 00 00 00

            release pharmacy

      }

}

外掛聯合國

[發問] 製藥高手幫看看火煙問題