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

Проблема с ipb21.1.tcl

СообщениеДобавлено: 25 мар 2011 23:47
team
вот поставил в рсс ленту http://lenta.ru/rss/
прописал в блог настройки следующее
set feed(lenta) {
URL=http://lenta.ru/rss/
DATABASE=scripts/data/lenta.temp
CHANNELS=#joy
CHANNELSD=#joy
POSTNEWS=1
POSTLIMIT=1
PUBLIMIT=1
MSGLIMIT=1
VIANOTICE=1
ENCODINGFROM=cp1251
USEPROXY=0
PROXY=some.good.proxy:8080
TYPE=lenta
POSTLAYOUT=14lenta.ru 4Новость5 :14 <title> 5(12<link>5) 4Дата5 :14 <date>4 Кратко5 :14 <description>
}


пишу !forum lenta бот пишет все отлично,но вот хочу поставить rss с сайта http://ivbb.ru/feed.php?f=8

вставил в настройки блог
set feed(ivbb) {
URL=http://ivbb.ru/feed.php?f=265
DATABASE=scripts/data/ivbb.temp
CHANNELS=#test
CHANNELSD=#test
POSTNEWS=1
POSTLIMIT=1
PUBLIMIT=1
MSGLIMIT=1
ENCODINGFROM=cp1251
USEPROXY=0
VIANOTICE=1
PROXY=some.good.proxy:8080
TYPE=rss
POSTLAYOUT=\00310\002RSS\002 :: \00310\002RadioUltra LJ:\002\00304 <title> \00310(\00303<link>\00310) Дата: \00303<date>\00310. Кратко: \00303<description>
}


и вот что вышло
22:33:58™ <team> !forum ivbb
22:33:58™ <Statistic> team: Нет данных на этом источнике... -.-


перепробывал все,не работает,постоянно пишет так,помогите настроить правильно для этого сайта

Re: Проблема с ipb21.1.tcl

СообщениеДобавлено: 26 мар 2011 13:09
tvrsh
В скрипте перед строкой
        egghelp {
добавь
TCL: [ Скачать ] [ Скрыть ]
        ivbb {
                        while {[regexp -nocase -- {<entry(\s[^>]*?)?>(.+?)</entry>} $content tmp tmp value]} {
                                incr item
                                set title  {n/a}
                                regexp -nocase -- {<title.*?>(.+?)</title>} $value tmp title
                                set title [egglib::unhtml $title]
                                set link {n/a}
                                regexp -nocase -- {<link href="(.+?)">} $value tmp link
                                set date {n/a}
                                regexp -nocase -- {<updated>(.+?)</pubDate>} $value tmp date
                                catch {set date [clock format [clock scan [lrange $date 0 end-1]] -format "%b %d %Y, %H:%M"]}
                                set desc {n/a}
                                regexp -nocase -- {<content .*?>(.+?)</content>} $value tmp desc
                                regsub -all -nocase -- {<br.*?>} $desc { } desc
                                set desc [egglib::unhtml $desc]
                                if {[string length $desc] > $ipb21(symlim)} then {set desc "[string range $desc 0 $ipb21(symlim)]..."}
                                regsub -nocase -- {<item.*?>.+?</item>} $content {} content
                                set rssnews($item) "[list $title] [list $link] {} {} {} [list $desc]"
                        }
                }

И в настройках фида укажи TYPE=ivbb. Все ошибки показывай с .set errorInfo
И кстати, между словами блок и блог разница есть.

Re: Проблема с ipb21.1.tcl

СообщениеДобавлено: 26 мар 2011 17:28
team
все равно также,в патилайне нет не каких ошибок(((

Re: Проблема с ipb21.1.tcl

СообщениеДобавлено: 26 мар 2011 22:36
team
и еще бот стал летать каждые минут 10

Re: Проблема с ipb21.1.tcl

СообщениеДобавлено: 26 мар 2011 22:59
tvrsh
Изменил код в предыдущем посте. Пробуй.
В следующий раз не пиши всякие "летает", "падает" и прочее. Показывай логи. Я не понимаю, что ты имеешь ввиду под этими словами.

Re: Проблема с ipb21.1.tcl

СообщениеДобавлено: 26 мар 2011 23:09
team
вот что я имею ввиду под словом летает

21:34:59™ * Вышел: Statistic (~StatBot@irc-vichuga.ru) (Remote host closed the connection)


Добавлено спустя 7 минут 1 секунду:
все равно

22:14:22™ <leshka> !forum ivbb
22:14:23™ <Statistic> leshka: нет данных на этом источнике


может на другом скрипте как настроить?но хотелось бы конечно на этом