for i in *
do
nom=`echo $i | awknom`
echo ' '
echo -n $nom " a lister (o/n/f)?  "
read list
case $list in
 o) ;;
 n) continue ;;
 f) echo ' ' ; exit 0 ;;
 *) ;;
esac

zex $nom | page

echo ' '
echo '----------------------------------------'

done
echo ' '