|
|
WORD SEARCH
Dieser Pascal-Source ist das Ergebnis einer Frage im Coding-Board. Die Frage war, wie man es zu bewerkstelligen hätte, in
einer Art "Buchstaben-Matrix" nach bestimmten Wörtern zu suchen. Dieses Beispiel ist natürlich extrem reduziert.
Die Matrix darf maximal 50x50 groß sein - und es sind max. 50 Wörter erlaubt (liegt daran, daß das Beispiel den
80x50-Textmode benutzt).
Natürlich erhebt dieses kleine Beispiel keinen Anspruch auf dem Nobelpreis für Informatik.
Aber auf jeden Fall funktioniert es. Zu benutzen ist es mit
wsearch <dateiname>
Wobei dateiname eine Textdatei ist, die zuerst die Matrix enthält, dann eine Leerzeile und danach alle zu suchenden
Wörter in einzelnen Zeilen. Genaueres ist auch im (beigefügten) Quelltext zu finden.
Achtung! - Es wird (der Einfachheit
halber) die Unit CRT benutzt - die auf schnellen Rechnern den bekannten Fehler (Runtime Error 200) hervorruft.
|
|
Seite
5
|
|
|