egghelp/eggheads community

Radio, Auto-Post to Channel

2005-09-16T13:04:36-04:00

don't use lynx, use http package
you can embed mIRC colors in output text using the color escape character \003; check mIRC's docs for color code combinations; for example, this would be red on yellow:
Code:
```
putserv "privmsg #channel :\0034,8using colors on irc is lame\003"
```

Statistics: Posted by demond — Fri Sep 16, 2005 1:04 pm

Radio, Auto-Post to Channel

2005-09-16T12:58:52-04:00

Have you checked Colour and formatting codes from the Tcl FAQ?

Statistics: Posted by caesar — Fri Sep 16, 2005 12:58 pm

Radio, Auto-Post to Channel

2005-09-16T12:00:00-04:00

//Edit:

How I can put an other colour into the text?

Code:

set radio_url "http://discopink.ch/sc_text2.php"set time 1set chan "#RadioPink"if {![info exists ald]} {set ald 1timer $time radio_get}proc radio_get {} {global radio_urlglobal thetext a chan time textset file [open "|lynx -source $radio_url" r]set html "[gets $file]"regsub -all "
" $html " " htmlregsub -all "" $html " " htmlregsub -all "" $html " " htmlregsub -all "" $html " " htmlregsub -all "<\[^b]{0,1}b{0,1}>" $html "" htmlregsub "text1=" $html "" htmlregsub "NOW PLAYING:" $html "Now on http://viptrend.com:8002/listen.pls playing \002" htmlputchan $chan $htmlputserv "privmsg $chan Radio: http://viptrend.com:8002/listen.pls"        timer $time radio_get}

Statistics: Posted by Balkanac — Fri Sep 16, 2005 12:00 pm