飛機場巨集沒有動作

小弟在別的POST購買了飛機場

實地運作後 發現創了聊天室 用分身給了設定的金額卻不會動作

可以幫我看看是不是哪裡錯了?

automacro a {
console /您現在已在遊戲中/
exclusive 1
call {
   pause 2
   if (@invamount(藍色魔力礦石) == 0) goto qk
   #當藍色魔力礦石=0時qk=   =
   do chat create "優沛1100/古城1200/繆拉1300/克魔島1400" 2 0 111111
   #a-1 b-2 c-3 d-4 = 聊天室名稱,金額與傳點自行更改
  do conf dealAuto 0
   #預設為掛掛手動交易,外掛自行deal指令才會付錢買礦
  do look 4
   do sit
   #朝向正面跪坐是禮貌
  $stat1 = 0
   $stat2 = 0
   $stat3 = 0
   $stat4 = 0
   #統計起始值
stop
:qk
   do chat create "沒礦中,可交易藍礦,一顆收480,礦與傳送不得同時交易,否則吃掉錢" 2 0 111111
   沒礦時所開的聊天室,金額可以自行更改,但要與automacro c內的$bzz相同,並注意bzz下所說的內容
  do conf dealAuto 0
   #預設為掛掛手動交易,外掛自行deal指令才會付錢買礦
  do sit
   do look 4
   #朝向正面跪坐是禮貌
stop
}
}


automacro b {
console /(.*) ((.*)) 向您要求一個交易/
call {
   do deal
   pause 15
   do deal no
   #15秒內不動作取消交易
stop
}
}

automacro c {
console /(.*) 加入物品以交易: (.*) x (.*)/
call {
   $p1 = $.lastMatch1
   $i1 = $.lastMatch2
   $m1 = $.lastMatch3
   $aa1 = @invamount(藍色魔力礦石)
   $mu = @eval(@eval($.maxweight/2 -$.weight)/ 3)
   $bzz = @eval($m1*480)
   #藍礦一顆跟對方買480,小賺一點點錢,可自行調整,太少怕別人不賣,太多自己會虧,因為主要是傳送不是賺這差價
  if ($i1 = 藍色魔力礦石 && $m1 <= $mu) goto bsadd
   do pm $p1 給錯了!!請給我少於$mu顆的藍礦,或傳輸所需費用,其餘物品不收
  do deal no
   #以上為只交易藍礦,並限制交易後，身上負重不大於總負重的一半
  stop
:bsadd
   do deal add z $bzz
   do deal
   do conf dealAuto 3
   #收了礦付錢後之後改為自動交易
  pause 15
   do deal no
   do conf dealAuto 0        
#15秒內未完成交易者取消交易,並改回手動交易
stop
}
}

automacro cfinish {
console /物品已加入背包/
call {
   do chat leave
   call start
   #收完礦後重開聊天室
stop
}
}

automacro d {
console /(.*) 加入 (.*) z 以交易/
call {
   $n = $.lastMatch1
   $a = $.lastMatch2
   if ($a = 1,400) goto bb
   if ($a = 1,100) goto bb
   if ($a = 1,300) goto bb
   if ($a = 1,200) goto bb
   if ($a = 111) goto cc
   #$a =傳陣金額時去bb
   #$a =查看統計時cc,用交易的金額觸發統計報告,可以由他人或自己別隻角色來查看掛賣的數據結果
  #以上金額全由你自行設定,記得每千位數要一個",";且聊天室的金額要與此相同
  do deal no
#當金額不等於你販賣的金額取消交易
stop
:bb
   do conf dealAuto 3
   #收了錢之後改為自動交易
  pause 15
   do deal no
   do conf dealAuto 0   
#輸入金額15秒內未完成交易者取消交易,並改回手動交易
stop
:cc
   do pm $n 克 $stat1 次,優 $stat2 次,謬 $stat3 次,古 $stat4 次
  do deal no
   #密頻告之統計結果,並取消交易
stop
}
}

macro cal {
log 克 $stat1 次,優 $stat2 次,謬 $stat3 次,古 $stat4 次
#也可以自行用macro觸發統計,在黑窗上輸入"macro cal"就會顯示在飛機場的黑窗上
}

automacro f {                                

console /您 獲得 (.*) zeny./
exclusive 1
call {
   $a = $.lastMatch1
   do deal no
   do chat leave
   do deal no
   do c 等等!幫$n加速天賜後再進去
  do deal no
:top
   $aa1 = @invamount(藍色魔力礦石)
   #施放傳送之陣"前"的藍色魔力礦石數量
  $x = @arg("$.pos", 1)
   $y = @arg("$.pos", 2)
   $x0 = @eval($x - @rand(1,3))
   $y0 = @eval($y - @rand(1,3))
   do deal no
   do sl 27 $x0
$y0
   do deal no
   if ($a = 1,400) goto a1
   if ($a = 1,100) goto b2
   if ($a = 1,300) goto c3
   if ($a = 1,200) goto d4
   #$a = ".*" = 傳陣金額
:a1
   do warp comodo
   #第一個傳點地圖名稱,依照自己要賣的地點自行更改以下類推
  do deal no
   $aa2 = @invamount(藍色魔力礦石)
   #施放傳送之陣"後"的藍色魔力礦石數量
  if ($aa1 == $aa2) goto fa
   #當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:top後再傳一次
  $stat1 = @eval($stat1+1)
   #統計傳點用,此點每傳一次加一
  do deal no
   goto end
:b2
   do warp yuno_fild11
   do deal no
   $aa2 = @invamount(藍色魔力礦石)
   if ($aa1 == $aa2) goto fa
   $stat2 = @eval($stat2+1)
   do deal no
   goto end
:c3
   do warp mora
   do deal no
   $aa2 = @invamount(藍色魔力礦石)
   if ($aa1 == $aa2) goto fa
   $stat3 = @eval($stat3+1)
   do deal no
   goto end
:d4
   do warp louyang
   do deal no
   $aa2 = @invamount(藍色魔力礦石)
   if ($aa1 == $aa2) goto fa
   $stat4 = @eval($stat4+1)
   do deal no
   goto end
:fa
   c 傳送失敗,再來一次,請勿站立在傳點上等候
  #傳送失敗告知買家等等再來一次
  do deal no
   goto top
:end
   do sp 34 @player ($n) 10
   do deal no
   do sp 29 @player ($n) 10
   do deal no
   #幫加速與天賜
  do c $n買的傳陣已開，如果看不見傳陣請移動一下或重登，謝謝您!
   #禮貌的回應,並告知是誰買的點,避免有人誤近傳點
  call start
   #傳完之後,呼叫開聊天室巨集
stop
}
}

macro start {
   do deal no      
if (@invamount(藍色魔力礦石) == 0) goto qk
   do chat create "優沛1100/古城1200/繆拉1300/克魔島1400" 2 0 111111
   #聊天室名稱,金額與傳點需與automacro a相同
  do deal no
   do conf dealAuto 0
   do deal no
   do look 4
   do sit
   pause 1
   do deal no
   stop
:qk
   do deal no
   do chat create "沒礦中,可交易藍礦,一顆收480,礦與傳送不得同時交易,否則吃掉錢" 2 0 111111
   do deal no
   do conf dealAuto 0
   do deal no
   do sit
   do deal no
   #解釋請參考automacro a
   stop
}