#!/bin/sh

case $1 in
  -accents) filt="tr '%@' '\351\340'";;
  *) filt="tr '%@' 'ea'";;
esac

Temp=/tmp/mu.$$
Old=$HOME/.mu
Dir=/usr/local/games/mur

touch $Old
cp $Old $Temp
$Dir/direct clipper.ens.fr 4576 >> $Temp << EOF
stat
EOF

a=`awk 'BEGIN {w = 0;} \
     $1 == "Written:" {w = $2 - w;} \
     END {printf ("%s",w);}' \
    $Temp`

case $a in
  0) echo "Aucune brique du mur n'a %t% graffit%e.  En %change, voil@ un fortune :" | $filt
     echo
     fortune ;;
  1) echo "Une brique du mur a %t% graffit%e." | $filt;;
  *) echo $a "briques du mur ont %t% graffit%es." | $filt;;
esac

rm -f $Temp