#!/bin/rc
rfork e
+nl='
+'
out=/dev/audio
typ=()
tmp=()
if not {
switch($2){
case *plain*
- sed 's/\r//g' | while(j=`{read}){
+ sed 's/\r//g' | while(j=`$nl{read}){
echo $"j >[1=2]
if(~ $"j http:* https:* HTTP:* HTTPS:*){
hget -r 'User-Agent: play' -r 'Icy-MetaData: 0' $"j | play1 $"j
audio/flacdec
case *audio/basic*
audio/sundec
+ case *audio/midi*
+ games/midi -c
+ case *audio/mus*
+ games/mus | games/midi -c
case *pls*
awk 'BEGIN {FS="="} /^File/{print $2}' | play1 list plain
case *
audio/flacdec
case *.au *.AU
audio/sundec
+ case *.mid *.MID
+ games/midi -c
+ case *.mus *.MUS
+ games/mus | games/midi -c
case *
echo $argv0: $1: unknown format: $2 >[1=2]
}
}
fn usage {
- echo usage: $argv0 [ -o file ] [ file ... ] >[1=2]
+ echo usage: $argv0 '[ -o file ] [ file ... ]' >[1=2]
exit usage
}
>$out {
if(~ $#* 0){play1 stdin; exit}
- for(i){echo $i} | play1 args plain
+ for(i){echo $"i} | play1 args plain
}