定期检查有效pppoe-out数，自动更新PCC标记
脚本：

#脚本开始
 {
 :local status
 :local i "5"
 :local x "0"
 :local y "0"
 :local z "0"
 :set x [:len [/interface pppoe-client find running=yes]]
 :if ($x<$i) do={
 :for ii from=1 to=$i do={
 :set status [/interface get [find name=("pppoe-out".$ii)] running]
 :if ($status=true) do={
 /ip fir man set [find new-connection-mark=$ii] per-connection-classifier=("both-addresses:".$x."/".$y) disable=no;:set y ($y+1)} else={
 /ip fir man set [find new-connection-mark=$ii] disable=yes}}}
 :if ($x=$i) do={
 :set z [:len [/ip fir man find action="mark-connection" disabled=yes chain=prerouting]]
 :if ($z>0) do={
 :for ii from=1 to=$i do={
 /ip fi man set [find new-connection-mark=$ii] per-connection-classifier=("both-addresses:".$x."/".$y) disable=no;:set y ($y+1)}}}}
 #脚本结束

*:local i “5″中的5修改为你ROS中pppoe-out最大条数。
*适合RouterOS版本:3.x 4.x 5.x

效果演示：