This is my first Socket Script, so please be nice...

When Loaded, type /rcdradionp and what's currently playing on RCD Radio will post in the channel under a /msg $chan command, feel free to load and change to your own preferences.

Please remember this is my first Socket Script, so its dead simple, some help goes to GrimReaper.

alias RCDRadioNP {
  sockclose rcdradio
  unset %rcdradionp.output
  sockopen rcdradionp bots.rcdradio.com 80
}

on *:SOCKOPEN:rcdradionp: {
  sockwrite -nt $sockname GET /data/nowplaying-raw.php HTTP/1.0
  sockwrite -nt $sockname Host: bots.rcdradio.com
  sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:rcdradionp: {
  var %sockread
  sockread -f %sockread
  if (!%sockread) { set -e %rcdradionp.output $true }
  if (%rcdradionp.output) {
    %sockread = $regsubex(%sockread,/<[^>]+>/g,)
    if (%sockread) && ($len(%sockread) > 0) {
      %rcdradionp.command %sockread
    }
  }
}
on *:SOCKREAD:rcdradionp: {
  unset %rcdradionp.output
  unset %rcdradionp.command
}