打城傳陣問題 誰可以幫回答

可以問一下嗎?  我的城戰傳機只有密語才會傳  要如何改成公開評就會傳了  謝謝你們的回答....

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
        }
}

我的一直是公開的~
不過謝謝大大貼出你的~
正好我也可以試試看秘頻的 ^^

把pm改成pubm就可以了(如下
pubm /中/