|
Вопросы по скриптам
|
|
| Помогите, вот у бота есть ирцоп, а как в конфиге прописать, что б он получал его и вешал на себя флаг нужный?
|
|
|
|
|
Vladislav 04.08.10 20:19 #2
|
Code # Cкрипт, который выполнится во время подключения к серверу.
set init-server {
putquick "MODE $botnick +B"
} Заменить на: Code # Cкрипт, который выполнится во время подключения к серверу.
set init-server {
putquick "MODE $botnick +B"
putquick "oper логин пасс"
} или создать отдельный скрипт: Code set ircop_login ""
set ircop_password ""
bind evnt - init-server ircop_ident
proc ircop_ident {type} {
global ircop_login ircop_password botnick
putquick "OPER $ircop_login $ircop_password"
putquick "MODE $botnick +H-Whps"
} |
|
|
К теме о боте-иркопе  Хочу чтобы бот показывал настоящий IP пользователя и считал сколько раз просмотрят его whois. Заранее спасибо.
|
|
|
|
|
Vladislav 10.08.10 17:40 #4
|
Есть и такие скрипты  В whoiscounter.tcl нужно указать канал.
Держи, счастливый обладатель иркопа:
|
|
|
| Опять выручил! Где-то видел как через Eggdropa качали файлы а он им в дц отправлял потом, только мне не надо в дц, надо чтоб просто скачивал.
|
|
|
|
|
Vladislav 10.08.10 18:18 #6
|
Code bind pub n !скачать get_
proc get_ {n u h c t} {
if {$t == ""} {
putserv "NOTICE $n : Формат: !скачать <ссылка на файл>"; return}
set af [catch {exec wget $t} r]
if {[string match "*child process exited abnormally*" $r]} {putserv "PRIVMSG $c :Ошибка. Не могу скачать."; return}
set file [lindex [split [lindex [split [lindex [split $r \n] end-1] "`"] 1] "'"] 0]
if {[file exists $file]} {putserv "PRIVMSG $c :Файл скачан успешно."
return
}
} |
|
|
|
|
Патриция 15.08.10 13:22 #7
|
| Нужен пример скрипта для приветствия, при входе на канал
|
|
|
|
|
Vladislav 15.08.10 13:31 #8
|
Для всех входящих скрипт autohello.tcl
А также есть: z-greet.tcl - скорее всего в новой версии появиться.
Небольшой скрипт по хосту, нику:
Code bind join - * greetjoins
proc greetjoins {nick uhost handle chan} {
# Проверка на хост.
if {[string match -nocase "*@windrop.clan.su" $uhost]} {
putserv "privmsg $chan :\001ACTION приветствует $nick ;)\001"
# Проверка на ник.
} elseif {[string match -nocase "Vladislav" $nick]} {
putserv "privmsg $chan :\001ACTION приветствует $nick ;)\001"
}
return
}
А также для тех кто прописан у бота, можно использовать команду: !setinfo ник приветствие
|
|
|
| Подскажите пожалуйста, вот я установил БОТа(Windrop), настроил конфиг чтобы он вел лог канала, как мне теперь сделать так чтобы БОТ мог выкладывать этот лог когда пользователи обращаются к нему в привате с определенной командой, допустим там...!log имя_канала и пользователь получает то что было написано на канале в его отсутствии.
|
|
|
|
|
Vladislav 18.10.10 05:18 #10
|
last.tcl - для этого. Правда команды задаются на канале, вывод лога осуществляется в приват.
Цитата Скрипт для показа событий из составляемых ботом лог-файлов для *drop *20.
Команды: !last - вывод в приват последних 20 строк лога
!last ДД.ММ.ГГГГ чч:мм:cc - вывод в приват 20 строк после указанной даты.
Настраиваешь скрипт:
Цитата # сколько строк выводить
set last(count) 20
Цитата # список доступных каналов через пробел
set last(chans) "#windrop"
Пример использования:
Цитата <Vladislav> !last <Windrop> Последние 20 строк с канала #windrop <Windrop> [05:00:34] Vladislav (sysert@users.ircline.ru) joined #windrop. <Windrop> [05:00:35] Action: Windrop-Debian приветствует создателя <Windrop> [05:01:40] <Vladislav> всем привет <Windrop> [05:01:46] <Vladislav> как дела <Windrop> [05:02:50] <Vladislav> что делаем? <Windrop> [05:03:13] <Vladislav> а в ответ тишина <Windrop> [05:08:17] <Vladislav> как так <Vladislav> !last 18.10.2010 05:03:00 <Windrop> 20 строк с канала #windrop, начиная с 05:03:00 2010/Oct/18 <Windrop> [05:03:13] <Vladislav> а в ответ тишина <Windrop> [05:08:17] <Vladislav> как так
P.S: Скрипт работает только на 1.6.20 и с параметрами в конфиге (выставлены по умолчанию):
Цитата set keep-all-logs 1
set logfile-suffix ".%Y%b%d"
set timestamp-format {[%H:%M:%S]}
Данный скрипт был удалён 05.01.2013, альтернатива - findlogs.tcl
|
|
|
| Скрипт !слоган, как заставить работать при заходе на канал? Т.е. при заходе на канал бот бы составлял слоган используюя ник заходящего.
|
|
|
|
|
Vladislav 18.10.10 20:43 #12
|
В самый конец скрипта games/slogan.tcl добавь следующее:
Code
setudef flag join-slogan
bind join - * slogan-join
proc slogan-join {nick uhost hand chan} {
global slogan botnick lasttime
if {![channel get $chan join-slogan]} {return}
if {$nick == $botnick} {return}
if {[info exists lasttime]} { if {[expr [expr [unixtime] - $lasttime] < 10]} {return} }
set slogan(base) [::slogan::readdata data/slogan.txt]
set params "$::gcolor(6)$nick$::gcolor(14)"; set slogan(fraza) [lindex $slogan(base) [rand [llength $slogan(base)]]]
putserv "PRIVMSG $chan :$::gcolor(5):: $::gcolor(14)[subst -nobackslashes -nocommands $slogan(fraza)]"
set lasttime [unixtime]
return
}
Будет так:
Quote * Приходит: ФиТиСОВ (INSTINCT@77-120-208-106.telesweet.net)
<Windrop> :: С "Мистер-ФиТиСОВ" веселей, в доме чисто в два раза быстрей!
Внимание с версии 10.11.10 это уже встроено нужно лишь включить на нужном канале:
Quote Если надо, включаем джойн-слоган: .chanset #канал +join-slogan |
|
|
| в киллерс я написала Quote set kk "#chan1"
set kk "#chan2" не работает ни на одном из каналов и так тоже не работает ни на одном канале Quote set kk "#chan1 #chan2" |
|
|
|
|
Vladislav 06.11.10 19:14 #14
|
Если бы в этом скрипте была возможность указывать несколько каналов то это было бы написано в шапке скрипта или перед параметром, а так только один и придумывать не надо, через пробел или через запятую можно в некоторых скриптах, там где это предусмотрено например в words.tcl.
Quote #каналы где возможна игра (разделяйте пробелами)
Почему только на одном? ну так вот автор скрипта решил.
|
|
|
|
|
DwayneCarter 25.11.10 13:45 #15
|
Подскажите, Владислав! Есть ли такой скрипт, который заставляет бота через промежутки времени на моем канале писать новости канала: пример: "Сегодня вышел новый альбом от Soulja Boy" и так далее..примерно через каждые 15 минут или полчаса..
Я сам обыскался такой скрипт, есть ссылки на лента.ру, может его можно переделать, но только чтобы в строку мирки не вводить, а сам бот писал.
С уважением, Иван!
Жду ответа...
|
|
|
