[Tustep-Liste] Satz: Seitensysnopse
stahl at germanistik.uni-wuerzburg.de
stahl at germanistik.uni-wuerzburg.de
Di Mai 3 21:54:34 CEST 2005
Liebe Christiane,
in dem Band "Maschinelle Verarbeitung altdeutscher Texte V", hg. von
Moser, Stahl, Wegstein und Wolf, steht ein längerer Aufsatz, der die
Probleme eines vierspaltigen Satzes beschreibt. Die darin aufgeführte
Tue-Datei folgt weiter unten in dieser Mail. Sie müsste freilich so
angepasst werden, dass nur zwei parallele Text gesetzt werden.
Viele Grüße
Peter
-----schni schni schnappi--------------------------------------
#+++++ Vierspaltiger Satz
#+++++ 1. SCHRITT
#- 4 Dateien (BVD, BVE, BVI, BVF) anmelden
#PROTOKOLL,FREILAUFEND
#PARAMETER,AUS
#TUE,*,PARAMETER=D;E;I;F,KENNZEICHEN=!
#ANMELDE,BV!1
#DATEI,BV!1.S1,SEQ-AP
#KOPIERE,BV!1,BV!1.S1,MOD=+,LOE=+,PAR=*
mit jedem Abschnitt, der mit [ beginnt,
eine neue Seite anfangen
XX |[|&&&N&&&{ [|
*EOF*
*EOF
#+++++ 2. SCHRITT
#- die vier Dateien getrennt voneinander setzen
#TUE,*,PARAMETER=D;E;I;F,KENNZEICHEN=!
#DATEI,BV!1.S2,FRAGEN=-
#SATZ,BV!1.S1,BV!1.S2,T,+,*
BRE 88 88 88 88 88 88 88
GRO 8+1 8+1 0+0 8+1 8+1 8+1 8+1
MON 1 0 88 6 6
ABB 40 20
*EOF*
*EOF
#+++++ 3. SCHRITT
#- Die Zieldateien des Satzlaufs in eine
Datei kopieren
#TUE,*,PARAMETER=D;E;I;F,KENNZEICHEN=!
#DATEI,BV!1.S3,FRAGEN=-
#KOPIERE,BV!1.S2,BV!1.S3,-,+,*
ERG |{{!1}}|
*EOF*
*EOF
#+++++ 4. SCHRITT
#DATEI,BV.S4,FRAGEN=-
#MISCHE,BVD.S3'BVE.S3'BVI.S3'BVF.S3,BV.S4,SORT=0
#+++++ 5. SCHRITT
#- überschüssige Längen der Spalten
durch Leerzeilen ausgleichen
#DATEI,BV.S5,FRAGEN=-
#KOPIERE,BV.S4,BV.S5,-STD-,+,*
KEN .{{d}}.{{e}}.{{i}}.{{f}}.
KSP 12 22 32 42
SP2 12 22 32 42 3 3 3 3 3 3 3 3 3 3 3 3
RR I9=I1; I1=1; IF (I9 .EQ. 1) GOTO 52;
RR IF (I9 .EQ. 2) GOTO 62;
RR IF (I9 .EQ. 3) GOTO 72;
RR IF (I9 .EQ. 4) GOTO 3;
RR IF (I9 .EQ. 0) GOTO 3;
RR 2 I9=I1; I1=2; IF (I9 .EQ. 1) GOTO 3;
RR 2 IF (I9 .EQ. 2) GOTO 82;
RR 2 IF (I9 .EQ. 3) GOTO 92;
RR 2 IF (I9 .EQ. 4) GOTO 102;
RR 3 I9=I1; I1=3; IF (I9 .EQ. 1) GOTO 112;
RR 3 IF (I9 .EQ. 2) GOTO 3;
RR 3 IF (I9 .EQ. 3) GOTO 122;
RR 3 IF (I9 .EQ. 4) GOTO 132;
RR 4 I9=I1; I1=4; IF (I9 .EQ. 1) GOTO 142;
RR 4 IF (I9 .EQ. 2) GOTO 152;
RR 4 IF (I9 .EQ. 3) GOTO 3;
RR 4 IF (I9 .EQ. 4) GOTO 162;
ERG 5 |{{e}}$$$ ___{{i}}$$$ ___{{f}}$$$ ___|
ERG 6 |{{i}}$$$ ___{{f}}$$$ ___|
ERG 7 |{{f}}$$$ ___|
ERG 8 |{{d}}$$$ ___{{i}}$$$ ___{{f}}$$$ ___|
ERG 9 |{{d}}$$$ ___{{f}}$$$ ___|
ERG 10 |{{d}}$$$ ___|
ERG 11 |{{e}}$$$ ___|
ERG 12 |{{d}}$$$ ___{{e}}$$$ ___{{f}}$$$ ___|
ERG 13 |{{d}}$$$ ___{{e}}$$$ ___|
ERG 14 |{{e}}$$$ ___{{i}}$$$ ___|
ERG 15 |{{i}}$$$ ___|
ERG 16 |{{d}}$$$ ___{{e}}$$$ ___{{i}}$$$ ___|
*EOF
#+++++ 6. SCHRITT
#DATEI,BV.S6,FRAGEN=-
#KOPIERE,BV.S5,BV.S6,+,+,*
ZA |{{|
*EOF
#+++++ 7. SCHRITT
#- Die Datei wieder in vier einzelne Dateien zerlegen
#TUE,*,PARAMETER=D;E;I;F,KENNZEICHEN=!
#DATEI,BV!1.S7,FRAGEN=-
*EOF
#KOP,BV.S6,BVD.S7'BVE.S7'BVI.S7'BVF.S7,-STD-,+,*
WS+ 1
SPW 21
SP2 21 8 8 8 8 8
SP3 0 0 0 0 0 0
RR I0=I0+1; IF (I0 .EQ. 4) WS1=1
XX |}}|}}&!U |
KEN 2 |{{d}}|{{e}}|{{i}}|{{f}}|
KSP 2 33 43 53 63
ZD 3 1
ZD 4 2
ZD 5 3
ZD 6 4
XXX |{{d}}||{{e}}||{{i}}||{{f}}||
XXX |&&&N&&&{|$$$/$$$ |
*EOF
#+++++ 8. SCHRITT
#- Die vier neuen Dateien auf unterschiedlichen
Positionen setzen
#TUE,*,PARAMETER=D;E;I;F,KENNZEICHEN=!
#DATEI,BV!1.S8Z,FRAGEN=-
#DATEI,BV!1.S8A,FRAGEN=-
#DATEI,BV!1.S8P,FRAGEN=-
*EOF
#SATZ,BVD.S7,BVD.S8Z,T,+,*,BVD.S8A,BVD.S8P
BRE 88 88 88 88 88 382 382
HOE 572 2 0 0 1
GRO 8+1 8+1 0+0 8+1 8+1 8+1 8+1
MON 1 0 88 6 6
ABB 40 20
*EOF
#SATZ,BVE.S7,BVE.S8Z,T,+,*,BVE.S8A,BVE.S8P
BRE 88 88 88 88 88 88 88
HOE 572 2 0 0 1
SEI 1 1 0
GRO 8+1 8+1 0+0 8+1 8+1 8+1 8+1
MON 1 0 88 100 6
ABB 40 20
*EOF
#SATZ,BVI.S7,BVI.S8Z,T,+,*,BVI.S8A,BVI.S8P
BRE 88 88 88 88 88 88 88
HOE 572 2 0 0 1
SEI 1 1 0
GRO 8+1 8+1 0+0 8+1 8+1 8+1 8+1
MON 1 0 88 194 6
ABB 40 20
*EOF
#SATZ,BVF.S7,BVF.S8Z,T,+,*,BVF.S8A,BVF.S8P
BRE 88 88 88 88 88 88 88
HOE 572 2 0 0 1
SEI 1 1 0
GRO 8+1 8+1 0+0 8+1 8+1 8+1 8+1
MON 1 0 88 288 6
ABB 40 20
*EOF
#+++++ 9. SCHRITT
#- Montage der Ausgabedatei
#DATEI,BV.S9,FRAGEN=-
#*MONT,BVD.S8A'BVE.S8A'BVI.S8A'BVF.S8A,BV.S9,+
#+++++ 10. SCHRITT
#- Ausgeben, fertig
#DATEI,BV.PS,SDF-AP
#*PSAUS,BV.S9,DATEI=BV.PS,KOPF=-,LOESCHE=+
-----schni schni schnappi--------------------------------------
Mehr Informationen über die Mailingliste Tustep-Liste