FreeCalypso > hg > freecalypso-tools
view ringtools/fc-meltest-pwt @ 953:ab54957dbe35
libpwon: implement -Petmoff mode
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Wed, 07 Jun 2023 20:06:12 +0000 |
parents | 5b68ba735e98 |
children |
line wrap: on
line source
#!/bin/sh if [ $# -lt 1 -o $# -gt 2 ] then echo "usage: $0 pwt_melody_file [volume]" 1>&2 exit 1 fi tmpfile=/tmp/fc-test-melody.bz if [ -n "$2" ] then volume="$2" else volume=64 fi set -ex fc-pwt-comp "$1" $tmpfile fc-fsio upload-file $tmpfile /buz/test.bz fc-shell 'at@buz="/buz/test.bz"'",$volume"