[原創] 傳送巨集問題

love872942

love872942 發表於 2010-4-9 20:01:26 | 只看該作者回帖獎勵

我想請問  我可以自動開聊天市可是
卻會吃錢給錢都沒反應
之後再重新開啟  就沒辦法在自動開聊天市了
請問世哪裡出錯了呢  我的巨集在下面

###飛機###
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 9527
            stop
      :OK
            do chat create "跳台1萬移動3千新5千" 2 0 9527
# 自行修改聊天室內容
            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 = $.lastMatch1
      if ($a = 10,000) goto OK
      if ($a = 3,000) goto OK
      if ($a = 5,000) goto OK
      if ($a = .*) goto OK
# 自行修改金額
            do deal no
            stop
      :OK
            pause 1
            do deal
            pause 1
            do deal
            pause 10
            do deal no
      }
}
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 == "10,000") goto A
      if ($a == "3,000") goto B
      if ($a == "5,000") goto C
            do warp umbala
# 傳送點一
            goto End
      :A
            do warp mosk_fild02
# 傳送點二
            goto End
      :B
            do warp aldebaran
# 傳送點三
            goto End
      :C
            do warp
# 傳送點四
      :End
            pause 3
      if ($b == @invamount(藍色魔力礦石)) goto Top
# 使用傳陣藍礦未減少回到Top
            do c 傳陣已開啟，若看不到請移動一下
            call Chat
      }
}

chat