Redirect web during network failure

#Skript na pøesmìrování neplatièù
# pro MikroTik 2.9.X
# Autor: Roman Ševčík
# Poznámka (Tomáš Dulík): Skript pingá na adresu zadanou v proměnné "ip"
# Pokud je brána nedostupná, aktivuje pravidlo v tabulce NAT, které má 
# v komentáři označení "redirectDNS"
# Toto pravidlo zde není uvedeno, námět pro vylepšení: pokud pravidlo nenajde,
# skript by si jej mohl sám vytvořit

:local time-on
:local time-gw
#:local end
# IP adresa zarizeni v uvozovkach
:local ip "10.143.18.1"

# pocet pingu
:local count 5

#Èas po který budu zobrazovat hlasku o nedostupnosti
:set time-on 1m

#Èas za jak dlouho se bude testovat dostupnost brany
:set time-gw 1m

#Pøi použití skriptu po spuštìní doporuèuju nechat nìjaký èas Routeru na nabìhnutí -  upravte dle vlastní vùle
:delay 10s
#------------------------------------------------------

:while true do {
:if ([/ping $ip count=$count] = 0) \  do {
/ip hotspot enable malfunction
/ip firewall nat enable [find comment=redirectDNS]
:delay $time-on
} \ 
else {
/ip hotspot disable malfunction
/ip firewall nat disable [find comment=redirectDNS]
:delay $time-gw
}
}