Регистрация | Вход
[ Главная · Новые сообщения ]
  • Страница 1 из 25
  • 1
  • 2
  • 3
  • 24
  • 25
  • »
Форум » Основной раздел » Мастерская » Вопросы по скриптам
Вопросы по скриптам
Rigo 04.08.10 20:07 #1
Помогите, вот у бота есть ирцоп, а как в конфиге прописать, что б он получал его и вешал на себя флаг нужный?
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"
}
fersar 10.08.10 17:10 #3
К теме о боте-иркопе cool

Хочу чтобы бот показывал настоящий IP пользователя и считал сколько раз просмотрят его whois. Заранее спасибо.

Vladislav 10.08.10 17:40 #4
Есть и такие скрипты wink

В whoiscounter.tcl нужно указать канал.
Держи, счастливый обладатель иркопа:

ip.tcl(1.0 Kb) · whoiscounter.tcl(1.1 Kb)
fersar 10.08.10 18:12 #5
Опять выручил! Где-то видел как через 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 ник приветствие
frost 18.10.10 01:26 #9
Подскажите пожалуйста, вот я установил БОТа(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
Rigo 18.10.10 20:17 #11
Скрипт !слоган, как заставить работать при заходе на канал? Т.е. при заходе на канал бот бы составлял слоган используюя ник заходящего.
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
Beth 06.11.10 19:03 #13
в киллерс я написала

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 минут или полчаса..
Я сам обыскался такой скрипт, есть ссылки на лента.ру, может его можно переделать, но только чтобы в строку мирки не вводить, а сам бот писал.
С уважением, Иван!
Жду ответа...
Форум » Основной раздел » Мастерская » Вопросы по скриптам
  • Страница 1 из 25
  • 1
  • 2
  • 3
  • 24
  • 25
  • »
Поиск: