#!/bin/sh
loadcw|tee x|morse $*;tr 'a-z' 'A-Z' < x
