PS szövegobjektum ( String )


Def:
( ) zárójelek között felsorolt karaktersorozat, mely elhelyezhetõ veremben, változó értéke lehet, kinyomtatható.

PS font:
Egységes tervezésû karakterek halmaza, melyek tipus - családokba sorolhatók (pl.: Arial, Times New Roman, Helvetia ), különböző változatai vannak ( Roman, Italic, Bold ... stb... ) amelyek a karakterek határvonalainak geometriai leírásával vannak definiálva.

Használat:
1.) font leírás megkeresése a font szótárban
2.) font méretének beállítása ( milyen távol legyenek a sorok )
3.) a beállított font legyen a kurrens font.

Példa:
a "typography" szöveg kinyomtatása 15 pontos Times New Roman fonttal.
 
/Times - Roman findfont
15 scalefont
setfont
72200 moveto
(typography) show
showpage
 

kulcs findfont font
kulcs-csal meghatározott font-szótárat helyez a verem tetejére ( az un. font - alkönyvtárból - Font Directory ). Ez a font 1 pont méretû

font skála scalefont font'
a skálával növelt méretû fontot helyez el a veremben.

font setfont -
a verem tetején levõ font lesz a kurrens font

szöveg show -
a verem tetején álló szöveget kinyomtatja a kurrens oldalra a kurrens ponttól kezdve. Az új kurrens pont a szöveg végén lesz.


Példa:    változó méretû szöveg nyomtatása


/showGorilla
{ moveto (Gorilla) show } def
/Times - Roman findfont 6 scalefont setfont
72300 showGorilla
/Times - Roman findfont 10 scalefont setfont
72275 showGorilla
/Times - Roman findfont 15 scalefont setfont
72275 showGorilla
/Times - Roman findfont 20 scalefont setfont
72225 showGorilla
 


ShowGorilla eljárás:
A verem felsõ két eleme által meghatározott pozícíóra helyezi a szöveget és kinyomtatja


/showGorilla
{ moveto (Gorilla) show } def

/scaleTimes
{/Times - Roman findfont
exch scalefont
setfont } def
 

6 scale Times
72300 showGorilla
10 scale Times
72275 showGorilla
15 scale Times
72250 showGorilla
25 scale Times
72225 showGorilla

showpage


Példa:   szöveg és grafika együtt ( névjegykártya )



%---------------Variables---------------

/MainFont
    /Helvetia - Bold findfont 15 scalefont def
/SloganFont
    /Helvetia-Oblique findfont 7 scalefont def
/OwnerFont
    /Helvetia findfont 10 scalefont def

%---------------Procedures--------------

/rightshow
{dup stringwidth pop
 120 exch sub %calc. white space
 0 rmoveto    %Move over that much
 show} def

----------------------------------------

/CardOutline
{newpath
  90   90 moveto
   0  144 rlineto
 252    0 rlineto
   0  144 rlineto
 closepath
 .5 setlinewidth
 stroke } def
 

/doBorder
{ 99   99 moveto
   0  126 rlineto
 234    0 rlineto
   0 -126 rlineto
 closepath
 2 setlinewidth
 stroke } def

 

/Diamond
{newpath
 207 216 moveto
  36 -54 rlineto
 -36 -54 rlineto
 -36  54 rlineto
 closepath
 .8 setgray fill } def
 

/doText
{0 setgray 90 180 moveto
 MainFont setfont
 {Diamond Cafe ) rightshow
 90 168 moveto
 SlogaFont setfont
 ("The Club Of Lonely Hearts")rightshow
 216 126 moveto
 OwnerFont setfont
 ( Sam spade ) show
 216 111 moveto
 (Owner ) show } def
 

%-------------- Main program -------------------

CardOutline
doBorder
Diamond
doText

showpage
 
  szöveg stringwidth x y
a verem tetején levõ szöveget helyettesíti annak x és y irányú méretével


a lap teteje