From 6ed6ee5e4c60383e4eda69ac6502608f1c09f418 Mon Sep 17 00:00:00 2001
From: pascal <pascal@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Tue, 12 Aug 2008 09:39:03 +0000
Subject: beschreibe versucht, Zeichen anhand einer Beschreibung zu erraten

git-svn-id: https://svn.neo-layout.org@751 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 linux/bin/README.txt |  5 ++++-
 linux/bin/beschreibe | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 56 insertions(+), 1 deletion(-)
 create mode 100755 linux/bin/beschreibe

diff --git a/linux/bin/README.txt b/linux/bin/README.txt
index 92c3105..c6657be 100644
--- a/linux/bin/README.txt
+++ b/linux/bin/README.txt
@@ -26,4 +26,7 @@ Gibt an, ob und wie ein Zeichen mit NEO ermöglicht werden kann. Beispiele:
 
 Außerdem ist @ über Compose folgendermaßen darstellbar:
 <Multi_key> + <A> + <T>
--------------------------------
\ No newline at end of file
+-------------------------------
+
+== beschreibe ==
+Versucht, Zeichen anhand einer Beschreibung zu erraten und ruft »wiemitneo« auf
\ No newline at end of file
diff --git a/linux/bin/beschreibe b/linux/bin/beschreibe
new file mode 100755
index 0000000..0ec1401
--- /dev/null
+++ b/linux/bin/beschreibe
@@ -0,0 +1,52 @@
+#!/bin/sh
+
+# Verzeichnis muss eventuell an den Ort der Compose angepasst werden:
+COMPOSE=/usr/share/X11/locale/en_US.UTF-8/Compose
+n=10
+
+while [ ! "$beschreibung" ]
+do
+	case ${1-" "} in
+		" ")
+			echo Aufruf: $0 [OPTION] BESCHREIBUNG
+			echo »$0 --help« gibt Ihnen mehr Informationen.
+			exit;;
+		--help)
+			echo Aufruf: $0 [OPTION] BESCHREIBUNG
+			echo »$0« versucht ein Zeichen anhand einer Beschreibung zu idetifizieren
+			echo Option:
+			echo -e "  -n               gibt n statt 10 Vorschläge aus"
+			exit;;
+		\ )
+			echo $0: Kein Suchkriterium eingegeben!
+			echo Versuchen Sie »$0 --help« für weitere Informationen.
+			exit;;
+		-*)
+			n=`echo $1 | cut -c2-`
+			shift;;
+		*)
+			beschreibung=${*?$0: Fehler! Versuchen Sie »$0 --help« für weitere Informationen.}
+	esac
+done
+
+anzahl=`grep -iw $beschreibung $COMPOSE | head -$n | wc -l`
+if [ $anzahl -gt 0 ]
+then
+	for i in $(seq 1 $anzahl)
+	do
+		a[$i]=`grep -iw $beschreibung $COMPOSE | grep ^\< | head -$i | tail -1 | cut -f2 -d \"`
+		echo $i\) ${a[$i]}
+	done
+
+	read -p 'welches Zeichen suchen Sie: ' zahl
+	echo
+else
+	echo „$beschreibung“ ist unbekannt, versuchen Sie eine andere Beschreibung.
+	exit
+fi
+
+if [ ${a[$zahl]} ]
+then
+	echo
+	./wiemitneo ${a[$zahl]}
+fi
-- 
cgit v1.2.3