[[tustep:loesungen:satz_mit_modul_satz|Zurück zum Inhaltsverzeichnis - Satz mit Modul SATZ]] ---- ====== Schwarze Seite mit weißer Schrift setzen ====== - [ wilhelmott | wilhelmott ]\\ \\ **Aufgabe:** Eine Zwischenseite soll schwarz mit weißer Schrift gesetzt werden.\\ Es wurde eine Lösung gewählt, bei der ein **seitengroßes schwarzes Rechteck** mit **PostScript-Mitteln** erzeugt und über die Seite 3 gelegt wird. Alles Weitere ist als Erläuterung dem dort hinein in weißer Schrift gesetzten Text zu entnehmen.\\ \\ #da,scr*q,fr=- #um,*,scr*q,,+ %! % Definieren der x- und y-Koordinaten des Rechtecks: /xl -36 def /xr 340 def /yo 36 def /yu -520 def % Rechteck zeichnen und schwarz ausfüllen: xl yo moveto xl yu lineto xr yu lineto xr yo lineto closepath 0 setgray fill *eof #da,schwarz.grf,seq-ap #*grafik,scr*q,schwarz.grf,lo=-std-,nu=1,ab=0*0 #um,*,scr*q,,+ Seite 1 &&&-3&&&{ $$#1$${ &&\&!c(100)#3+#f+Überschrift#f-#3-&!c{&&{ &!c(100)#f+Und hier geht der Text weiter#f- $$$ und hört noch lang nicht auf $$$ #/+man sieht ihn freilich nur auf schwarzem Hintergrund#/- $$$ @-0(das Zeilenende ist hier:) --#(gr) | $$$=$$$ &!c(100)(Hier muss Umschalten auf weiß wiederholt werden, weil bei Leerzeile Auszeichnungs-Ende ergänzt wird. Ähnliches gilt oben für die Überschrift. $$$ ___ $$$ Wenn das ganze Blatt und nicht nur der Satzspiegel schwarz sein soll, dann muss das schwarze Rechteck auch über die Beschnittkante hinausragen. Das kann durch Wahl von geeigneten Werten für die Koordinaten xl xr yo yu geschenen, wobei l für links, r für rechts, o für oben und u für unten stehen soll.) &!a $$$ Und das ist die letzte Zeile der Seite bzw. die Unterkante des Satzspiegels.&!c{ &&&n&&&{ Und auf der neuen Seite ist der Text wieder schwarz auf weiß. *eof #da,z'a'p,fr=- #sa,scr*q,z,t,+,*,a,p mac &!m1 $$$&!p1 *eof #da,tst.ps,sdf-ap #*psaus,a,da=tst.ps,gr=schwarz.grf #makro $$browse "tst.ps" *eof ---- [[tustep:loesungen:satz_mit_modul_satz|Zurück zum Inhaltsverzeichnis - Satz mit Modul SATZ]]