А посоветуйте задачки на скрипты

[vqd]

Время не тратьте, микротик аплоад поддерживает исключительно по FTP

Хотите задачку. Ну нате вам нетривиальную. Сделайте рандом в диапазоне от 0 до 10 например или получите день недели

Более простое. Например сделайте скрипт который шлет письмо когда какой то пользователь заходит на микротик. Например когда тот же админ подключается.
Если хотите усложнить данную задачу (зависит от метода вашего решения) то можете добавить еще уведомление об отключении ползователя

[gmx]

Время не тратьте, микротик аплоад поддерживает исключительно по FTP

Так никто и не сомневался. ТС просит задачу - ему подкинули...

[EdkiyGluk]

1) Cкрипт сканирует арпТаблицу на предмет адресов во внутренней сети
2) Сравнивает их с DHCP Leases
3) Если адресов нет в лизах, делает им статическую запись, дабы DHCP не раздал тот адрес, что забит статикой
===========================
1) Скрипт смены логина\пароля PPP сервера в зависимости от числа месяца...
2) Аналогичный скрипт будет работать и на клиенте PPP....
(повышаем секурность своих VPN-ов)
==========================
1) Скрипт сканирует попытки подбора пароля из внутренней локальной сети... И... САМОУТИЧТОЖАЕТ КОНФИГ... МХАХАХАХАХА,......(а почему бы и нет... в случае похищения девайса)
==========================
*и тут Остапа понесло................. (с)

[podarok66]

Про день недели в сети есть неплохие решения. Мне нравится такое:

 Старт компа по рабочим дням

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

:local date [/system clock get date]

:local result ""
:local months [:toarray "jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec"]
:local monthtbl [:toarray "0,3,3,6,1,4,6,2,5,0,3,5"]
:local daytbl [:toarray "sun,mon,tue,wed,thu,fri,sat"]

:local month [:pick $date 0 3]
:local day [:pick $date 4 6]
:local dayc [:pick $date 5 6]
:local century [:pick $date 7 9]
:local year [:pick $date 9 11]
:local yearc [:pick $date 10 11]

:if ([:pick $date 4 5] = 0) do={ :set day ($dayc)}
:if ([:pick $date 9 10] = 0) do={:set year ($yearc)}

:local sum 0
:set sum ($sum + (2 * (3 - ($century - (($century / 4) * 4)))))
:set sum ($sum + ($year / 4))
:set sum ($sum + $year + $day)
:for mindex from=0 to=[:len $months] do={
  :if ([:pick $months $mindex] = $month) do={:set sum ($sum + [:pick $monthtbl $mindex]) }
}
:set sum ($sum - (($sum / 7) * 7))
:set result [:pick $daytbl $sum]

:local workday [:toarray "mon,tue,wed,thu,fri"]
:if ($workday ~ $result) do={
:tool wol interface=ether2-master mac=xx:xx:xx:xx:xx:xx
/log warning "Start DQ67SW"
}

Брал отсюда

1) Скрипт сканирует попытки подбора пароля из внутренней локальной сети... И... САМОУТИЧТОЖАЕТ КОНФИГ... МХАХАХАХАХА,......(а почему бы и нет... в случае похищения девайса)

Ну это уже перепаранойя, по-моему. Остальные задачи в чем-то интересны и вполне себе реализуемы...
Вот тут я решал что-то похожее на первую из ваших задач.

[podarok66]

Не могу не поделиться, нашел в сети просто отличное решение для генерации пароля. Правда генерирует с внешнего ресурса, но мне понравилось))

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

{
:global RandomOrg "";
/tool fetch url="https://www.random.org/passwords/\?num=1&len=10&format=plain&rnd=new" keep-result=yes dst-path="pass.txt";
delay 3;
:global RandomOrg [/file get pass.txt contents];
/file remove pass.txt;
:put $RandomOrg
}

Кстати, это и генерация рандомного числа:

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

{
:global RandomOrg "";
/tool fetch url="https://www.random.org/strings/\?num=1&len=1&digits=on&unique=on&format=plain&rnd=new" keep-result=yes dst-path="pass.txt";
delay 3;
:global RandomOrg [/file get pass.txt contents];
/file remove pass.txt;
:put $RandomOrg
}