Статистика: Добавлено ndssi — Вчера, 15:07
Статистика: Добавлено drpioneer — Вчера, 11:05
Статистика: Добавлено qwerty123123 — Вчера, 09:57
Статистика: Добавлено Triangle — 17 мар 2024, 15:19
Статистика: Добавлено Bushi — 16 мар 2024, 18:42
Статистика: Добавлено Ripich — 15 мар 2024, 23:01
Ограничения бесплатной лицензии CHR - 1Mbps.Есть поднятый в виртуальной среде CHR 7.14 и пару xAP LX ac
Устройства подключаются получают адреса но speedtest в гостевой сети крайне низкий: порядка 1мб, хотя в рабочей сети порядка выдает порядка 70мб/с
Статистика: Добавлено Sargulov — 15 мар 2024, 19:02
Статистика: Добавлено -13- — 15 мар 2024, 17:48
Код:
# Function Converter of Russian characters for sending in Telegram# by Sertik 19/09/2020# usage [$FuncStrToTele "Строка String .,!+"]:global FuncStrToTele do={:local string; :set $string $1;# table of the codes of Russian letters UTF8:local rsimv [:toarray {"А"="D090"; "Б"="D091"; "В"="D092"; "Г"="D093"; "Д"="D094"; "Е"="D095"; "Ж"="D096"; "З"="D097"; "И"="D098"; "Й"="D099"; "К"="D09A"; "Л"="D09B"; "М"="D09C"; "Н"="D09D"; "О"="D09E"; "П"="D09F"; "Р"="D0A0"; "С"="D0A1"; "Т"="D0A2"; "У"="D0A3"; "Ф"="D0A4"; "Х"="D0A5"; "Ц"="D0A6"; "Ч"="D0A7"; "Ш"="D0A8"; "Щ"="D0A9"; "Ъ"="D0AA"; "Ы"="D0AB"; "Ь"="D0AC"; "Э"="D0AD"; "Ю"="D0AE"; "Я"="D0AF"; "а"="D0B0"; "б"="D0B1"; "в"="D0B2"; "г"="D0B3"; "д"="D0B4"; "е"="D0B5"; "ж"="D0B6"; "з"="D0B7"; "и"="D0B8"; "й"="D0B9"; "к"="D0BA"; "л"="D0BB"; "м"="D0BC"; "н"="D0BD"; "о"="D0BE"; "п"="D0BF"; "р"="D180"; "с"="D181"; "т"="D182"; "у"="D183"; "ф"="D184"; "х"="D185"; "ц"="D186"; "ч"="D187"; "ш"="D188"; "щ"="D189"; "ъ"="D18A"; "ы"="D18B"; "ь"="D18C"; "э"="D18D"; "ю"="D18E"; "я"="D18F"; "Ё"="D001"; "ё"="D191"; "№"="0023"; " "="0020"; "&"="0026"; "^"="005E"}]# encoding of the symbols and аssembly line:local StrTele ""; :local code "";:for i from=0 to=([:len $string]-1) do={:local keys [:pick $string $i (1+$i)]; :local key ($rsimv->$keys); if ([:len $key]!=0) do={:set $code ("%"."$[:pick ($rsimv->$keys) 0 2]"."%"."$[:pick ($rsimv->$keys) 2 4]"); :if ([pick $code 0 3] ="%00") do={:set $code [:pick $code 3 6]}} else={:set $code $keys}; :set $StrTele ("$StrTele"."$code")}:return $StrTele;}
Код:
:local BotToken "Мой Токен";:local ChatID "Мой АйДи";:global FuncStrToTele;:local string [$FuncStrToTele "Привет от Sertik ! Работает функция-конвертер Russian alfabit для Telegramm"]:local ParseMode "html";:local DisableWebPagePreview True;:local SendText $MessageText;:local tgUrl "https://api.telegram.org/bot$BotToken/sendMessage?chat_id=$ChatID&text=$SendText&parse_mode=$ParseMode&disable_web_page_preview=$DisableWebPagePreview";/tool fetch http-method=get url=$tgUrl keep-result=no;:log info "Send Telegram Message: $MessageText";
Код:
:local DeviceName [/system identity get name];:local Time [/system clock get time];:local Date [/system clock get date];:local TelegramMessageText;:local urlEncoded;:global ParseLogL2tpErrorEndArrayID;:local IDsEventsError [/log find where topics~"l2tp.ppp.error" message~"user"];:local LenArrayIDs [:len $IDsEventsError];:local StartArrayID [:find $IDsEventsError $ParseLogL2tpErrorEndArrayID];:local EndArrayID ($IDsEventsError -> ($LenArrayIDs-1));:if ($EndArrayID != $ParseLogL2tpErrorEndArrayID and [:tobool $ParseLogL2tpErrorEndArrayID] ) do={ :for KeyArray from=($StartArrayID+1) to=($LenArrayIDs-1) do={ :local IDMessage ($IDsEventsError ->$KeyArray ); :set TelegramMessageText "$TelegramMessageText %0D%0A $[/log get number=$IDMessage time] - $[/log get number=$IDMessage message];"; }:for i from=0 to=([:len $TelegramMessageText] - 1) do={ :local char [:pick $TelegramMessageText $i] :if ($char = "<") do={ :set $char "" } :if ($char = ">") do={ :set $char "" } :set urlEncoded ($urlEncoded . $char) } :local MessageText "\E2\9B\94 <b>$DeviceName: L2TP ERROR</b> $urlEncoded"; :local SendTelegramMessage [:parse [/system script get MyTGBotSendMessage source]]; $SendTelegramMessage MessageText=$MessageText;} else={log info "Script ParseLogL2tpError: no new messages found.";};:set ParseLogL2tpErrorEndArrayID $EndArrayID;
Статистика: Добавлено OlegM — 15 мар 2024, 15:39
Статистика: Добавлено bst-botsman — 15 мар 2024, 15:33
Статистика: Добавлено Sargulov — 15 мар 2024, 13:20
С наскока сложно определить причину такого поведения скрипта.Решил его использовать на ROS 7.14.1 но он не работает. Выдает Script of blocking dangerous IP addresses worked with errors
Как можно понять причину в чем ошибка ?
Код:
MMM MMM KKK TTTTTTTTTTT KKK MMMM MMMM KKK TTTTTTTTTTT KKK MMM MMMM MMM III KKK KKK RRRRRR OOOOOO TTT III KKK KKK MMM MM MMM III KKKKK RRR RRR OOO OOO TTT III KKKKK MMM MMM III KKK KKK RRRRRR OOO OOO TTT III KKK KKK MMM MMM III KKK KKK RRR RRR OOOOOO TTT III KKK KKK MikroTik RouterOS 7.14.1 (c) 1999-2024 https://www.mikrotik.com/ROUTER HAS NO SOFTWARE KEY----------------------------You have 23h34m to configure the router to be remotely accessible,and to enter the key by pasting it in a Telnet window or in Winbox.Turn off the device to stop the timer.See www.mikrotik.com/key for more details.Current installation "software ID": B85U-EWQDPlease press "Enter" to continue![admin@MikroTik] > sys scr run dang22:28:16 Start of searching dangerous addresses on 'MikroTik' router22:28:16 Variable 'inIfaceList' is empty -> so value '' is automatically assigned22:28:16 ATTENTION!!! Not found list external interfaces named ''. Check it 'Interfaces-Interface List'. Firewall protection may not work!!!22:28:16 No new dangerous IP-addresses were found22:28:16 End of searching dangerous addresses script[admin@MikroTik] >
Статистика: Добавлено aga — 15 мар 2024, 11:50