new-words

annotate en.sh @ 64:c3adf6452eda

lingvo-en-ru.pl script moved to misc/
author Igor Chubin <igor@chub.in>
date Sat Nov 12 14:03:54 2011 +0100 (2011-11-12)
parents 48ca8248e9cc
children
rev   line source
igor@5 1 #!/bin/sh
igor@5 2
igor@22 3 DICTD_SERVER="dictd.xdsl.by"
igor@22 4 DICTD_SERVER_ARGS="-h $DICTD_SERVER"
igor@22 5 DICT_NAME=mueller24
igor@22 6
igor@22 7
igor@29 8 _dict()
igor@29 9 {
igor@22 10 case $myname in
igor@61 11 "en") dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@61 12 ;;
igor@29 13 "de") DICT_NAME=deu-eng ;
igor@29 14 DICTD_SERVER_ARGS=''
igor@30 15 #dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@30 16 sdcv -n "$@"
igor@29 17 ;;
igor@29 18 "pl") DICT_NAME=slovnyk_pl-ru
igor@29 19 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@29 20 ;;
igor@29 21 "ru") DICT_NAME=ozhshv
igor@29 22 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@29 23 ;;
igor@29 24 "uk")
igor@29 25 slovnyk "$1"
igor@29 26 ;;
igor@31 27 "io")
igor@31 28 vortaro "$1"
igor@31 29 ;;
igor@22 30 esac
igor@29 31 }
igor@22 32
igor@5 33 (
igor@29 34 myname="`echo $0 | sed s@.*/@@`"
igor@29 35 _dict "$@"
igor@5 36 if [ -e "$ORIGINAL_TEXT" ]
igor@5 37 then
igor@5 38 echo . . . . . . . . . . . . . . . . . . . . . . . . . ; echo
igor@5 39 grep-sentences "$*" "$ORIGINAL_TEXT"
igor@5 40 fi
igor@29 41 )
igor@61 42 #| less -p "$*"