Vazeni PostScript gurus pomozte. Mam dokumentaci v podobe PostScript souboru
ale kdyz ji chci tisknout na HPLJ III , tak se vzdy zprici a zacne chtit
papir type letter. Nepomohlo ani zamenit rozmery z 612 792 na 595 842
jako to napr je doporuceno u dokumentu z Framemakeru. Tusimze zrada bude
nekde v tech definicich slovniku ale PS zatim moc nerozumim. Muzete nekdo
poradit, jak to zmenit na A4 ? Original soubor z ktereho to bylo
konvertovano do PS pochopitelne neni k dispozici :-(
Dekuji predem za pomoc.
Nasleduje hlavicka :
%!
%%Dimensions: 0 0 612 792
%%Title: dvialw -b cluser.dvi
%%CreationDate: Wed Jun 20 13:42:33 1990
%%Creator: jbarnes and [TeX82 DVI Translator Version 2.10b for PostScri-
%-pt [Apple LaserWriter laser printer]
%%Pages: (atend)
%%BugHistory: Incorporates Allan Hetzel's 31-Oct-85 DARPA LASER-LOVERS -
%-PS Version 23.0 X-on/X-off bug workaround
%%EndComments
%%EndProlog
/TeXdict 200 dict def
TeXdict begin
/bdf {bind def} def
/B
{
/h exch def
/w exch def
gsave
currentpoint
newpath
moveto
w 1 sub 0 rlineto
0 h 1 sub rlineto
w 1 sub neg 0 rlineto
closepath fill
grestore
} bdf
/BOJ
{
72 Resolution div 72 Resolution div scale
userdict /note known
{NOTE}
{LETTER}
ifelse
} bdf
/BOP
{
clear
Mtrx setmatrix
25 0 translate
} bdf
/ch-image {ch-data 0 get} bdf
/ch-xoff {ch-data 1 get} bdf
/ch-yoff {ch-data 2 get} bdf
/ch-width {ch-data 3 get} bdf
/ch-height {ch-data 4 get} bdf
/ch-tfmw {ch-data 5 get} bdf
/CharBuilder
{
/ch-code exch def
/font-dict exch def
/ch-data font-dict /BitMaps get
ch-code get def
ch-data null eq not
{
ch-tfmw 0
ch-xoff neg ch-yoff ch-height sub
ch-width ch-xoff sub ch-yoff
setcachedevice
0 0 SNAP translate
ch-width ch-height true [ 1 0 0 -1 ch-xoff ch-yoff ]
{ch-image} imagemask
} if
} bdf
/D
{
/ch-code exch def
/ch-data exch def
currentfont /BitMaps get ch-code ch-data put
currentfont /Encoding get ch-code dup 3 string cvs cvn put
} bdf
/EOJ
{
end
} bdf
/EOP
{
/#copies exch def
showpage
} bdf
/LANDSCAPE
{
letter initmatrix
72 Resolution div dup scale
0 3300 translate
-90 rotate
0 -750 translate
Mtrx currentmatrix pop
} bdf
/LEGAL
{
legal initmatrix
72 Resolution div dup scale
0 900 translate
Mtrx currentmatrix pop
} bdf
/LETTER
{
letter initmatrix
72 Resolution div dup scale
Mtrx currentmatrix pop
} bdf
/M
{
moveto
} bdf
/Mtrx 6 array def
/NF
{
/newname exch def
newname 7 dict def
newname load
begin
/BitMaps 128 array def
/BuildChar { CharBuilder } def
/Encoding 128 array def
0 1 127 { Encoding exch /.notdef put } for
/FontBBox [ 0 0 1 1 ] def
/FontMatrix [ 1 0 0 1 0 0 ] def
/FontType 3 def
end
newname newname load definefont pop
} bdf() pop
/NOTE
{
note initmatrix
72 Resolution div dup scale
Mtrx currentmatrix pop
} bdf
/P {show} bdf() pop
/Q {moveto w h B} bdf() pop
/R {0 rmoveto show} bdf() pop
/Resolution 300 def
/S {moveto show} bdf() pop
/SF {findfont exch scalefont setfont} bdf() pop
/SNAP {transform 2 {floor 0.5 add exch} repeat itransform} bdf
/T {currentpoint exch pop moveto show} bdf() pop
end
TeXdict begin
BOJ
*************************************************************************
* Petr Skoda Tel : (0204) 85201, l. 361 *
* Stelarni oddeleni (0204) 857361, 857136 *
* Astronomicky ustav AVCR Fax : (02) 881611 *
* 251 65 Ondrejov e-mail: skoda at sunstel.asu.cas.cz *
* Ceska republika aststel at csearn.bitnet *
*************************************************************************