[發問] 傳送之陣巨集

天兵寶寶

天兵寶寶 發表於 2011-2-10 00:15:08 | 只看該作者回帖獎勵

再來怎麼做??

automacro a {
console /您現在已在遊戲中/
call {
      if (@invamount(藍色魔力礦石) == 1) goto qk
                  #當藍色魔力礦石=0時qk= =
      pause 1
      do chat create "拉赫3000 莫3800 石波2400 " 2 0 787878
                  #a-1 b-2 c-3 d-4 = 聊天室名稱
      pause 1
      do sit
      stop
:qk
      do c 沒有藍石了非常抱歉請勿再交易
      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 = 1,101) goto bb
if ($a = 1,102) goto bb
if ($a = 1,103) 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 = 1,101) goto a1
      if ($a = 1,102) goto b2
      if ($a = 1,103) goto c3

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

}
}

automacro k {
console /LXCollect ((.*)) 向您要求一個交易/
call {
      if ($asd = 0) goto asa
do deal no
stop
:asa
      if ($a = 1,101) goto a1
      if ($a = 1,102) goto b2
      if ($a = 1,103) goto c3
  :a1
                  call aa1 }
                                       #執行macro aa1
                  stop
            :b2
                  call bb2 }
                  stop
            :c3
                  call cc3 }
                  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 rachel
      #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 mosk_fild02
      #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 veins
      #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 aa1
}
macro start {
$asd = 1
do deal no
pause 1
do chat create "拉赫3000 莫3800 石波2400" 請自行交易" 2 0 4528
pause 1
do sit
stop
}

chat

收藏0 分享讚0 幹0 分享分享

相關POST

回覆

使用道具舉報

[X] 2011-2-10 17:44:12

那是賣傳陣的巨集設定
把那個設定貼在control/macros.txt裡
要從macros.txt裡的第二行開始設定,第一行外掛會忽略
請先確認已經安裝巨集套件(plugins資料夾)
接著就可以試試看會不會執行了

回覆

使用道具舉報

天兵寶寶 2011-2-10 17:55:26

我知道= = 但是我應該是只有改好一半金錢部分就....

回覆

使用道具舉報

[X] 2011-2-10 18:13:04

把金錢用取代功能改掉就好了
3,000取代1,101
3,800取代1,102
2,400取代1,103

回覆

使用道具舉報

5層

天兵寶寶 2011-2-10 18:17:21

兩個都改嗎?

3,000取代1,101
3,800取代1,102
2,400取代1,103

回覆

使用道具舉報

6層

[X] 2011-2-10 18:20:42

全都要改阿
不然外掛怎麼判斷金額正不正確

回覆

使用道具舉報

7層

天兵寶寶 2011-2-10 19:32:22

我改完兩個之後他只收完錢就不動做了其他看不懂要打多少錢 ==
3,000取代1,101
3,800取代1,102
2,400取代1,103

回覆

使用道具舉報

8層

[X] 2011-2-11 02:31:45

我修改了一些有問題的地方還有金額,你在試試吧
automacro a {
console /您現在已在遊戲中/
call {
      if (@invamount(藍色魔力礦石) == 1) goto qk
                  #當藍色魔力礦石=0時qk= =
      pause 1
      do chat create "拉赫3000 莫3800 石波2400 " 2 0 787878
                  #a-1 b-2 c-3 d-4 = 聊天室名稱
      pause 1
      do sit
      stop
:qk
      do c 沒有藍石了非常抱歉請勿再交易
      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 = 3,000) goto bb
if ($a = 3,800) goto bb
if ($a = 2,400) 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 = 3,000) goto a1
      if ($a = 3,800) goto b2
      if ($a = 2,400) goto c3

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

}
}

automacro k {
console /LXCollect ((.*)) 向您要求一個交易/
call {
      if ($asd = 0) goto asa
do deal no
stop
:asa
      if ($a = 3,000) goto a1
      if ($a = 3,800) goto b2
      if ($a = 2,400) goto c3
  :a1
                  call aa1
                                       #執行macro aa1
                  stop
            :b2
                  call bb2
                  stop
            :c3
                  call cc3
                  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 rachel
      #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 mosk_fild02
      #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 veins
      #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 aa1
}
macro start {
$asd = 1
do deal no
pause 1
do chat create "拉赫3000 莫3800 石波2400" 請自行交易" 2 0 4528
pause 1
do sit
stop
}

回覆

使用道具舉報

9層

天兵寶寶 2011-2-11 11:26:18

我地圖上有點變動我成這樣還是沒辦法只會收錢不會傳

automacro a {
console /您現在已在遊戲中/
call {
      if (@invamount(藍色魔力礦石) == 1) goto qk
                  #當藍色魔力礦石=0時qk= =
      pause 1
      do chat create "拉赫3000 金波2400石波2200 " 2 0 787878
                  #a-1 b-2 c-3 d-4 = 聊天室名稱
      pause 1
      do sit
      stop
:qk
      do c 沒有藍石了非常抱歉請勿再交易
      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 = 3,000) goto bb
if ($a = 2,400) goto bb
if ($a = 2,200) 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 = 3,000) goto a1
      if ($a = 2,400) goto b2
      if ($a = 2,200) goto c3

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

}
}

automacro k {
console /LXCollect ((.*)) 向您要求一個交易/
call {
      if ($asd = 0) goto asa
do deal no
stop
:asa
      if ($a = 3,000) goto a1
      if ($a = 3,800) goto b2
      if ($a = 2,400) goto c3
  :a1
                  call aa1
                                       #執行macro aa1
                  stop
            :b2
                  call bb2
                  stop
            :c3
                  call cc3
                  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 rachel
      #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 ein_fild09
      #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 veins
      #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 aa1
}
macro start {
$asd = 1
do deal no
pause 1
do chat create "拉赫3000 莫3800 石波2400" 請自行交易" 2 0 4528
pause 1
do sit
stop
}

回覆

使用道具舉報

10層

天兵寶寶 2011-2-11 12:50:36

好像還是沒辦法我地圖有更動而已有關係? 他只收錢不會傳

回覆

使用道具舉報

12 / 2 頁下一頁

外掛聯合國

[發問] 傳送之陣巨集

相關POST