Cheiron commented on a Page, SHOUTCast Script - Jun 15, 2009

try this one. it is what i am using on my server. mirc used was mirc v6.35, server was unrealircd 3.2.7

on *:TEXT:!on:#channel:if ($nick isop $chan) { enable #playsongpop | .timercheckop 0 10 songp }
on *:TEXT:!off:#channel:if ($nick isop $chan) { disable #playsongpop | .timercheckop off }
on *:TEXT:!playing:#:{ stime $chan }
#playsongpop off
alias -l songp {
  sockopen songp stream details port
  set %kanaal4 $1
}
on *:sockopen:songp: {
  sockwrite -n $sockname GET /7 HTTP/1.0
  sockwrite -n $sockname User-Agent: Mozilla
  sockwrite -n $sockname
}
on *:sockread:songp:{
  var %t
  sockread %t
  while ($sockbr) {
    sockread -f %t
    if ($regex(%t,/<body>(.*?)</body>/)) {
      tokenize 44 $regml(1)
      if (%last != $7-) {
        .msg #channel 12 Current Song playing on your Radio: 4 $7-  
        set %last $7-
      }
    }
  }
}
#playsongpop end
alias -l stime { enable #playsongpop | songp $1 | .timercheckuser 1 10 disable #playsongpop }

commands here are manual announcer (once per song) !playing
to trigger auto announce (ops only triggerable) !on / !off
any issues , let me know as this is a worker on my mirc

Respond