本帖最後由 29322255 於 2013-7-26 23:40 編輯 事隔三年,再度重寫一個飛機場巨集
巨集裡面包括,加速,天賜,傳送等功能
如果有問題,皆可傳訊息給我
若有幫助,麻煩請幫回覆 ^^
automacro b {
console /(.*) (.*) (.*) ((.*)) 向您要求一個交易/ #
call {
$w = $.lastMatch2
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 /You gained (.*) zeny./
call {
pause 1
$a = $.lastMatch1
if ($a = 1,101) goto a1
if ($a = 1,102) goto b2
if ($a = 1,103) goto c3
#$a = ".*" = 傳陣金額
:a1
$ta = 0;
call aa1 #執行macro aa1
stop
:b2
$ta = 1;
call aa1
stop
:c3
$ta = 2;
call aa1
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))
pause 1
do c $ta
do sp 29 $w 10
pause 1
do sp 34 $w 10
pause 1
do sl 27 $x0 $y0
pause 1
do warp $ta
#a = 地圖名稱
pause 2
$aa2 = @invamount(藍色魔力礦石)
#施放傳送之陣"後"的藍色魔力礦石數量
if ($aa1 == $aa2) goto ax
#當施放傳送之陣前後藍色魔力礦石相等判定傳送失敗跳至:ax
stop
:ax
pause 1
call axx
#執行macro axx
stop
}
macro axx {
call aa1
#執行macro aa1
} |