Страница 1 из 1

fplayers.tcl - Football players. Информация о футболистах.

СообщениеДобавлено: 10 авг 2011 22:00
tvrsh
Название: fpalyers.tcl
Версия: 1.1
Автор: tvrsh
Описание: Скрипт забирает с сайта http://footballplayers.ru/ информацию о игроках. При входе на канал сообщает о том, кто родился и умер в этот день. Из списка рождений и смертей берет случайно по одной строке. По команде показывает легенду футбола или действующего игрока или завершившего карьеру.
Поддержка Suzi: Да
Пример работы:
# Нотис при входе на канал.
* Attempting to rejoin channel #football
* Rejoined channel #football
-NOTICE- <bionic> В этот день родился В 1967 г. лучший футболист Бельгии 1992 года Филипп Альбер.
-NOTICE- <bionic> В этот день умер В 1984 г. легендарный советский вратарь Анатолий Акимов.
-NOTICE- <bionic> Интересный факт: 1982 г. Завершилась двухлетняя дисквалификация Паоло Росси, связанная с участием в "договорных" матчах. Спустя считанные недели, не имевший столь продолжительной игровой практики Росси стал лучшим снайпером и лучшим игроком чемпионата мира.
# Команда на канале.
<@tvrsh> !игрок
<@bionic> Завершивший карьеру - Сами Аль-Джабер - Один из лучших нападающих в истории азиатского футбола. На чемпионате мира 2006 года ветеран сборной Саудовской Аравии вновь отметился забитым голом. До этого Аль-Джабер забивал по голу на мундиалях 1994 и 1998 годов.

Дополнительная информация: Позже сделаю поиск по базе игроков.
Ссылка на скрипт: fplayers.tcl

Re: fplayers.tcl - Football players. Информация о футболиста

СообщениеДобавлено: 30 апр 2012 22:07
tvrsh
Обновил скрипт. При входе на канал добавился показ интересного факта.

Re: fplayers.tcl - Football players. Информация о футболиста

СообщениеДобавлено: 01 май 2012 21:34
wr`
поставил было нормально,сейчас выдает ошибку,когда какой либо юзверь заходит:
•(21:32:09)• <(Paul> [21:30:13] Tcl error [::fplayers::fplayers_onjoin]: random limit must be greater than zero
•(21:32:21)• <ban> .set errorInfo
•(21:32:21)• <(Paul> [21:30:26] #ban# set errorInfo
•(21:32:22)• <(Paul> Currently: random limit must be greater than zero
•(21:32:22)• <(Paul> Currently: while executing
•(21:32:22)• <(Paul> Currently: "rand [llength $dead]"
•(21:32:22)• <(Paul> Currently: (procedure "::fplayers::fplayers_proc" line 42)
•(21:32:22)• <(Paul> Currently: invoked from within
•(21:32:22)• <(Paul> Currently: "::fplayers::fplayers_proc $nick $uhost $hand $chan 0"
•(21:32:22)• <(Paul> Currently: (procedure "::fplayers::fplayers_onjoin" line 8)
•(21:32:22)• <(Paul> Currently: invoked from within
•(21:32:22)• <(Paul> Currently: "::fplayers::fplayers_onjoin $_jp1 $_jp2 $_jp3 $_jp4"

Re: fplayers.tcl - Football players. Информация о футболиста

СообщениеДобавлено: 01 май 2012 21:48
tvrsh
Обновил скрипт.

Re: fplayers.tcl - Football players. Информация о футболиста

СообщениеДобавлено: 15 июн 2012 11:37
Jake
а как сделать чтобы этот скрипт выводил текст в кодировке cp1251 ? а то кракозябры выдаёт (
я так понял нужно в скрипте удалить эти строки:
TCL: [ Скачать ] [ Скрыть ]
if {[info exists ::sp_version]} {
        set data [encoding convertfrom cp1251 $data]
    } else {
        set data [encoding convertto utf-8 [encoding convertfrom cp1251 $data]]
    }

верно ?

закомментил эти строчки:
set data [encoding convertfrom cp1251 $data]
и
set data [encoding convertto utf-8 [encoding convertfrom cp1251 $data]]
вроде заработало ....