Skript kontroly queues a dhcp serveru

# Omezeni queues na parent, bez omezeni nechte hodnotu "none"
:global parent "none"
# Omezeni ip adres z DHCP serveru, bez omezeni nechte hodnotu "0.0.0.0/0"
:global range "0.0.0.0/0"

# Pomocne promenne
:global found

:foreach ip in=[/ip dhcp-server lease find address in $range] do={
  :set found 0

  :foreach i in=[/queue simple find parent=$parent] do={ 
    :if ([:find [/queue simple get $i target-addresses] ([/ip dhcp-server lease get $ip address]."/32")]!=0) do={
      :set found 1
    }
  }
  :put ([/ip dhcp-server lease get $ip address]." ".$found)
}