Forums Scripts & Popups Help

on *:TEXT:!song *:#:{
  var %song $nopath($strip($2-))
  var %type $gettok(%song,-1,46)
  if (!$istok(mp3 wav mid,%type,32)) return
  var %file $getdir(%song) $+ %song
  if ($isfile(%file)) { ctcp # SOUND $qt(%song) | echo -ag played requested sound: %song }
else { echo -s actions to take if %song does not exist }
}

ctcp *:SOUND:*:{
  ;place_holder
  var %song $nopath($strip($2-))
  var %type $gettok(%song,-1,46)
  if (!$istok(mp3 wav mid,%type,32)) return
  var %file $getdir(%song) $+ %song
  if ($isfile(%file)) { echo $iif($target == $me,-s,#) listening to song played to $iif($target == $me,me,#) : %song | splay -q %song }
  else { echo $iif($target == $me,-s,#) Note: do not have song played to $iif($target == $me,me,#) : %song }
}