#this program decrypts an encrypted message, using press and crypt

FILE=${1:?'usage...\n\nmsgcrypt filename'}
export FILE
msgstrip $FILE
press <$FILE >$FILE.cryout
crypt <$FILE.cryout  >$FILE.clear
l $FILE.clear
rm $FILE.cryout
echo "\nDelete the clear message? y/n"
read YORN
if [ $YORN = "y" ]
then
rm $FILE.clear
fi
