Форум о ботах Eggdrop/Windrop

[tvrsh]

###
#
# Название: egghelpforum.tcl
# Версия: 1.0
# Автор: tvrsh
#
###
#
# Описание: Скрипт сообщает в канал о новых сообщениях на форуме http://forum.egghelp.ru
# Также может показывать последенее сообщение юзеру при входе на канал.
#
###
#
# Установка:
# 1. Скопируйте скрипт egghelpforum.tcl в папку scripts вашего бота.
# 2. В файле eggdrop.conf впишите строку source scripts/egghelpforum.tcl
# 3. Сделайте .rehash боту.
#
###
#
# Версион хистори:
#
# 1.1(10.01.2010) Первая паблик версия.
#
###

Пример работы:

<+bionic> Title: egghelpforum.tcl скрипт мониторинга нашего форума.
<+bionic> Text: Название: egghelpforum.tcl Версия: 1.0 Автор: tvrsh Описание: Скрипт сообщает в канал о новых сообщениях на форуме http://forum.egghelp.ru Также может показывать последенее сообщение юзеру при входе на канал. Установка: 1. Скопируйте скрипт egghelpforum.tcl в папку scripts вашего бота. 2. В файле eggdrop.conf впишите строку source scripts/egghelpforum.tcl 3. Сделайте .rehash боту. Версион хистори: 1.1(10.01.2010) Первая паблик версия.
<+bionic> Info: Ответов: 0 Просмотров: 1 Последний ответ: tvrsh Когда: 31 янв 2010 19:22.
<+bionic> Link: viewtopic.php?f=3&t=151&p=542#p542

Скачать: egghelpforum.tcl

[tvrsh]

Тем, кто уже скачал скрипт необходимо исправить ошибку, при которой после захода юзера на канал сообщения о последнем посте отправлялись не ему нотисом а просто в канал. В процедуре forum:join замените строки

TCL: [ Скачать ] [ Скрыть ]

Синтаксис: [ Скачать ] [ Показать ]

        putserv "PRIVMSG $egghelpforum(chan) :\002Last Post Title:\002 $title"
        #putserv "PRIVMSG $egghelpforum(chan) :\002Text:\002 $topictext"
        #putserv "PRIVMSG $egghelpforum(chan) :\002Info:\002 $topicinfo$egghelpforum(color1)."
        putserv "PRIVMSG $egghelpforum(chan) :\002Link:\002 $link"
 

на

TCL: [ Скачать ] [ Скрыть ]

Синтаксис: [ Скачать ] [ Показать ]

        putserv "NOTICE $nick :\002Last Post Title:\002 $title"
        #putserv "NOTICE $nick :\002Text:\002 $topictext"
        #putserv "NOTICE $nick :\002Info:\002 $topicinfo$egghelpforum(color1)."
        putserv "NOTICE $nick :\002Link:\002 $link"
 

Две средние строки можно раскомментировать для более полной информации. Скрипт по ссылке в первом посте исправлен.

[tvrsh]

Очередное обновление скрипта связано с неверным использованием команды subst. В результате которого в текст поста, выводимого в канал, подставлялись несуществующие переменные, что вызывало ошибку.
Исправленный скрипт брать там же.

[tvrsh]

Для корректного отображения ссылки на последний пост при входе на канал в процедуре forum:join замените строку

TCL: [ Скачать ] [ Скрыть ]

Синтаксис: [ Скачать ] [ Показать ]

         putserv "NOTICE $nick :\002Link:\002 $link"

на

TCL: [ Скачать ] [ Скрыть ]

Синтаксис: [ Скачать ] [ Показать ]

         putserv "NOTICE $nick :\002Link:\002 [strip.html $link]"

[triton]

этот скрипт работает на сузи ?

[tvrsh]

этот скрипт работает на сузи ?

Установи и проверь.