[Allegro] Allegro: Batch-Import

[Bernhard Eversberg]

Hallo Herr Fischer,

zwar fehlen mir $G.CFG und klein.gpt, aber mit diesem modifizierten 
Abschnitt #(S klappts erst mal:
(die Zeile mit =sv machte den Hintergrundspeicher zu voll)

#(S  		(su) Eintrag in Suchindex 2, klein geschrieben
#usu +#udx e0  		wenn su da: prima
#u1 dsu asu  	sonst u1 in Kleinbuchtsaben
#udx +#99 e0  	dx gibt Register an, sonst:
#nr p'|2' e2 =dx
#usu dsu y2 asu
   nur Kleinbuchstaben im Suchregister - geht nicht mit utf-8
#99 e0
  #usu dsv f32 F32 c' ' =sv  fr Doppeleintr„ge, wenn Leerzeichen da
  #nr p'1' e1 =ct
#-s
  #uct x"+1" =ct e0
#usu e' ' =te
  #ute ! e0
#ute p'|2' dte   ersten Teil von <su> im Register speichern
#t{8}
  #uct +#udi x">=10" e0 	Notbremse für Endlosschleifen und Index-Grenze
#usu +s f32 b" " f32 =su
    ersten Teil von <su> entfernen, weiter bei #-s
#usu dsu e0
#udi ddi e0
#)S