Siren II

/ tool netwatch
add host=213.xxx.xxx.x timeout=1s interval=1m up-script="" down-script=":log info \"GATEWAY \
\n :set i 15 \=50 step=1 \\
\n :beep length=400ms frequency=\$x; \
\n \ :set x (\$x +35)
\n :beep length=0 \) && (\$i >0))
\n}" comment="" disabled=no
[admin@RouTer] tool netwatch>

and script is

:log info "GATEWAY Problem No INTERNET"
:for c from=1 to=50 step=1 \

do={ \
:set i 15
:set x 1900

:do {\
:beep length=400ms frequency=$x; :delay 25ms
:set i ($i - 1);
:set x ($x +35)

} \
while (($i <16)>0))
:beep length=0 frequency=0
}

create a script named "siren" using danz9370 source code, then
create another script named "end-siren" with this source code:

/sys script job remove [find \
script="siren"]

now do netwatch and specify "end-siren" under "on up" and "siren" under "on down"
insert this script with for stop until internet up

:for i from=1000 to=3000 step=80 do={:beep length=10ms frequency=$i; :delay 10ms;}
:for i from=1000 to=2800 step=80 do={:beep length=10ms frequency=$i; :delay 10ms;}
:for i from=2800 to=1000 step=-80 do={:beep length=10ms frequency=$i; :delay 10ms;}

source :http://forum.mikrotik.com/viewtopic.php?f=9&t=12072&hilit=siren