This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

Search found 143 matches

by Trixar_za
Sat Jul 11, 2015 6:56 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

All I changed was those lines and my copy works.

Only thing I can think that could cause that error is if the bot can't contact the website somehow, so it's leaves the variables undefined rather than empty. Probably a firewall getting in the way at one of the ends.
by Trixar_za
Sun Jun 28, 2015 12:15 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Been broken for a while, but... Change } elseif {[regexp -all -inline {<div class=['"]row['"]>(.*?)<div class=['"]def-footer['"]} $data] != ""} { set matches [regexp -all -inline {<div class=['"]row['"]>(.*?)<div class=['"]def-footer['"]} $data]; } e...
by Trixar_za
Thu Nov 06, 2014 2:53 am
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Well, it was only a matter of time before they went and changed it again. Now going for a Bootstrap look it seems. Anyway, change: } elseif {[regexp -all -inline {<div class=['"]word['"]>(.*?)<div class=['"]share['"]} $data] != ""} { set matches [regexp -all -inline {<d...
by Trixar_za
Wed May 21, 2014 1:43 pm
Forum: Script Requests
Topic: looking for specifique tcl
Replies: 1
Views: 4777

It's possible using an rss feed and some creative regular expression, but I don't know how to do it with an eggdrop. I wrote one nearly 2 years ago that worked with python if you're interested.
by Trixar_za
Fri May 16, 2014 4:39 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Yet another bug fix - this time to allow Urban Dictionary's search function to redirect the url to the correct case of the word (so spam becomes SPAM, etc). You correct it by replacing: if {![string equal -nocase $state(status) "ok"]} { return [list 0 "Warning: Couldn't connect to \[$...
by Trixar_za
Tue Apr 22, 2014 7:26 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

And yet another update. This time to the original script by porting my fixes over to it. So for the people that want the older one, just use urband2.tcl in the zip file at the usual address: http://trixarian.net/downloads/urband.zip That means you can now have the original look of the script complet...
by Trixar_za
Sat Apr 19, 2014 10:35 am
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Says the guy that told me about it :P For those that are interested, I also updated my other urban dictionary script so it works again. This is the one that doesn't depend on fsck.tcl and it works and looks similiar to this one, but only grabs the top most definition. You can get it from http://www....
by Trixar_za
Fri Apr 18, 2014 5:21 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Update time again! Just replace: } elseif {[regexp -all -inline {<a class=['"]add_to_list['"].*?>(.*?)<a class} $data] != ""} { set matches [regexp -all -inline {<a class=['"]add_to_list['"].*?>(.*?)<a class} $data]; } else { set matches ""; } with } elseif {[...
by Trixar_za
Wed Mar 12, 2014 7:03 am
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Replace: } elseif {[regexp -all -inline {<a class=['"]add_to_list['"] data-defid=['"].*?['"] href=['"]#['"]>(.*?)<a class} $data] != ""} { set matches [regexp -all -inline {<a class=['"]add_to_list['"] data-defid=['"].*?['"] href=['"]#...
by Trixar_za
Mon Jan 13, 2014 1:46 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Alrighty, it's update time because Urban Dictionary changed their site layout again: * Added in another two lines so it can match the new layout: } elseif {[regexp -all -inline {<a class=['"]add_to_list['"] data-defid=['"].*?['"] href=['"]#['"]>(.*?)<a class} $data] != ...
by Trixar_za
Mon Nov 04, 2013 1:46 am
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Sneaked in another update: * Fixed a potential bug with examples. It shouldn't break the script when the site changes the layout again... * Commented out the messages about exceeding the max lines limit - I mean, does the bot really need to tell us that and use another line in the process? Update at...
by Trixar_za
Wed Oct 09, 2013 3:41 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

With spithash's help I identified the bug. My regex was too broad and got caught by some definitions with links in them. To fix it, just use the following: if {[regexp -all -inline {<td class='text' colspan='.' id='.*?'>(.*?)</td} $data] != ""} { set matches [regexp -all -inline {<td class...
by Trixar_za
Wed Oct 09, 2013 3:04 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

You can see it running here (as GameBot) so I really don't know what's wrong. I re-uploaded the zip file, so maybe try downloading it again to check.
by Trixar_za
Wed Oct 09, 2013 2:42 pm
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

I'm still getting a: Tcl error [::urbandict::pub]: can't read "define": no such variable I restarted the bot after copying the files from the redownloaded zip file and I still couldn't reproduce this bug. Make sure you're copying the files to the right place and that it has the permission...
by Trixar_za
Wed Oct 09, 2013 8:38 am
Forum: Script Support & Releases
Topic: Latest Urban Dictionary tcl
Replies: 78
Views: 146838

Replace set matches [regexp -all -inline {<td class='text' colspan='.' id='.*?'>(.*?)</td} $data]; with if {[regexp -all -inline {<td class='text' colspan='.' id='.*?'>(.*?)</td} $data] != ""} { set matches [regexp -all -inline {<td class='text' colspan='.' id='.*?'>(.*?)</td} $data]; } el...