#!/bin/sh loadcw|tee x|morse $*;tr 'a-zåäö' 'A-ZÅÄÖ' < x