r0s 多角本生成器

zouguoluguoabc

:local assign-address\r\n:local new-address\r\n:local status\r\n:local x\r\n:set x 3  \r\n:for i from=1 to=$x do={\r\n:set status [/interface get [/interface find  name=(\"pppoe-out\" . $i)] running] \r\n:if ($status=true) do={\r\n:set new-address [/ip address get [/ip address find dynamic=yes interface=(\"pppoe-out\" . $i)] address]\r\n:set new-address [:pick $new-address 0 [:find $new-address \"/\"]]\r\n:set assign-address [/ip address get [/ip address find dynamic=no interface=(\"pppoe-out\" . $i)] address]\r\n:set assign-address [:pick $assign-address 0 [:find $assign-address \"/\"]]\r\n:if ($assign-address != $new-address) do={\r\n/ip address set [/ip address find comment=(\"adsl\" . $i)] address=$new-address network=$new-address broadcast=$new-address\r\n/ip route set [/ip route find comment=(\"adsl\" . $i)] gateway=$new-address\r\n}\r\n}\r\n}