好像看到那是公開發言的 而且我想幫客戶放++
我想改成傳送地點用密的 而且傳送失敗要密他再來一次
此外 我的資料夾名稱與同位置資料夾全部都英文名 所以OP會講中文
已更新至最新版
我的巨集腳本如下
automacro a {
console "您現在已在遊戲中"
exclusive 1
call {
if (@invamount(藍色魔力礦石) == 0) goto qk
pause 3
do look 4
do deal no
do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
#a-1 b-2 c-3 d-4 = 聊天室名稱
pause 1
do sit
release all
stop
:qk
do sit
stop
}
}
automacro b {
console "(.*) ((.*)) 向您要求一個交易"
run-once 1
call {
do deal
pause 20
#20秒內不動作取消交易
do deal no
}
}
automacro c {
console "(.*) 加入物品以交易: (.*)"
call {
do deal no
#加入物品取消交易
}
}
automacro d {
console "(.*) 加入 (.*) z 以交易"
run-once 1
call {
$a = $.lastMatch2
if ($a = 2,500) goto bb
if ($a = 2,000) goto bb
if ($a = 3,000) goto bb
if ($a = 1,500) goto bb
#$a = ".*" = 傳陣金額
pause 1
do deal no
#當金額!=你販賣的金額取消交易
stop
:bb
pause 1
do deal
pause 1
do deal
pause 15
do deal no
#輸入金額15秒內未完成交易者取消交易
}
}
automacro f {
console "您 獲得 (.*) zeny."
run-once 1
call {
pause 1
do chat leave
$a = $.lastMatch1
if ($a = 2,500) goto a1
if ($a = 2,000) goto b2
if ($a = 3,000) goto c3
if ($a = 1,500) goto d4
#$a = ".*" = 傳陣金額
:a1
call aa1
#執行macro aa1
stop
:b2
call bb2
stop
:c3
call cc3
stop
:d4
call dd4
}
}
automacro e {
console "交易已取消"
call {
release all
}
}
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 ra_fild05
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
do c [阿巫敦拉草原]左-上可到沙狼區 再往上可進冰洞
call start
stop
:ax
pause 1
call axx
#執行macro axx
}
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 yuno_fild03
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
do c [諾可羅德.火焰洞窟]下方地圖為優配擂斯外
call start
stop
:ax
pause 1
call bxx
}
macro bxx {
call bb2
}
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 rachel
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
do c [阿盧納貝茲教皇國首都.拉赫]上方地圖可達神殿 準他可傳菲音斯(石波or無名島)
call start
stop
:ax
pause 1
call cxx
}
macro cxx {
call cc3
}
macro dd4 {
$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 prontera
#a = 地圖名稱
pause 1
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
do c [米德加茲共和國首都.普隆德拉]
call start
stop
:ax
pause 1
call dxx
}
macro bxx {
call dd4
}
macro start {
if (@invamount(藍色魔力礦石) == 0) goto qk
pause 3
do look 4
do deal no
do chat create "犬妖2500拉赫2000火洞3000中央1500" 2 0 1111
#a-1 b-2 c-3 d-4 = 聊天室名稱
pause 1
do sit
release all
stop
:qk
do sit
stop
} |