Miktoriku WOL script

Miktoriku WOL script.

1. vaja muuta fail, praegusel juhul on selleks mac.txt (mac.txt failis on vaja kirja panna arvuti mac`id ja viimane rida peab jääma tühjaks).
2. vaja muuta ka interface, praegusel juhul on see ether1-master (see muuda selliseks mis on sinu mikrotiku interface).

:global content [/file get [/file find name=mac.txt] contents] ;
:global contentLen [ :len $content ] ;

:global lineEnd 0;
:global line “”;
:global lastEnd 0;

:do {
:set lineEnd [:find $content “\r\n” $lastEnd ] ;
:set line [:pick $content $lastEnd $lineEnd] ;
:set lastEnd ( $lineEnd + 2 ) ;

:local tmpArray [:toarray $line] ;
:if ( [:pick $tmpArray 0] != “” ) do={
:put $tmpArray;
/tool wol interface=ether1-master mac=[:pick $tmpArray 0];
#:delay 2
}
} while ($lineEnd < $contentLen)