{
:local n 0
:local cip
:local cmac
:local cserver
:local cexpire
:foreach i in=[/ip dhcp-server lease find server=dhcp-bridge-wifi] do={
:set cip [/ip dhcp-server lease get $i address]
:set cmac [/ip dhcp-server lease get $i mac-address]
:set cserver [/ip dhcp-server lease get $i server]
:set cexpire [/ip dhcp-server lease get $i expires-after]
:if ([/ip arp find address=$cip mac-address=$cmac]="") do={
##:put ($cip . " " . $cmac . " " . $cserver . " " . $cexpire)
##/ping address=$cip count=2
:set n (n+1)
/ip dhcp-server lease remove $i
}
}
:put "***********************************\r\n$n off line\r\n**************************************\r\n"
}