收款卡住了巨集...請求大大幫助

lkmbvcchat

我的巨集，  收款了不會起來 = =  好難過  也不會傳送= =
他就坐在那裏動也不動 ~ 收了我的錢就這樣  = = 坐在那邊無所事事~"~  生氣 :((
好無奈哦 !! 求大大幫我解開我的答案好嗎 :D
automacro a {
      console /您現在已在遊戲中/
      call {
            pause 3
            if (@invamount(藍色魔力礦石) == 0) goto qk
                              #當藍色魔力礦石=0時qk= =
            do chat create "米糕4001/犬妖3002/冰洞4003/莫斯科3004 請自行交易" 2 0 4528
                              #a-1 b-2 c-3 d-4 = 聊天室名稱
            pause 1
            do sit
            stop
      :qk

            do sit
            stop
      }
}
automacro b {
      console /(.*) ((.*)) 向您要求一個交易/
      call {

            do deal
            pause 15

                              #15秒內不動作取消交易

            do deal no
            stop

      }

}

automacro c {
      console /(.*) 加入物品以交易: (.*)/
      call {
                              #加入物品取消交易
            do deal no
            stop
   }
}
automacro d {
      console /(.*) 加入 (.*) z 以交易/
      call {
      $a = $.lastMatch2
      if ($a = 4,001) goto bb
      if ($a = 3,002) goto bb
      if ($a = 4,003) goto bb
if ($a = 3,004) goto bb
            #$a = ".*" = 傳陣金額
      pause 1
            #當金額!=你販賣的金額取消交易
      do deal no
      stop
:bb
      pause 1
do deal
pause 1
do deal
      pause 10
      do deal no


            #輸入金額10秒內未完成交易者取消交易

      stop
      }
}

automacro f {
   console /您獲得了 (.*) zeny/
      call {
  $asd = 0
  pause 1
            do chat leave
            $a = $.lastMatch1
      if ($a = 4,001) goto a1
      if ($a = 3,002) goto b2
      if ($a = 4,003) goto c3
  if ($a = 3,004) goto d4

                              #$a = ".*" = 傳陣金額
                     :a1
                              call aa1
                                                            #執行macro aa1
                              stop
                     :b2
                              call bb2
                              stop
                     :c3
                              call cc3
                              stop
                     :d4
                              call dd4
                              stop

      }
}

automacro k {
console /LXCollect ((.*)) 向您要求一個交易/
      call {
         if ($asd = 0) goto asa
      do deal no
      stop
:asa
            if ($a = 4,001) goto a1
            if ($a = 3,002) goto b2
            if ($a = 4,003) goto c3
            if ($a = 3,004) goto d4
:a1
                              call aa1
                                                            #執行macro aa1
                              stop
                     :b2
                              call bb2
                              stop
                     :c3
                              call cc3
                              stop
                     :d4
                              call dd4
                              stop
      }
}

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 louyang
            #a = 地圖名稱
      pause 1
      $aa2 = @invamount(藍色魔力礦石)
            #施放傳送之陣"後"的藍色魔力礦石數量
      if ($aa1 == $aa2) goto ax
            #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
call start
stop
      :ax
      pause 1
      call axx
            #執行macro axx

      stop
      }
}
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 ra_fild05
            #a = 地圖名稱
      pause 1
      $aa2 = @invamount(藍色魔力礦石)
            #施放傳送之陣"後"的藍色魔力礦石數量
      if ($aa1 == $aa2) goto ax
            #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
call start
stop
      :ax
      pause 1
      call bxx
            #執行macro axx

      stop
      }
}
macro bxx {
      call bb2
            #執行macro aa1
}

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 ra_fild01
            #a = 地圖名稱
      pause 1
      $aa2 = @invamount(藍色魔力礦石)
            #施放傳送之陣"後"的藍色魔力礦石數量
      if ($aa1 == $aa2) goto ax
call start
stop
      :ax
      pause 1
      call cxx
            #執行macro axx

      stop
      }
}
macro cxx {
call cc3
   #  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 mosk_fild02
            #a = 地圖名稱
      pause 1
      $aa2 = @invamount(藍色魔力礦石)
            #施放傳送之陣"後"的藍色魔力礦石數量
      if ($aa1 == $aa2) goto ax
            #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
call start
stop
      :ax
      pause 1
      call dxx
            #執行macro axx

      stop
      }
}
macro dxx {
      call dd4
            #執行macro aa1
}
macro start {
$asd = 1
do deal no
pause 1
do chat create "米糕4001/犬妖3002/冰洞4003/莫斯科3004 請自行交易" 2 0 4528

pause 1
do sit
stop
}

外掛聯合國

[發問] 收款卡住了巨集...請求大大幫助