<font face="Default Sans Serif,Verdana,Arial,Helvetica,sans-serif" size="2">Liebe TUSTEP-Community<br><br>Die Lösung von Herrn Schälkle (vielen Dank!) wurde von mir stante pede ins TUSTEP-Wiki aufgenommen, siehe<br><br>http://tustep.wikispaces.com/TUSCRIPT+-+Kopieren<br><br>unter "Leerzeilen einfügen"<br><br>Herzliche Grüße aus Zürich<br><br>Wolfram Schneider-Lastin<br><span><br>---<br><br>Dr. Wolfram Schneider-Lastin<br>Universität Zürich<br>Leiter der Abteilung E-Learning an der Philosophischen Fakultät<br>Koordinator für Computerphilologie<br>1. Vorsitzender der International TUSTEP User Group (ITUG)<br>Rämistrasse 69<br>CH-8001 Zürich<br><br>Tel.:  +41 - 44 - 634 50 82<br>       (wenn keine Antwort: +41 - 44 - 252 07 67)<br><br>Mail: wolfram.schneider-lastin@phil.uzh.ch<br>Web:  http://www.phil.uzh.ch/fakultaet/elearning.html</span><br><br><font color="#990099">-----tustep-liste-bounces@lists.uni-wuerzburg.de schrieb: -----</font><div style="padding-left:5px;"><div style="padding-right:0px;padding-left:5px;border-left:solid black 2px;">An: <tustep-liste@itug.de><br>Von: Kuno Schälkle <schaelkle@zdv.uni-tuebingen.de><br>Gesendet von: tustep-liste-bounces@lists.uni-wuerzburg.de<br>Datum: 09.10.2013 14:06<br>Betreff: Re: [Tustep-Liste] TUSCRIPT Leerzeile einfügen<br><br><div><font face="Courier New,Courier,monospace" size="2">Diskussionsforum Tustep-Liste<br>Weitere Informationen: www.itug.de<br>------------------------------------------------------------<br><br>Lieber Herr Schneider,<br><br>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><br>Als Frage an Herrn Schälkle/Herrn Ott:<br>Wäre es nicht möglich, ein LZN-Äquivalent als Funktion zu<br>implementieren? Der Aufwand scheint mir bei TUSCRIPT im Vgl.<br>zu #KOPIERE derzeit doch wesentlich höher zu sein, was<br>schade ist aufgrund der großen Leistungsfähigkeit (insb. in<br>der FDF-Verarbeitung), die ich mittlerweile für mich<br>entdeckt habe.<br><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<br><br>mit LZV bzw. LZN wird in #ko jeweils eine Leerzeile vor<br>allen Sätzen eingefügt, die mit einer bestimmten Zeichen-<br>folge beginnen, bzw. jeweils eine Leerzeile nach allen Sätzen<br>eingefügt, die mit eine bestimmten Zeichenfolge enden.<br><br>Dies kann man in TUSCRIPT z.B. wie folgt erreichen:<br><br>ACCESS q: READ       /RECORDS/ISO "{quelle}" n, text<br>ACCESS z: WRITE/ERASE/RECORDS/ISO  "{ziel}"  n, text<br><br>LOOP/999999<br>   READ/NEXT/EXIT q<br>   - Parameter LZV<br>   IF (text.SW."v1","v2")  WRITE/NEXT z ""<br>   WRITE/NEXT z<br>   - Parameter LZN<br>   IF (text.EW."n1","n2")  WRITE/NEXT z ""<br>ENDLOOP<br><br>ENDACCESS/PRINT q<br>ENDACCESS/PRINT z<br><br>Die Abfragen können auch mit S_TABLEs erfolgen, z.B.<br><br>   IF (text.CT.":{[}v1:{[}v2:")  WRITE/NEXT z ""<br>   ...<br>   IF (text.CT.":n1{]}:n2{]}:")  WRITE/NEXT z ""<br><br>oder auch mit R_TABLEs, z.B.<br><br><br>   IF (text.MA.":v1*:v2*:")  WRITE/NEXT z ""<br>   ...<br>   IF (text.MA.":*n1:*n2:")  WRITE/NEXT z ""<br><br>Herzliche Grüße<br>Ihr Kuno Schälkle<br><br>------------------------------------------------------------<br>Tustep-Liste@itug.de<br><a href="https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste">https://lists.uni-wuerzburg.de/mailman/listinfo/tustep-liste</a><br></font></div></schaelkle@zdv.uni-tuebingen.de></div></div><div></div></font>