NEW IMDB.TCL script released

[thatruth]

IMDB_DEBUG permission_result == 0 how can i make this work? and what is the tellin me. i know it is in debug. otherwise i get notin if it is off.
Truth

[grimreap]

I have the exact same problem now. Anyone have a fix for this? It started by noticing -bot- No no no! I can't find that!

So I upgraded to the newest version and now get nothing

[thatruth]

i updated and the same thing i have talked to poeple tried this and that and notin. they change there site again?

Truth

[Izguer2000]

thatruth: "IMDB_DEBUG permission_result == 0" means you didn't set +imdb on your channel... read the instructions in the beginning of the file
and for it to work you have to make the same changes as doomx303


grimreap: what "exact same problem" ?

[thatruth]

got it find out why.

truth

[BigBird]

i tried evrything u guys said,
on some of the movies i got results, and other movies just

Tcl error [imdb_proc]: can't read "location": no such variable

donno what's the difference between the movies names.

[neoxed]

BigBird: Read a few posts above.

Originally posted by Tantuss
I fixed it with this:

change:
regexp {title/tt[0-9]+/} $oldpage(meta) location

to

regexp {title/tt[0-9]+/} $oldpage(body) location

works only with http so not with curl..

I guess that they removed the meta tags..

[BigBird]

already tried it...

[Izguer2000]

Did you also try my fix?

Originally posted by Izguer2000
Change
"{<title>IMDb name and title search</title>} "
to
"{<title>IMDb name and title search}"
and change
"regexp {title/tt[0-9]+/} $oldpage(body)"
back to
"regexp {title/tt[0-9]+/} $oldpage(meta)"

I'll post my modified version tomorrow - going to sleep now...

[grimreap]

ah well this seemed to fix my problem

change:
regexp {title/tt[0-9]+/} $oldpage(meta) location

to

regexp {title/tt[0-9]+/} $oldpage(body) location

I kept getting the error
Tcl error [imdb_proc]: can't read "location": no such variable

[BigBird]

oh, ok. now it's working
but i want to add something from the "chilla's IMDB script".
the rating_bar of the stars :P

can somebody help me?

# the user rating
set j [expr $i + 3]
set line2 [lindex $lines $j]
set j [expr $i + 4]
set line3 [lindex $lines $j]
regsub -all \<\[^\>\]*\> $line3 "" rating
regsub -all \&nbsp\; $rating " " rating
regsub -all \[\ \t\]+ $rating " " rating
set rating [string trim $rating " "]
set goldstars [regexp -all goldstar $line2]
set greystars [expr 10 - $goldstars]

# generating the rating bar
set marker "*"
set rating_bar "11\[7"
for {set i2 0} {$i2 < $goldstars} {incr i2 1} {
set rating_bar "$rating_bar$marker"
}
set marker "-"
set rating_bar "$rating_bar14"
for {set i3 0} {$i3 < $greystars} {incr i3 1} {
set rating_bar "$rating_bar$marker"
}
set rating_bar "$rating_bar11\]"
putserv "PRIVMSG $nick :$rating $rating_bar"

question is how to make it works in this script

[Izguer2000]

Ok now here is my modified script.
I also added chilla's rating bar if that's what you want.
Changes are listed in the header.

Edit: Attachment didn't work, here is a link:

imdb.rar

[BigBird]

thank you
perfect

[BigBird]

i just noticed that when theres no "stars"(raiting) i get error msg
Tcl error [imdb_proc]: can't read "rating_bar": no such variable
and the bot doesn't send anything...

[Izguer2000]

Thanks for the hint - fixed it.
If you don't want to redownload:
Insert

set rating_bar ""

after

set language "N/A" ; set soundmix "N/A" ; set top250 "top/bottom:N/A"