Miscellany

alias cursong {
  var %songinfo
  set %songinfo $dde(mPlug,format,"%name_[%pm:%ps/%min:%sec~]") 
  if (%songinfo) {
    if ($count(%songinfo,-,32) > 1) {
      return Now listening to: Artist: $gettok(%songinfo,1,45) $+ - $+ $left($remove($gettok($gettok(%songinfo,1,32),2,45),$gettok(%songinfo,1,45)),1) $+ $right($replace($gettok($gettok(%songinfo,1,91),2,45), - ,-),-1) Title: $remove($gettok(%songinfo,1,91),$replace($gettok($gettok(%songinfo,1,91),2,45), - ,-),$gettok($gettok(%songinfo,1,91),1,45),-)[ $+ $gettok(%songinfo,2-,91)
    }
    else {
      return Now listening to: Artist: $gettok($gettok(%songinfo,1,91),1,45) Song: $remove($gettok(%songinfo,1,91),$gettok($gettok(%songinfo,1,91),1,45),-) [ $+ $gettok(%songinfo,2-,91)
    }
  }
  else {
    return No Song Playing...
  }
}
alias currentsong {
  say $cursong
}
on *:TEXT:@winamp:*:{
  .notice $nick $cursong
}