[Tustep-Liste] Zahlen ergänzen

[Wolfram Brunschön]

Lieber Herr Trauth,

es läuft vorzüglich - vielen herzlichen Dank.
Da ich ab ETE ich nicht mehr weiter gewußt hätte gleich die 
Anschlußfrage: Bieten Sie zufällig dieses Jahr einen #Kopiere-Kurs an, 
der sich solcher Art von Aufgaben (zählen, rechnen, springen, 
Austauschen unter Bedingungen ...) annimmt? Bei mir ist der Groschen 
noch nicht gefallen.

Liebe Grüße und einen schönen Abend

Wolfram Brunschön.


> Diskussionsforum Tustep-Liste
> Weitere Informationen: www.itug.de
> ------------------------------------------------------------
>
>
> Lieber Herr Brunschoen,
>
> Ihre Aufgabe ist, wenn ich sie richtig verstanden habe,
> der Musterfall einer leichten #kopiere- oder Kommando-
> makro-Aufgabe. Das folgende #ko sollte die Chose in
> Ihrem Sinne besorgen:
>
> -----------------------------------------------------
> #ko,q,z,,+,*
> zf+   1   |<<azw2>><>>/ |
> ak1   1   |>>|
> ek1   1   | |
> aei   1   11
> zf+   2   |<<azw2>> |
> xx    2   |<<azw2>>|<<azw2>>{*}{!}|
> ete   2   |{!}|
> zf+   3   |<<azw2>><>>/sq|
> t     3   ||
>           _1__2__3
> spn       21 31  3
> spj       13 22 33
> sp2       16  3 36
> sp3       12  8 32
> sp6        0  8  0
> xxx       |>>{*} |>> |
> *eof
> ------------------------------------------------------
>
> Aufs Optimieren habe ich nicht geachtet, will sagen:
> Vermutlich geht's auch noch schneller, sauberer und ein-
> facher. Auch auf Kommentare habe ich verzichtet - die
> fuege ich erst ein, wenn jemand Wert darauf legen sollte.
>
> Viele Gruesse reihum von
>
> Michael Trauth
>
>
> --------------------------------------------------------
>
>
>   
>> In einer Textdatei mit Seiten-, Zeilen- und Unterscheidungsnummern beginnen die Apparateinträge mit <azw2>>/ oder <azw2>>/>/, wobei >/ die Zeilennummer angibt, auf die sich der Apparateintrag bezieht. 
>> Ein weiterer Apparateintrag, der sich auf dieselbe Zeile bezieht, beginnt mit <azw2>. Der erste Apparateintrag einer Seite beginnt mit <at2>
>>
>> z.B.
>> 4.29  <at2>1sq.  Eintrag zu Zeile 1sq.
>> 4.30  <azw2>2    Eintrag zu Zeile 2
>> 4.31  <azw2>     Eintrag zu Zeile 2
>> 4.32  <azw2>     Eintrag zu Zeile 2
>> 4.33  <azw2>4    Eintrag zu Zeile 4
>> 4.34  <azw2>     Eintrag zu Zeile 4
>> 4.35  <azw2>5    Eintrag zu Zeile 5
>> 4.36  <azw2>10   Eintrag zu Zeile 10
>>
>> 6.34  <at2>2     Eintrag zu Zeile 2
>> 6.35  <azw2>3sq. Eintrag zu Zeile 3sq.
>> 6.36  <azw2>     Eintrag zu Zeile 3sq.
>> 6.37  <azw2>3    Eintrag zu Zeile 3
>>
>>
>>
>> In einer Austauscheanweisung möchte ich nun überprüfen, ob eine Zeilenreferenz im Apparateintrag identisch mit der aktuellen Zeilennummer des Apparates ist.
>> Dafür müßte an den Stellen, an denen nur <azw2> steht, die richtige Zeilenzahl (und ein Marker wie {*} zum späteren Entfernen der Zahlen) eingetragen werden (ohne daß sich die Seiten-, Zeilen- und Unterscheidungsnummern ändern). 
>> Allerdings sollen nur diejenigen Zeilennummern eingelesen werden, auf die ein Leerzeichen folgt (und Zeilenangaben mit Zahlsq. übergangen werden).
>>
>> 4.29  <at2>1sq.  Eintrag zu Zeile 1sq.
>> 4.30  <azw2>2    Eintrag zu Zeile 2
>> 4.31  <azw2>{*}2    Eintrag zu Zeile 2
>> 4.32  <azw2>{*}2    Eintrag zu Zeile 2
>> 4.33  <azw2>4    Eintrag zu Zeile 4
>> 4.34  <azw2>{*}4    Eintrag zu Zeile 4
>> 4.35  <azw2>5    Eintrag zu Zeile 5
>> 4.36  <azw2>10   Eintrag zu Zeile 10
>>
>> 6.34  <at2>2     Eintrag zu Zeile 2
>> 6.35  <azw2>3sq. Eintrag zu Zeile 3sq.
>> 6.36  <azw2>     Eintrag zu Zeile 3sq.
>> 6.37  <azw2>3    Eintrag zu Zeile 3
>>
>>
>>
>>
>>
>> Ich stehe mal wieder auf dem Schlauch.
>>
>> Vielen herzlichen Dank im voraus und der TUSTEPpenden Gemeinde einen schönen Wochenanfang
>>
>> Wolfram Brunschön.
>>
>> ------------------------------------------------------------
>> Tustep-Liste at itug.de
>> https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste
>>     
>
>
> ---------------------------------------------------------------
> Dr. Michael Trauth                  e-mail: trauth at uni-trier.de
> Rechenzentrum                       office: Tel. 0651-201-3413
> der Universitaet                            Fax  0651-201-3921
> Universitaetsring                secretary: Tel. 0651-201-3417
> D-54286 Trier
> ---------------------------------------------------------------
>
> ------------------------------------------------------------
> Tustep-Liste at itug.de
> https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste
>
>