由天國marksky提供分享
自動換人物 買箭、換人物做箭筒
#一開始請在外掛上打上 macro start
macro start {
do conf autoTalkCont 0
do conf storageAuto 0
do conf sellAuto 0
do move 66 66 alb2trea
pause 1
do talk @npc (59 69)
pause 1
do talk cont
pause 1
do talk resp 0
pause 2
# 取得倉庫的火箭矢筒數量
$fireQuiver = @storamount(火箭矢筒)
do storage close
pause 1
do move 77 66 alb2trea
}
automacro outOfQuiver {
# 以站立點當做觸發條件,若該點位置有人則可能無法觸發
location alb2trea 77 66
# 下行是控制做多少箭筒的設定,預設為 1000 筒
var fireQuiver <= 1000
run-once 1
call createQuiver
}
macro createQuiver {
do talk @npc (87 65)
pause 1
do store
do store
pause 1
$fireArrows = @invamount(火箭矢)
do buy @store(火箭矢) @eval(10000 - $fireArrows)
pause 1
do buy @store(火箭矢) 10000
pause 1
do move 66 66 alb2trea
pause 1
do talk @npc (59 69)
pause 1
do talk cont
pause 1
do talk resp 0
pause 2
do storage add @inventory(火箭矢)
pause 1
do storage close
pause 1
do move 77 66 alb2trea
pause 1
do conf char 1
# 修改成換箭矢筒的人物(最左邊是0,中間是1,最右邊是2)
pause 1
do relog
release outOfQuiver
}
automacro change {
location payon
run-once 1
call {
$i = 10000
# 看你身上能拿多少火箭矢(以500為倍數)
do move 170 100 payon
pause 1
do talk @npc (181 104)
pause 1
do talk cont
pause 1
do talk resp 1
pause 2
do storage add @inventory(火箭矢筒)
pause 1
$fireQuiver = @storamount(火箭矢筒)
do storage get @storage(火箭矢) $i
pause 1
do storage close
pause 1
do move 11 126 payon_in01
pause 1
do conf autoTalkCont 1
pause 2
do talk @npc (5 134)
pause 4
do talk resp 4
pause 2
do talk resp 0
pause 2
do talk resp 0
pause 1
do conf autoTalkCont 0
pause 2
do move 170 100 payon
pause 1
do conf char 2
# 修改成買箭矢的人物(最左邊是0,中間是1,最右邊是2)
pause 1
do relog
release change
}
}