Автоприветствие пробовал по разному но ни как. Помогите

Решение вопросов при работе с TCL скриптами.

Модератор: Модераторы

Автоприветствие пробовал по разному но ни как. Помогите

Сообщение ayaal_86 » 30 дек 2011 01:28

Есть крипт автоприветствия нотисом на ник при входе на канал. выглядит оно так:

bind join - "#mychan *@*" join:autohi
proc join:autohi {nick uhost hand chan} {
global botnick
if {$nick != $botnick} {
putserv "notice $nick : $nick привет! Добро пожаловать на $chan!"
putserv "notice $nick :>>> Вы получили ВОЙС(+)в честь наступающего 2012г Поздравление от 4Администрации канала 12#mychan!!!"
putserv "notice $nick :>>> Команды бота:  !новости !хелп !скачать !регпатч !нг !время !автор"
putserv "notice $nick :>>> ДЛЯ ВСЕХ!!! Рекомендуемые настройки звука скачать"
}
}


Данная проблемка этого скрипта работает не корректно если сделать этот скрипт от 2х каналов и более.
Например на 1м канале захожу и все прекрасно выводит свое приветствие , потом захожу на 2й канал то выходит то же приветствие которое вышло на 1м канале. и на 3м такая же выходит которая вышла на первом канале. А если зайти в начале на 2й канал то нормально выходит свое сообшение, далее захожу на 1й и 3й каналы тоже выходит то же приветствие которое было на 2м канале. думаю вы поняли в чем дело. Помогите сделать чтоб оно так не делало.
Чтоб было все нормально
ayaal_86
 
Сообщения: 29
Зарегистрирован: 28 дек 2011 08:12
Благодарил (а): 6 раз.
Поблагодарили: 0 раз.
Версия бота: Eggdrop 1.6.21+suzi

Re: Автоприветствие пробовал по разному но ни как. Помогите

Сообщение Vertigo » 30 дек 2011 03:38

Ну воткни проверку на канал в самой процедуре, а бинди все каналы, например:
TCL: [ Скачать ] [ Скрыть ]
bind join - * join:autohi
 proc join:autohi {nick uhost hand chan} {
 global botnick
 if {$nick == $botnick} {return}
if {$chan == "#mychan"} {
 putserv "notice $nick : $nick привет! Добро пожаловать на $chan!"
 putserv "notice $nick :>>> Вы получили ВОЙС(+)в честь наступающего 2012г Поздравление от 4Администрации канала 12#mychan!!!"
 putserv "notice $nick :>>> Команды бота:  !новости !хелп !скачать !регпатч !нг !время !автор"
 putserv "notice $nick :>>> ДЛЯ ВСЕХ!!! Рекомендуемые настройки звука скачать"
 } elseif {$chan == "#mychan2"} {
тут другое приветствие
} elseif {$chan == "#mychan3"} {
тут для еще одного канала
} else {
return
}
}

elseif'ов можно натыкать так сколько угодно. успехов.

За это сообщение автора Vertigo поблагодарил:
ayaal_86 (30 дек 2011 04:27)
Аватара пользователя
Vertigo
 
Сообщения: 107
Зарегистрирован: 20 авг 2008 23:49
Откуда: Москва
Благодарил (а): 0 раз.
Поблагодарили: 37 раз.
Версия бота: Eggdrop 1.8


Вернуться в TCL скрипты

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2

cron