Название: Auto News Topic v1.0
Скрипт: AutoNewsTopic.mrc
Программа: mIRC
Автор: Epic
Описание: Скрипт предоставляет возможность регулярно анонсировать свежие новости через топик канала. Все настройки производятся в диалоговом окне панели управления, которое вызывается через всплывающее меню окон при нажатии правой кнопки мыши.

Требования: После установки скрипта в меню окна укажите свой #channel, на котором будет производится смена топиков, а также не забудьте настроить время таймера для интервала. В списке текстового документа "autotopic.txt" необходимо создать более 1-ого топика в столбик.

Установка:

  • Откройте редактор скриптов вашего клиента при помощи комбинации клавиш "ALT+R".

  • Далее через верхнее меню "File/New" откройте новый файл и разместите там код.

  • Далее через верхнее меню "File/Save As..." сохраните код как скрипт под названием "AutoNewsTopic.mrc".

  • Если у вас уже установлена предыдущая версия этого скрипта, то замените его новым кодом. Не оставляйте предыдущие версии скриптов во избежании конфликтов.

Скачать: 💾 AutoNewsTopic_v1.0.rar

Код:
#####################################################################
#   Название: Auto News Topic v1.0
#   Автор: Epic (epicnet@mail.ru, http://epicnet.ru)
#   Описание: Скрипт предоставляет возможность регулярно анонсировать свежие новости через топик канала.
#   Управление: Все настройки производятся в диалоговом окне панели управления, которое вызывается через всплывающее меню окон при нажатии правой кнопки мыши.
#####################################################################

menu status,channel {
  -
  ¤ Auto News Topic
  .$iif(%atop_start == on, Отключить, Запустить):{
    if (!%atop_start) { %atop_start = on | /echo -a 14Авто смена топика 7включена | autotopic | halt }
    if (%atop_start == on) { unset %atop_start | /echo -a 14Авто смена топика 7отключена }
  }
  .-
  .Канал = %atopchan: %atopchan = $$?="Введите канал для смены топика:"
  .Таймер = %atopmin
  ..1 мин: %atopsec = 60 | %atopmin = 1мин
  ..5 мин: %atopsec = 300 | %atopmin = 5мин
  ..10 мин: %atopsec = 600 | %atopmin = 10мин
  ..30 мин: %atopsec = 1800 | %atopmin = 30мин
  ..1 час: %atopsec = 3600 | %atopmin = 1час
  ..3 час: %atopsec = 10800 | %atopmin = 3час
  ..6 час: %atopsec = 21600 | %atopmin = 6час
  ..12 час: %atopsec = 43200 | %atopmin = 12час
  ..24 час: %atopsec = 86400 | %atopmin = 24час
  .-
  .Список топиков = $lines(autotopic.txt) $+ шт: if ($exists(autotopic.txt) == $false) .write autotopic.txt | .run $mircdir $+ autotopic.txt
}
alias autotopic {
  if (%atop_start == on && %atopchan) {
    if ($exists(autotopic.txt) == $false) || ($lines(autotopic.txt) == 0) { /echo -a 14В списке нет ни одного топика! | halt }
    if (!%atopsec) { %atopsec = 1800 | %atopmin = 30мин }
    if (%atop >= $lines(autotopic.txt)) unset %atop | inc %atop
    /msg ChanServ TOPIC %atopchan $read(autotopic.txt,%atop)
    .timerTOPIC 1 %atopsec autotopic
  }
}

P.S. Если у вас возникли вопросы, вы столкнулись с трудностями по установке скрипта, или вы обнаружили ошибки, а может быть у вас появились новые идеи по модификации данного скрипта, то обязательно напишите здесь об этом.

Подпись автора

[html]<style>img {vertical-align:middle;}.hnet{color:#FFFFFF;}.hstar{color:#DE0000;}.htext{font-family:Verdana;font-size:13px;color:#6E1E00;}.heading{font-family:Verdana;font-size:13px;font-weight:bold;background-color:#4898CD;}.stitle{font-family:Verdana;font-size:12px;}.dot{color:#808000;}.desc{color:#B5B5B5;}a .curl{font-family:Verdana;font-size:12px;color:#3A92CD;}</style><table><tr><td width="20px" height="20px"><img src="http://forumstatic.ru/files/000d/c9/8c/34681.jpg"></td><td><a href="https://forum.epicnet.ru/viewtopic.php?id=234"><span class="heading"> <span class="hstar">★</span> <span class="hnet">EpicNet.Ru</span> <span class="hstar">★</span> </span><span class="htext"> - Российский IRC Чат © 2009</span></a></td></tr><tr><td></td><td><div class="stitle"><span class="dot">•</span> <span class="desc">Онлайн:</span> <a href="http://chat.epicnet.ru"><span class="curl">http://chat.epicnet.ru</span></a><br><span class="dot">•</span> <span class="desc">Сервер:</span> irc.epicnet.ru <span class="desc">Порты:</span> 6667, 6668 (ssl) <span class="desc">Кодировка:</span> UTF-8<br><span class="dot">•</span> <span class="desc">Сайт:</span> <a href="http://epicnet.ru"><span class="curl">http://epicnet.ru</span></a> <span class="dot">•</span> <span class="desc">ВКонтакте:</span> <a href="https://vk.com/irc_epicnet"><span class="curl">https://vk.com/irc_epicnet</span></a><br><div></td></tr></table>[/html]