%!PS-Adobe-3.0 EPSF-3.0 DM95:Y10-7N.EPS 20030301 %%BoundingBox: 50 80 780 360 %START PDFDE011.EPS /pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [ /Title (PostScript pictures: Y11-1N.EPS) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://o2.ps.bam.de or http://www.ps.bam.de) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@bam.de) /CreationDate (D:2003030112000) /ModDate (D:2003030112000) /DOCINFO pdfmark [ /View [ /FitB ] /DOCVIEW pdfmark %END PDFDE011 %%Creator: K. Richter, BAM und TU Berlin, 2000.06.16 %%+Copyright (c) 1996 VDE-Verlag Berlin Offenbach /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def % !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-I /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIK {250 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBK {250 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIK {250 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def %ANFA CMYKDEF %CMYKDEA0 (A0=Standard-Drucker-CMYKDEF) 15.3.97 /tzac [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzam [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzay [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzan [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tza0 [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000] def /tza1 [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000] def %ENDE CMYKD /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /colrecfi %x y width heigth c m y n {setcmykcolor rec fill} bind def /colrecst %x y width heigth c m y n {setcmykcolor rec stroke} bind def /tzo {0.0 1.0 1.0 0.0} bind def %Reproduktionsfarben /tzl {1.0 0.0 1.0 0.0} bind def /tzv {1.0 1.0 0.0 0.0} bind def /tzc {1.0 0.0 0.0 0.0} bind def /tzm {0.0 1.0 0.0 0.0} bind def /tzy {0.0 0.0 1.0 0.0} bind def /tzn {0.0 0.0 0.0 1.00} bind def %Graureihe /tzd {0.0 0.0 0.0 0.75} bind def /tzz {0.0 0.0 0.0 0.50} bind def /tzh {0.0 0.0 0.0 0.25} bind def /tzw {0.0 0.0 0.0 0.00} bind def /tzr {0.0 1.0 0.5 0.0} bind def %Elementarfarben /tzg {1.0 0.0 0.5 0.0} bind def /tzb {1.0 0.5 0.0 0.0} bind def /tzj {0.0 0.0 1.0 0.0} bind def /tzrz {0.0 1.0 0.5 0.5} bind def %Elementarfarben vergraut /tzgz {1.0 0.0 0.5 0.5} bind def /tzbz {1.0 0.5 0.0 0.5} bind def /tzjz {0.0 0.0 1.0 0.5} bind def /tfo {tzo setcmykcolor} bind def /tfl {tzl setcmykcolor} bind def /tfv {tzv setcmykcolor} bind def /tfc {tzc setcmykcolor} bind def /tfm {tzm setcmykcolor} bind def /tfy {tzy setcmykcolor} bind def /tfn {tzn setcmykcolor} bind def /tfd {tzd setcmykcolor} bind def /tfz {tzz setcmykcolor} bind def /tfh {tzh setcmykcolor} bind def /tfw {tzw setcmykcolor} bind def /tfr {tzr setcmykcolor} bind def /tfg {tzg setcmykcolor} bind def /tfb {tzb setcmykcolor} bind def /tfj {tzj setcmykcolor} bind def /tfrz {tzrz setcmykcolor} bind def /tfgz {tzgz setcmykcolor} bind def /tfbz {tzbz setcmykcolor} bind def /tfjz {tzjz setcmykcolor} bind def %ANFA OUTLINO0 951204 /pixf 1.0 def /ueg {1.6 pixf mul} bind def /uek {0.8 pixf mul} bind def /ues {0.7 pixf mul} bind def /pxd uek def /pyd uek def /pxwd ueg def /pywd ueg def /outxshowf {show} bind def /outxshow {show} bind def /SK {250 16.67 div 1 sub pixf mul /Symbol FS} bind def /SM {300 16.67 div 1 sub pixf mul /Symbol FS} bind def /SG {350 16.67 div 1 sub pixf mul /Symbol FS} bind def /outSK {250 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def /outSM {300 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def /outSG {350 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def /outshowf {setcmykcolor show} bind def /outrecfi { %x y width heigth c m y k setcmykcolor rec fill} bind def /outrecfi4 { %x y width heigth c m y k outrecfi} bind def /outrecfi3 { %x y width heigth c m y k outrecfi} bind def /outrecfi2 { %x y width heigth c m y k outrecfi} bind def /outlinetos { %px py c m y k setcmykcolor lineto stroke} bind def /outstroke { %px1 py1 curveto ... curveto c m y k setcmykcolor stroke} bind def %%EndProlog gsave %LANINDL0.EPS START 20000505 /lanind 0 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {3 lanind eq {show} {pop} ifelse} bind def /showfr {2 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /popde {0 lanind ne {pop} if} bind def /popen {1 lanind ne {pop} if} bind def /popes {3 lanind ne {pop} if} bind def /popfr {2 lanind ne {pop} if} bind def /popit {4 lanind ne {pop} if} bind def /popjp {5 lanind ne {pop} if} bind def /popm {6 lanind ne {pop} if} bind def /popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def /popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def /popxes {/n exch def 3 lanind ne {n {pop} repeat} if} bind def /popxfr {/n exch def 2 lanind ne {n {pop} repeat} if} bind def /popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def /popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def /popxm {/n exch def 6 lanind ne {n {pop} repeat} if} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 2 def /lanind2 2 def} ifelse /xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def} {/xcolor1 0 def /xcolor2 0 def} ifelse /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def} {/xchart1 0 def /xchart2 0 def} ifelse /lanind lanind1 def %no loops /xcolor xcolor1 def /xchart xchart1 def %LANINDL0 END /RK8 {8 /Times-Roman FS} bind def /RIK8 {8 /Times-Italic FS} bind def /RBK8 {8 /Times-Bold FS} bind def /RBIK8 {8 /Times-BoldItalic FS} bind def /TS8 {6 /Times-ISOL1 FS} bind def /TK8 {8 /Times-ISOL1 FS} bind def /TIK8 {8 /TimesI-ISOL1 FS} bind def /TBK8 {8 /TimesB-ISOL1 FS} bind def /TBIK8 {8 /TimesBI-ISOL1 FS} bind def RK8 72 83 moveto % (4x2, DM95:Y10-7, ) show 72 80 moveto TK8 (Bild B4 und D4: 16 gleichabst\344ndige Stufen ) showde (Picture B4 and D4: 16 equidistant steps ) showen (Fig. B4 y D4: 16 equidistante pasos ) showes (Fig. B4 et D4 : 16 paliers \351quidistants ) showfr (Fig. B4 e D4: 16 equidistante passi ) showit (Figur B4 og D4: 16 equidistant steps ) showjp RBIK8 (B4: W-C, W-M, W-Y ) show TK8 (und ) showde (and ) showen (y ) showes (et ) showfr (i ) showit (og ) showjp RBIK8 (W-N; ) show RBIK8 (D4: W-O, W-L, W-V ) show TK8 (und ) showde (and ) showen (y ) showes (et ) showfr (i ) showit (og ) showjp RBIK8 (W-N(CMY); ) show TIK8 (PS) show RK8 (-Operators;) showde ( operators;) showen ( operators;) showes TK8 ( op\351rateurs;) showfr ( operators;) showit ( operators;) showjp TK8 ( B4:) show RIK8 ( cmy0* / 000n* setcmykcolor;) show TK8 ( D4:) show RIK8 ( cmy0* setcmykcolor ) show TK8 ((only)) show 72 90 translate 0.01 MM 2 mul dup scale 15 setlinewidth /tzo4 64 array def /tzl4 64 array def /tzv4 64 array def /tzn4 64 array def /tza4 64 array def 0 1 15 {/nfar exch def /nfar4 nfar 4 mul def tzo4 nfar4 0.0 put tzo4 nfar4 1 add tzam nfar get put tzo4 nfar4 2 add tzay nfar get put tzo4 nfar4 3 add 0.0 put tzl4 nfar4 tzac nfar get put tzl4 nfar4 1 add 0.0 put tzl4 nfar4 2 add tzay nfar get put tzl4 nfar4 3 add 0.0 put tzv4 nfar4 tzac nfar get put tzv4 nfar4 1 add tzam nfar get put tzv4 nfar4 2 add 0.0 put tzv4 nfar4 3 add 0.0 put tzn4 nfar4 tzan nfar get put tzn4 nfar4 1 add tzan nfar get put tzn4 nfar4 2 add tzan nfar get put tzn4 nfar4 3 add 0.0 put} for 1 setgray 0 0 moveto 11200 0 rlineto 0 4000 rlineto -11200 0 rlineto closepath fill 0 setgray 0 0 moveto 11200 0 rlineto 0 4000 rlineto -11200 0 rlineto closepath stroke /yab -850 def 000 3950 translate /n* [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def /tef [(O) (L) (V) (N)] def /tex [(0my0*) (c0y0*) (cm00*) (cmy0*)] def /cola [tzo4 tzl4 tzv4 tzn4] def 0 setgray 0 1 16 {/j exch def /ix0 j 700 mul def /iy0 -850 def %j=0,16 ix0 25 add iy0 3100 sub moveto 000 4000 rlineto -50 000 rlineto 000 -4000 rlineto closepath fill } for %j=0,16 0 1 3 {/ncol exch def %=0,3 für C, M, Y, N 0 ncol eq {/tza4 tzo4 def} if 1 ncol eq {/tza4 tzl4 def} if 2 ncol eq {/tza4 tzv4 def} if 3 ncol eq {/tza4 tzn4 def} if 0 yab translate %0 1 01 {/l exch def /l 0 def 0 1 15 {/j exch def /j4 15 j sub 4 mul def /ix0 j 700 mul def /iy0 0 def j 15 le { %16 Testfarben; Nr. 16 fuer weisse Linie tza4 j4 get tza4 j4 1 add get tza4 j4 2 add get tza4 j4 3 add get setcmykcolor l 0 eq {/ixd 700 def /iyd 700 def %ixd,iyd ix0 iy0 moveto ixd 000 rlineto 000 iyd rlineto ixd neg 000 rlineto closepath fill } if %ixd,iyd } if } for %j % } for %l 0 setgray TBIG 11350 400 moveto tef ncol get show TIK 11300 150 moveto tex ncol get show 0 setgray TBM ncol 3 eq { %N 0 1 15 {/j exch def /ix0 250 j 700 mul add def /iy0 -350 def ix0 iy0 moveto n* j get show } for %j } if %N } for %ncol=0,1,2,3 für O, L, V 000 -550 translate 1 setgray %change 0 3950 moveto 11200 0 rlineto 0 700 rlineto -11200 0 rlineto closepath fill 0 setgray 0 3950 moveto 11200 0 rlineto 0 700 rlineto -11200 0 rlineto closepath stroke 0 25 add 3950 moveto 0 700 rlineto -50 0 rlineto 0 -700 rlineto closepath fill 11200 25 add 3950 moveto 0 700 rlineto -50 0 rlineto 0 -700 rlineto closepath fill 0 1 7 {/j exch def %8 black squares 0 j 1400 mul add 3950 moveto 700 0 rlineto 0 700 rlineto -700 0 rlineto closepath fill } for 0 setgray TIK 11300 150 moveto (*=input) show showpage %%Trailer