egghelp/eggheads community

Do you have a special character at the first line character 0?

Goga wrote:

Code: Select all

Tcl error [Google:News]: error "syntax error" at line 1 character 0
"0 <--Error-- "

Getting this error in result of above Script.

Replace this line: set fullurl "$dt(link)$arg
With this line: set fullurl [string tolower "$dt(link)$arg"]

# Description: This script will query dictionary.com and give a simple response # # v1.0 Initial release giving a simple dictionary result (jaxson) # v1.1 Added the .dictChan command to allow a channel access to the .dict command (jaxson) # v1.2 Fix for wrong color procs - my bad for copying colors...

# Description: This script will query dictionary.com and give a simple response # # v1.0 Initial release giving a simple dictionary result (jaxson) # v1.1 Added the .dictChan command to allow a channel access to the .dict command (jaxson) # v1.2 Fix for wrong color procs - my bad for copying colors...

# Description: This script will query dictionary.com and give a simple response # # v1.0 Initial release giving a simple dictionary result (jaxson) # v1.1 Added the .dictChan command to allow a channel access to the .dict command (jaxson) # # Needed packages package require http 2.3 package require...

package require http 2.3 package require tls 1.6.4 package present Tcl 8.6 proc cblack {} {return \00301}; proc cltblue {} {return \00311}; proc cblue {} {return \00312}; proc coff {} {return \017} set dt(link) "https://www.dictionary.com/browse/" # set the following array to which chans ...

# Google news v0.3 by nrt (01Dec2015) # Updated GoogleNews Country links and added some more lines for redirected link support (04Jan2018) karakedi # Updated the 'bind time' to 'bind cron' format for newer eggdrops; modified the foreach channel loop to allow for spam to all channels that are set to...

Also the bind time change doesn't work like that in the new eggdrop. Use bind cron like the below instead:

bind cron - "*/5 * * * *" Google:News

The above will call Google:News every five minutes.

Join #eggdrop on irc.rizon.net:6667 for further help.

Move this line out of the foreach loop: set ::oldnews "$newsdesc $newslink" Like this: proc Google:News args { foreach chan [channels] { if {[channel get $chan googlenews]} { set news [newsdom] set newsdesc [lindex [split $news |] 0] set newslink [getRealLink [lindex [split $news |] end-1]...