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

[triton]

#Использовать, или нет mysql
set conf(sql.enable) 0

было включено. Теперь еще проблема при команде !старт бот пишит в пати

[09:17] Tcl error [::ymhuk::start]: No such user.

понятно что не зареганый юзер, а как зарегаться не пойму.

[tvrsh]

Повторяю последний раз. Читай Правила оформления топиков и выполни второй пункт оттуда во всех своих постах.

[team]

Ребят помогите сделать что бы бот при команде !вон и !вон ник писал не на канал а нотисом,вот я нашел процедуру,помогите что тут исправить

#Команда !вон <ник>, или просто !вон (для самого себя)
proc ::ymhuk::won {nick uhost handle chan text} {
variable conf; variable ymhuk
#Проверка канала
if {[string tolower $chan] != [string tolower $conf(chan)]} {
return
}
#Если просто команда !вон, то смотрим по нику пользователя
if {$text != ""} { set nick $text }
#Проверяем существование пользователя, если существует берем инфу о нем из базы, и выводим сообщение
switch [::ymhuk::check.user $nick] {
1 {
set score [::ymhuk::get.score $nick]
set answers [::ymhuk::get.answers $nick]
set answer_chain [::ymhuk::get.answer.chain $nick]
set seconds [::ymhuk::get.seconds $nick]
set user_place [::ymhuk::user.place $nick]
set diference [::ymhuk::diference $nick]
set title [::ymhuk::get.title.nick $nick]
set remort [::ymhuk::get.remort $nick]
if {$diference == ""} {
switch "$remort" {
0 { ::ymhuk::pub.msg [format $ymhuk(won.str) $nick $title $user_place $score $answers $seconds $answer_chain] }
default {
if {$remort >= $conf(r.choose)} {
::ymhuk::pub.msg [format $ymhuk(won.str2) $conf(choose.type.chan) $nick $title $remort $user_place $score $answers $seconds $answer_chain]
} else {
::ymhuk::pub.msg [format $ymhuk(won.str2) "" $nick $title $user_place $score $answers $seconds $answer_chain]
}
}
}
} else {
switch "$remort" {
0 { ::ymhuk::pub.msg [format $ymhuk(won.str1) $nick $title $user_place $score $answers $seconds $answer_chain $diference] }
default {
if {$remort >= $conf(r.choose)} {
::ymhuk::pub.msg [format $ymhuk(won.str3) $conf(choose.type.chan) $nick $title $remort $user_place $score $answers $seconds $answer_chain $diference]
} else {
::ymhuk::pub.msg [format $ymhuk(won.str3) "" $nick $title $user_place $score $answers $seconds $answer_chain $diference]
}
}
}
}
}
0 {::ymhuk::pub.msg [format $ymhuk(won.str4) $nick]}
}

return
}

[Alvor]

На канал текст выводит процедура ::ymhuk::pub.msg, для нотиса есть процедура ::ymhuk::notice однако в ней совсем другие параметры. Если извратиться (сейчас меня опять будут ругать гуру), то можно осторожненько сделать так:
Ищем

if {$text != ""} { set nick $text }

перед ним (выше) пишем строку

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

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

set nnick $nick

далее везде в этом куске кода ищем часть строки

::ymhuk::pub.msg

меняем на

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

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

::ymhuk::notice $nnick

например (было, стало)

0 {::ymhuk::pub.msg [format $ymhuk(won.str4) $nick]}
0 {::ymhuk::notice $nnick [format $ymhuk(won.str4) $nick]}

Если этого нет в настройках, конечно
ЗЫ: сохрани копию файла на всякий случай. Работу не гарантирую

[Sparkle]

Люди, помогите пожалуйста, в чем может быть проблема? В патилайне пишет ошибку при записи ymhuk.html

Tcl error [::ymhuk::top.html]: missing operator at _@_in expression "int(0_@_9)";

И как исправить?

И ещё, скажите пожалуйста как изменить чтобы когда на первый правильный вопрос отвечаешь, скрипт сразу в приват пишет чтобы сменить пол, а не только тогда, когда нужно перезайти на канал! Спасибо!