пробывал данный скрипт на мирк 6.35 и бот просто нериагирует
помогите чем сможете
;goroda
on *:TEXT:*:#:{
if (%city.mon == 1) && ($chan !isin %city.chans) {
if ($1 == !назвали) || ($1 == !названо) && (%citygame.on == 1) msg $chan 9,1 $+ Названно4 %citygame.record 10городов из13 $lines(baza/города-база.txt)
if ($1 == !города) { if (%citygame.on == 1) { msg $chan Игру уже запустили гавнюки на канале4 %citygame.chan | halt } | if ($chan != #scripting) { set %citygame.chan $chan | set %citygame.record 0 | set %citygame.point 1 | msg $chan 9,1 $+ Ну чё играть так играть в города!!! | set %citygame.on 1 | :ll | set %citygame.ll $rand(а,я) | if ($count(%citygame.ll,ы,ъ,ь,ё,щ) != 0) goto ll | msg $chan 9,1 $+ Быстрей быстрей город на4 %citygame.ll } | elseif ($1 == !города) { msg $chan Играйте на канале4 #[CooLBots] } }
if ($1 == !стоп) || ($1 == !стой) && (%citygame.chan == $chan) { msg $chan 9,1 $+ Какой то НАХАЛ тормазнул игру!!! | write -c город.txt | unset %citygame.chan %citygame.ll | unset %citygame.record | unset %citygame.on | write -c город2.txt | unset %citygame.point }
if ($1 == !буква) && (%citygame.on == 1) && (%citygame.chan == $chan) msg $chan 9,1 $+ Быстрей быстрей город на4 %citygame.ll
if ($1 == !н) && (%citygame.on == 1) { if (!$read(город.txt, w, %citygame.ll)) { write город.txt %citygame.ll | :ll | set %citygame.ll $rand(а,я) | if ($count(%citygame.ll,ы,ъ,ь,ё,щ) != 0) goto ll | msg $chan 9,1 $+ Быстрей быстрей город на4 %citygame.ll } | else msg $chan 9,1 $+ Хватит пропускать то! }
if (%citygame.on == 1) && ($left($lower($1),1) == %citygame.ll) && (%citygame.chan == $chan) && ($count($strip($1-),$chr(42)) == 0) {
if (!$read(город2.txt, w, $lower($1))) {
if ($read(baza/города-база.txt, w, $lower($1))) {
set %citygame.ll $right($lower($1),1)
if ($count(%citygame.ll,ы,ъ,ь,ё,щ) != 0) {
msg $chan 9,1 $+ Умничка $nick $+ 7 + $+ %citygame.point 10очков!!! Вроде на4 %citygame.ll 10нету.
:ll
set %citygame.ll $rand(а,я)
if ($count(%citygame.ll,ы,ъ,ь,ё,щ) != 0) goto ll
msg $chan 9,1 $+ Быстрей быстрей город на4 %citygame.ll
}
else msg $chan 9,1 $+ Умничка $nick $+ 7 + $+ %citygame.point 10очков!!! Быстрей быстрей город на4 %citygame.ll
writeini очки.txt $nick score $calc($readini(очки.txt, $nick, score) + %citygame.point)
inc %citygame.record
if (%citygame.record! < %citygame.record) set %citygame.record! %citygame.record
inc %citygame.point
}
else msg $chan 9,1 $+ хз такой город другой думай.
}
else msg $chan 9,1 $+ Повтороряемся=)
if ($read(baza/города-база.txt, w, $1)) write город2.txt $1
}
if ($1 == !очки) {
if ($2 == $null) { if ($readini(очки.txt, $nick, score)) msg $chan 10 $+ Твои очки:7 $readini(очки.txt, $nick, score) | else msg $chan 10 $+ Может сыграешь? }
if ($2 != $null) { if ($readini(очки.txt, $2, score)) msg $chan 10 $+ Очки $2 $+ :7 $readini(очки.txt, $2, score) | else msg $chan 10 $+ $2 ещё не играл }
}
if ($1 == !топ) {
if (!$file(очки.txt)) { msg $chan 4 $+ Никто и не играл. | goto end }
set %sitygame.topn 2
set %sitygame.toptok $readini(очки.txt, $ini(очки.txt,1), score)
writeini играгорода.txt $readini(очки.txt, $ini(очки.txt,1), score) stat $ini(очки.txt,1)
while (%sitygame.topn <= $ini(очки.txt,0)) {
set %sitygame.toptok %sitygame.toptok $readini(очки.txt, $ini(очки.txt,%sitygame.topn), score)
writeini играгорода.txt $readini(очки.txt, $ini(очки.txt,%sitygame.topn), score) stat $ini(очки.txt,%sitygame.topn)
inc %sitygame.topn
}
set %sitygame.toptok $sorttok(%sitygame.toptok,32,nr)
set %sitygame.toptok $gettok(%sitygame.toptok,1-5,32)
if ($gettok(%sitygame.toptok,1,32)) { msg $chan 4 $+ Топ игроков в игре "Города": | timer 1 1 msg $chan 7 $chr(49) $+ . $+ $readini(играгорода.txt, $gettok(%sitygame.toptok,1,32), stat) - $gettok(%sitygame.toptok,1,32) }
set %sitygame.topn 2
while (%sitygame.topn <= 5) {
if (!$gettok(%sitygame.toptok,%sitygame.topn,32)) { timer 1 %sitygame.topn msg $chan 7 $+ А больше никто и не играл. | goto end }
if ($gettok(%sitygame.toptok,%sitygame.topn,32)) { timer 1 %sitygame.topn msg $chan 7 $chr($calc(49 + %sitygame.topn - 1)) $+ . $+ $readini(играгорода.txt, $gettok(%sitygame.toptok,%sitygame.topn,32), stat) - $gettok(%sitygame.toptok,%sitygame.topn,32) }
inc %sitygame.topn
}
:end
unset %sitygame.toptok %sitygame.topn
}
}
}
on *:CONNECT:{ unset %citygame.on %citygame.chan %citygame.point %citygame.record %citygame.ll | write -c город.txt | write -c город2.txt }
on *:JOIN:#:{ if (%citygame.chan == $chan) && (%citygame.on == 1) { msg $chan 9,1 $+ $nick Давай помогай город на4 %citygame.ll } }