Cheiron commented on a Page, Radio Script - Oct 28, 2008

this is how i got it currently

on *:TEXT:!stats*:#staff:{ /radio }

alias radio {
  if ($sock(radio)) sockclose $v1
  sockopen radio s8.viastreaming.net 7380
}
on *:sockopen:radio: {
  sockwrite -nt $sockname GET / HTTP/1.1
  sockwrite -nt $sockname Host: [ADDRESS]
  sockwrite -nt $sockname $crlf
}
on *:sockread:radio:{
  var %t
  sockread %t
  while ($sockbr) {
    sockread -f %t
    if ($regex(%t,/<body>(.*?)<\/body>/)) {
      tokenize 44 $regml(1)
      /msg $chan 14,9 Titan Sounds: 4,9 Listners: 12,8 $1 4| 4,9 Nummer: 12,8 $7-  4| 4,9 Kbps: 12,8    $6 $+ kbps 
    }
  }
}

Respond