關於小服飛機的巨集

srboss

抱歉打擾各位大大了，經過一整天爬文，試了好幾篇文章所提供的巨集，
搞到最後自己有點覺得無能為力了QQ
不確定是否是版本問題，我使用的是Openkore8479

本來使用另外的巨集，結果不能開聊天室，
又去爬了另外的巨集，結果交易到最後確認會取消交易~"~
現在最後的問題是，給了錢不會施放傳陣OTZ...
只希望知道自己是哪裡用錯了..

另外開了黑窗上會顯示：
'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消

不知道是不是這個原因...

以下是我目前所使用的macros巨集：

automacro Start {
console /您現在已在遊戲中/
exclusive 1
call {
pause 3
do conf ignoreAll 1
call Chat
}
}
macro Chat {
do sit
do look 4
if (@invamount(藍色魔力礦石) > 0) goto OK
      do chat create "休息中" 2 0 1111
      stop
:OK
      do chat create "火洞3000/毀葛4000/蟻洞2000/古城2500" 2 0 1111
# 自行修改聊天室內容
         do deal no
# 避免在使用傳陣到創聊天室之間有人點交易
}
automacro Deala {
console /(.*) ((.*)) 向您要求一個交易/
inventory "藍色魔力礦石" > 0
call {
do deal
pause 15
do deal no
}
}
automacro Dealb {
console /(.*) 加入物品以交易: (.*)/
call {
do deal no
}
}
automacro Dealc {
console /(.*) 加入 (.*) z 以交易/
call {
$a = $.lastMatch2
if ($a = 3,000) goto OK
if ($a = 4,000) goto OK
if ($a = 2,000) goto OK
if ($a = 2,500) goto OK
# 自行修改金額
      do deal no
      stop
:OK
      pause 1
      do deal
      pause 1
      do deal
      pause 10
      do deal no
stop
}
}

automacro Warp {
console /您獲得了 (.*) zeny/
exclusive 1
call {
$b = @invamount(藍色魔力礦石)
do chat leave
:Top
$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 2
if ($a == "3,000") goto a1
if ($a == "4,000") goto b2
if ($a == "2,000") goto c3
if ($a == "2,500") 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", 1)
$x0 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
      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 Chat
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", 1)
$x0 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
do sl 27 $x0 $y0
pause 1
do warp hugel
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
  do c 【毀葛】飛機已開，一路順風並祝您遊戲愉快
#傳陣結束,說話
call Chat
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 cmd_fild08
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
  do c 【蟻洞】飛機已開，一路順風並祝您遊戲愉快
#傳陣結束,說話
call Chat
stop
:ax
pause 1
call cxx
#執行macro axx

stop
}
}
macro cxx {
call cc3
# call cc3
#執行macro aa1
}

macro dd4 {
$aa1 = @invamount(藍色魔力礦石)
#施放傳送之陣"前"的藍色魔力礦石數量
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 1)
$x0 = @eval($x - @rand(1,2))
$y0 = @eval($y - @rand(1,2))
do sl 27 $x0 $y0
pause 1
do warp glast_01
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
  do c 【古城】飛機已開，一路順風並祝您遊戲愉快
#傳陣結束,說話
call Chat
stop
:ax
pause 1
call axx
#執行macro axx

stop
}
}
macro dxx {
call dd4
#執行macro aa1
}

求解..謝謝各位！QQ

外掛聯合國

[發問] 關於小服飛機的巨集