Russian Users MikroTik | Форум пользователей MikroTik

Код: Выделить всё

:global weather;
:local ha [tool fetch url="http://wttr.in/Moscow\?format=%l:+%c+%t+%h" as-value output=user];
:set weather [:pick $ha 0];

Код: Выделить всё

/system note set note="$weather"

Код: Выделить всё

:do { :global weather [:pick [/tool fetch url="http://wttr.in/Moscow\?format=%l:+%c+%t+%h" as-value output=user] 0];
        :delay 5s;
        } on-error={
          :global weather "<- The weather is smiling at us ->"
      }
:global weather;
/system note set note="$weather";
 

Код: Выделить всё

:do { :global weather [:pick [/tool fetch url="http://wttr.in/Moscow\?format=%l:+%c+%t+%h" as-value output=user] 0];
        :delay 15s;
        system scheduler set Weather2 disabled=yes
        } on-error={
          :global weather "<- The weather is smiling at us ->";
          /system scheduler set Weather2 disabled=no 
      }
:global weather;
/system note set note="$weather" show-at-login=yes;

Код: Выделить всё

/system script run Weather

Код: Выделить всё

# Script forecast weather
# https://forummikrotik.ru/viewtopic.php?t=11322
# tested on ROS 6.46.5
# updated 2020/05/10

:local weatherLocality [:toarray Moscow,Bryansk,Pupkino];
:local message "";
:local subject "";
:local currentDate ([/system clock get date]." ".[/system clock get time]);
:set subject (">>>        Weather report on ".$currentDate);
:foreach weather in=$weatherLocality do={
    :do {
        :local temperature "";
        :set temperature ("http://wttr.in/".$weather."\?format=%l:+%t+%h+%p+%w");
        :set temperature ([:pick [tool fetch url=$temperature as-value output=user] 0]);
        :set message ($message.(">>> ".[:pick [$temperature] 0 ([ :len [$temperature] ] - 1)]."\r\n"));
    } on-error={ :log warning (">>> Error script. Weather in ".$weather." not found"); }
}
:log warning ($subject);
:log warning ($message);