p04210421 原創大大分享
-------------------------------------------------------------------------------------------------------------------------------------------------
*******************************************************該注意的地方********************************************************************
巨集名稱可能會有衝突(重複),但是應該不會,使用前請先確認
巨集盡量精簡省macros容量(包含中文對照),如需要請特別說
依照巨集難易、原創...等 都會有不同的限制(限制會隨時間而降低)
請注意標題更新日期
##########################################################################################
掛送巨集:修改注意:此巨集復活點為吉芬,練功點為冰洞1F
特色:打手沒補品會自動傳送回城補給,祭師死亡會自動回去,打手死亡祭師也會回程再次傳回...
祭師方面幾乎不用更動,手動時也可以直接使用 ps:似乎還有些問題尚未解決,日後更新
補血迴圈:此巨集是以04來觸發補血，04或04 1都是補1次，04 X=補X次
##########################################################################################
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#自動傳送回城、練功 (祭師)
automacro Question {
location geffen
timeout 30
run-once 1
call {
do p 掛哪?
release Question-1
}
}
automacro Question-1 {
console /is not online/
run-once 1
call {
release Question
}
}
automacro Hangdeliver {
party /掛送 (.*) (.*)/
inventory "藍色魔力礦石" > 0
exclusive 1
call Hangdeliver-1
}
macro Hangdeliver-1 {
$a = $.lastMatch1
$b = $.lastMatch2
if ($b == 中) goto one
if ($b == 吉) goto two
if ($b == 斐) goto three
if ($b == 朱) goto four
if ($b == 夢) goto five
if ($b == 鐘塔) goto six
if ($b == 商人城) goto seven
if ($b == 剛) goto eight
if ($b == 金) goto nine
if ($b == 西歐) goto ten
if ($b == 火洞) goto eleven
if ($b == 火山) goto end
if ($b == 冰) goto thirteen
if ($b == 無名) goto
if ($b == 古城) goto
:one
$b1 = prontera
call Hangdeliver-2
stop
:two
$b1 = geffen
call Hangdeliver-2
stop
:three
$b1 = payon
call Hangdeliver-2
stop
:four
$b1 = yuno_fild04
call Hangdeliver-2
stop
:five
$b1 = morocc
call Hangdeliver-2
stop
:six
$b1 = aldebaran
call Hangdeliver-2
stop
:seven
$b1 = alberta
call Hangdeliver-2
stop
:eight
$b1 = lighthalzen
call Hangdeliver-2
stop
:nine
$b1 = lighthalzen
call Hangdeliver-2
stop
:ten
$b1 = gef_fild10
call Hangdeliver-2
stop
:eleven
$b1 = yuno_fild03
call Hangdeliver-2
stop
:twelve
$b1 =
call Hangdeliver-2
stop
:thirteen
$b1 = ra_fild01
call Hangdeliver-2
stop
:fourteen
$b1 =
call Hangdeliver-2
stop
:fifteen
$b1 = glast_01
call Hangdeliver-2
stop
:end
stop
}
macro Hangdeliver-2 {
$i = @invamount(藍色魔力礦石)
$x = @arg("$.pos", 1)
$y = @arg("$.pos", 2)
$x0 = @eval($x - @rand(1,3))
$y0 = @eval($y - @rand(1,3))
if ($a == "自來") goto one1
if ($a == "兩人") goto two1
:one1
do sl 27 $x0 $y0
pause 1
do warp $b1
$i1 = @invamount(藍色魔力礦石)
if ($i == $i1) goto reset
do move $x0 $y0
do conf follow 1
release Question
stop
:two1
do p move $x $y
do sl 27 $x0 $y0
pause 1
do warp $b1
$i1 = @invamount(藍色魔力礦石)
if ($i == $i1) goto reset
do p move $x0 $y0
pause 1
do move $x0 $y0
do conf follow 1
release Question
stop
:reset
call reset
}
macro reset {
call Hangdeliver-2
}
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#自動傳送回城、練功 (打手)
automacro storageAuto {
location geffen
inventory "瑪絲黛拉果實" < 100
exclusive 1
run-once 1
call {
do conf storageAuto 1
do conf attackAuto 2
release storageAuto
}
}
#automacro storageAuto-1 {
location geffen
inventory "瑪絲黛拉果實" > 300
exclusive 1
run-once 1
call {
do conf storageAuto 0
do conf attackAuto 2
do p 掛送 兩人 冰
release Response
release storageAuto
}
}
automacro Response {
party /掛哪?/
inventory "瑪絲黛拉果實" > 100
exclusive 1
call {
$a = $.map
if ($a == "geffen") goto one
if ($a == "ra_fild01") goto two
:one
do conf storageAuto 0
do conf attackAuto 2
do p 掛送 兩人 冰
do conf route_randomWalk 2
release storageAuto
:two
do p 掛送 自來 冰
}
}
automacro gohome1 {
location ice_dun01
aggressives = 0
exclusive 1
run-once 1
call {
lock gohome
pause 1
release gohome
}
}
automacro gohome {
location ice_dun01
inventory "瑪絲黛拉果實" < 100
aggressives = 0
timeout 30
run-once 1
exclusive 1
call {
do conf route_randomWalk 0
do conf attackAuto 0
do p 掛送 兩人 吉
release gohome
}
}
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
automacro 幫組隊補血 {
party /0(.*\d) (.*\d)/, 5
exclusive 1
call bloodtonic
}
macro bloodtonic {
$a = $.lastMatch2
if ($.lastMatch1 != 4) goto zero
if ($.lastMatch1 == 4) goto one
:zero
do p 錯誤指令 已停止補血
stop
:one
$i = 1
while ($i <= $a) as loop
do sp 28 $.lastparty
pause 0.7
$i++
end loop
stop
}
留言列表
