play.sh

   1 #!/bin/bash
   2
   3 # you should probably download a txt dictionary of your favourite language and use that as a words.txt
   4
   5 cd "$(readlink -e $(dirname "$0"))"
   6
   7 WORDSTOPLAY=10
   8 WORDSFILE="$1"
   9 if [[ -z "$WORDSFILE" ]]; then
  10         WORDSFILE="words.txt"
  11 fi
  12
  13 export LC_ALL=C # dont do unicode stuff in egrep
  14 while true; do
  15   sort -R "$WORDSFILE" | sed 's/\/.*//' | egrep '^[A-Za-z]{5,}$' | head -n "$WORDSTOPLAY" | tr [:upper:] [:lower:]  | qt/multypo
  16   echo "Press Ctrl-C to quit"
  17   sleep 3
  18 done
  19