#傳送
automacro pm0 {
        pm /吉芬旅館/
        call {
                if (@invamount(藍色魔力礦石) == 0) goto outOfBlueGemStone
                        $x = @arg("$.pos", 1)
                        $y = @arg("$.pos", 2)
                        $y2 = @eval($y + 1)
                        do sl 27 $x $y2
                        pause 1
                        do warp 0
                        do c 離我一格距離,擋住會放不出來
                        do c 現在的傳送點是「吉芬旅館」
                        goto end
                :outOfBlueGemStone
                        pause 1
                        do c 沒藍石了...
                :end
        }
}
automacro warpPortal1 {
        pm /中/
        call {
                if (@invamount(藍色魔力礦石) == 0) goto outOfBlueGemStone
                        $x = @arg("$.pos", 1)
                        $y = @arg("$.pos", 2)
                        $y2 = @eval($y - 1)                       
                        do sl 27 $x $y2
                        pause 1
                        do warp 1
                        do c 離我一格距離,擋住會放不出來
                        do c 現在的傳送點是「中7」
                        goto end
                :outOfBlueGemStone
                        pause 1
                        do c 沒藍石了...
                :end
        }
}
automacro warpPortal2 {
        pm /斐/
        call {
                if (@invamount(藍色魔力礦石) == 0) goto outOfBlueGemStone
                        $x = @arg("$.pos", 1)
                        $y = @arg("$.pos", 2)
                        $x2 = @eval($x + 1)                       
                        do sl 27 $x2 $y
                        pause 1
                        do warp 2
                        do c 離我一格距離,擋住會放不出來
                        do c 現在的傳送點是「斐9」
                        goto end
                :outOfBlueGemStone
                        pause 1
                        do c 沒藍石了...
                :end
        }
}
automacro warpPortal3 {
        pm /新/
        call {
                if (@invamount(藍色魔力礦石) == 0) goto outOfBlueGemStone
                        $x = @arg("$.pos", 1)
                        $y = @arg("$.pos", 2)
                        $x2 = @eval($x - 1)                       
                        do sl 27 $x2 $y
                        pause 1
                        do warp 3
                        do c 離我一格距離,擋住會放不出來
                        do c 現在的傳送點是「新7」
                        goto end
                :outOfBlueGemStone
                        pause 1
                        do c 沒藍石了
                :end
        }
}

arrow
arrow
    全站熱搜

    aaa1314 發表在 痞客邦 留言(0) 人氣()