Script Adicionar Mac e Comment no acess list pegando do registration

Recentemente resolvi fecha a rede, trabalho com a rede em bridge, e tenho muitas RB,s nos paineis, e estou sofrendo muito com acesso indevido, então montei esse script para adicionar quem esta conectando nas RBs, e depois fechar, deixando navegando só quem e cliente, o script e bom pelo fato de ficar rodando em 5 a 5 minutos, fazer isso manualmente seria uma tortura, segue o Script,

Código :

---

#array na tabela registration
:foreach x in=[/interface wireless registration-table find] do={ 
#contador para verificar se já esta cadastrado ou não    
        :global cont 0;
#armazenando o mac da tabela registration
    :global macaddress [/interface wireless registration-table get $x mac-address]; 
#armazenando o Radio-name para adicionar em comment no acesslist
    :global NomeRadio [/interface wireless registration-table get $x radio-name];
#array na tabela acess-list
        :foreach y in=[/interface wireless access-list find] do={        
#armazenando o mac da tabela acess-list
        :global macadd [/interface wireless access-list get $y mac-address];
#comparando se o mac da tabela registration já exite na tabela acess-list caso exita altera o cont para 1 se não, ele não faz nada
              :if condition=($macaddress=$macadd) do= [:global cont 1;]
        };
#caso não exista ele adicionará a a acess-list
    :if condition=($cont = 0) do=[
    /interface wireless access-list  add mac-address=$macaddress comment=$NomeRadio; 
    ]
};

---

o bom se caso o cliente já tiver cadastrado ele não cadastra novamente!!
só deixar rodando uns dias nas RBs e depois Fechar a rede