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

[ухтой]

Помогите пожалуйста разобраться. Поставил мафиону с этого сайта, но бот выводит сообщения с большой задержкой. Бот имеет флаг на сервере + f, хотелось бы убрать задержку полностью

[tvrsh]

Флаг должен быть +F.
В скрипте mafutils.tcl замени все puthelp на putquick или putserv.

[ухтой]

заменил все как сказал, проблема не решилась, бот работает с большой задержкой

[tvrsh]

Тогда меняй все на putserv и ставь скрипт из темы putfast_vs_putserv.tcl для Eggdrop 1.6.20

[ухтой]

может быть в этом проблема? в файле mafbot.tcl есть такое

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

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

#запуск спец процедуры для вывода месаг с задержкой
if {![info exist msglist]} {set msglist ""}
delaymsg
if {[array exist mafgazeta]} {unset mafgazeta}
set mafgazeta(0) ""

[tvrsh]

В скрипте mafutil.tcl в процедуре delaymsg в строке

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

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

                utimer 5 delaymsg

замени 5 на 1.
Хотя если это сделано, то так и должно выводить по смыслу игры.

[ухтой]

вроде проблему с задержкой решили, хочу задать еще вопрос, хотелось бы сделать, что бы при запущенной игре, после регистрации, бот выводит в канал текст "Теперь в игре ник", попробовал сделать так, не работает

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

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

proc maf:reg {n uh h c t} {
        global mafs mafmsg mafpnt mafreals
        set id [makeid $n]
        if {$mafs(isgame)==0} {maf:begin $n $uh $h $c $t}
        if {($mafs(isgame)==0)||($mafs(isreg)==0)||([maf:isnickplayer $id])} {return}
        if {([maf:isregister $id]==1)&&([maf:isidentify $id]==0)} {
                maf:say [format $mafmsg(needident) $n]
                return
                }
        incr mafs(numplayers)
        putserv "privmsg $c: К игре присоединился $n"
        set mafs(players) [lappend mafs(players) $id]
        set mafs(gplayers) [lappend mafs(gplayers) $id]
        set mafs(points) [lappend mafs(points) $id)]
        set mafreals($id) $n
        #тут надо обдумать это - проще массив отдельный
        set mafpnt($id) 0
        if {[onchan $n $c]} {
                if {[isop $n $c]} {pushmode $c -o $n}
                pushmode $c +v $n  
        }

[tvrsh]

Если не срабатывает

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

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

        putserv "privmsg $c: К игре присоединился $n"

значит ее тормозит один из этих ретурнов:

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

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

        if {($mafs(isgame)==0)||($mafs(isreg)==0)||([maf:isnickplayer $id])} {return}
        if {([maf:isregister $id]==1)&&([maf:isidentify $id]==0)} {
                maf:say [format $mafmsg(needident) $n]
                return
                }

В первом ретурне игра должна быть запущена($mafs(isgame)), регистрация открыта???($mafs(isreg)), что-то непонятное([maf:isnickplayer $id]).
И если игрок зарегистрирован, но не проидентифицирован, то сработает второй ретурн.
Сделай так, чтобы не сработал ни один.

[ухтой]

а как это лучше сделать?

[tvrsh]

Выполни те условия, при которых ретурны не сработают. Про эти условия я написал выше.
Ты хочешь заменить "К игре присоединился" на "Теперь в игре"?
Короче, оставь все как есть, когда ник присоединиться к игре бот это напишет. Не ломай рабочий скрипт.

[ухтой]

"К игре присоединяется" это я сам добавил в скрипт, по дефолту не было ваще ни какого вывода сообщения