執行傳鎮之前幫人++跟霸邪的巨集大概要怎麼寫呢?

#################

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 0000
          stop
    :OK
          do chat create " 朱諾8K犬妖9K火洞7K古城6K " 2 0 0880
# 自行修改聊天室內容
          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 = 8,000) goto OK
    if ($a = 9,000) goto OK
    if ($a = 6,000) goto OK
    if ($a = 7,000) 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 == "9,000") goto A
    if ($a == "6,000") goto B
    if ($a == "7,000") goto C
          do warp yuno
          do c 朱諾 傳陣已開，祝您轉生愉快o~(^_^)~o
         # 傳送點一
          goto End
    :A
          do warp ra_fild05
          do c  犬妖 傳陣已開，練功愉快 汪!汪!
# 傳送點二
          goto End
    :B
          do warp glast_01
          do c 古城 傳陣已開，小心邪惡箱子^_^
# 傳送點三
          goto End
    :C
          do warp yuno_fild03
          do c 火洞 傳陣已開，冰死那些小討厭m(ˋ__ˊ)m
# 傳送點四
    :End
          pause 3
    if ($b == @invamount(藍色魔力礦石)) goto Top
# 使用傳陣藍礦未減少回到Top
          call Chat
    }
}


這是我目前使用的巨集
我大概知道要寫
do sp 技能編號 最後交易的人 技能等級
但是我不知道要寫入在哪或者是哪裡出錯了
我有寫出來但是沒辦法執行...

誰來救救我啊>W< ~ 嗚嗚想不出來
是有想過再加入一個
在$a = $.lastMatch2後面插入
$b = $.lastMatch1
在每個do warp XXX之前加上
do sp XX $b 10
但沒辦法成功...

yea252582001 發表於 2013-9-27 20:04
誰來救救我啊>W< ~ 嗚嗚想不出來
是有想過再加入一個
在$a = $.lastMatch2後面插入

妳有沒有留意到 $b = @invamount(藍色魔力礦石) 已經覆蓋了?
還有, 改一下config與timeouts設定, dealAuto 2與ai_dealAuto 5
那麼這個感覺如何?

automacro 交易 {
        console /(.*) 加入 (.*) z 以交易/
        call {
                $target = $.lastMach1
                $zeny = $.lastMach2
                if (@invamount (藍色魔力礦石) < 1) goto cancel1
                if ($zeny != 6,000 || $zeny != 7,000 || $zeny != 8,000 || $zeny != 9,000) goto cancel2
                pause 11
                if ($dealtime = 0) goto overtime
                pause 2
                do chat leave
                pause 2
                call 傳送之陣
                pause 3
                do chat create (古城 6000 火洞 7000 朱諾 8,000 犬妖 9000) [2 0 xxxx]
                $dealtime = 0
                stop
                :cancel1
                do deal no
                pause 2
                do c 不好意思, 我身上沒有藍石無法傳送妳
                stop
                :cancel2
                do deal no
                pause 2
                do c 交易金額錯誤
                stop
                :overtime
                do deal no
                pause 2
                do c 怎麼這麼久還不確認交易?
        }
}

automacro 完成交易 {
        console /完成本交易/
        call {
                $dealtime = $.time
        }
}

macro 傳送之陣 {
        :pos
        $rand = @rand(-4,4)
        if ($rand > -2 && $rand < 2) goto pos
        do sl 27 @eval (@arg("$.pos", 1) + $rand) @eval (@arg("$.pos", 2) + $rand)
        if ($zeny = 6,000) goto glast_01
        if ($zeny = 7,000) goto yuno_fild03
        if ($zeny = 8,000) goto yuno
        if ($zeny = 9,000) goto ra_fild05
        :glast_01
        do warp glast_01
        pause 1
        do c 古城 傳陣已開，小心邪惡箱子^_^
        goto finish
        :yuno_fild03
        do warp yuno_fild03
        pause 1
        do c 火洞 傳陣已開，冰死那些小討厭m(ˋ__ˊ)m
        goto finish
        :yuno
        do warp yuno
        pause 1
        do c 朱諾 傳陣已開，祝您轉生愉快o~(^_^)~o
        goto finish
        :ra_fild05
        do warp ra_fild05
        pause 1
        do c 犬妖 傳陣已開，練功愉快 汪!汪!
        goto finish
        :finish
}

因為文章審核中無法修改
再回一段補充一下
在 do chat leave 之前插一句 do conf dealAuto 1
在 do chat create 那句之後插一句 do conf dealAuto 2

另外每個實際動作之間停頓2秒是為了避免最近新增的因 "超乎異常舉動" 而被停帳