A99: find #1 findet Leersatz - Absicht?

[Bernhard Eversberg]

On 18 Dec 01, at 23:09, Allers Heinrich wrote:

> 
> Konkret, um in der Folge der internen Satznummern den
> ersten [gueltigen] Satz zu finden, müßte man schreiben:
> 
> 
> find #1
> if cancel jump ende
> if no jump 2
> jump gefunden
> :2
> find #2
> usw usf

Das kann man eleganter als Schleife programmieren:

first #
jump check
:loop
next #
:check
if no jump loop
if del jump loop
if cancel jump leer

display
sho r
end
:leer
mes Datenbank enthaelt nichts!



Bernhard Eversberg
Universitaetsbibliothek, Postf. 3329, 
D-38023 Braunschweig, Germany
Tel.  +49 531 391-5026 , -5011 , FAX  -5836
e-mail  B.Eversberg at tu-bs.de