vallog: PostScript FontTransformations, makefont, newline

2009/11/13

% --- variables ------------------------
/basefont /Times-Roman findfont def
/LM 72 def
/line-height 53 def

% --- procedures -----------------------
/newline {
    currentpoint line-height sub
    exch pop LM
    exch moveto
} def

/up {
40 add
} def

% --- main -----------------------------
LM 600 moveto

basefont [12 up 0 0 12 up 0 0] makefont setfont
("Talking of axes,") show newline

basefont [17 up 0 0 12 up 0 0] makefont setfont
(said the Duchess,) show newline

basefont [7 up 0 0 12 up 0 0] makefont setfont
("Off with her head!") show newline

basefont [12 up 0 6.93 up 12 up 0 0] makefont setfont
( - Lewis Carrol) show
showpage

posted with amazlet at 09.10.07

Adobe Systems Inc.
Addison-Wesley Professional
売り上げランキング: 235737

おすすめ度の平均: 5.0

まず最初に読むべき入門書
効率の良いPostScript書くなら…

vallog