/misc/src/release/graphviz-2.18-1/src/graphviz-2.18/lib/common/ps.h

Go to the documentation of this file.
00001 char *ps_txt[] = {
00002 "%%BeginProlog",
00003 "/DotDict 200 dict def",
00004 "DotDict begin",
00005 "",
00006 "/setupLatin1 {",
00007 "mark",
00008 "/EncodingVector 256 array def",
00009 " EncodingVector 0",
00010 "",
00011 "ISOLatin1Encoding 0 255 getinterval putinterval",
00012 "EncodingVector 45 /hyphen put",
00013 "",
00014 "% Set up ISO Latin 1 character encoding",
00015 "/starnetISO {",
00016 "        dup dup findfont dup length dict begin",
00017 "        { 1 index /FID ne { def }{ pop pop } ifelse",
00018 "        } forall",
00019 "        /Encoding EncodingVector def",
00020 "        currentdict end definefont",
00021 "} def",
00022 "/Times-Roman starnetISO def",
00023 "/Times-Italic starnetISO def",
00024 "/Times-Bold starnetISO def",
00025 "/Times-BoldItalic starnetISO def",
00026 "/Helvetica starnetISO def",
00027 "/Helvetica-Oblique starnetISO def",
00028 "/Helvetica-Bold starnetISO def",
00029 "/Helvetica-BoldOblique starnetISO def",
00030 "/Courier starnetISO def",
00031 "/Courier-Oblique starnetISO def",
00032 "/Courier-Bold starnetISO def",
00033 "/Courier-BoldOblique starnetISO def",
00034 "cleartomark",
00035 "} bind def",
00036 "",
00037 "%%BeginResource: procset graphviz 0 0",
00038 "/coord-font-family /Times-Roman def",
00039 "/default-font-family /Times-Roman def",
00040 "/coordfont coord-font-family findfont 8 scalefont def",
00041 "",
00042 "/InvScaleFactor 1.0 def",
00043 "/set_scale {",
00044 "       dup 1 exch div /InvScaleFactor exch def",
00045 "       scale",
00046 "} bind def",
00047 "",
00048 "% styles",
00049 "/solid { [] 0 setdash } bind def",
00050 "/dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def",
00051 "/dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def",
00052 "/invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def",
00053 "/bold { 2 setlinewidth } bind def",
00054 "/filled { } bind def",
00055 "/unfilled { } bind def",
00056 "/rounded { } bind def",
00057 "/diagonals { } bind def",
00058 "",
00059 "% hooks for setting color ",
00060 "/nodecolor { sethsbcolor } bind def",
00061 "/edgecolor { sethsbcolor } bind def",
00062 "/graphcolor { sethsbcolor } bind def",
00063 "/nopcolor {pop pop pop} bind def",
00064 "",
00065 "/beginpage {   % i j npages",
00066 "       /npages exch def",
00067 "       /j exch def",
00068 "       /i exch def",
00069 "       /str 10 string def",
00070 "       npages 1 gt {",
00071 "               gsave",
00072 "                       coordfont setfont",
00073 "                       0 0 moveto",
00074 "                       (\\() show i str cvs show (,) show j str cvs show (\\)) show",
00075 "               grestore",
00076 "       } if",
00077 "} bind def",
00078 "",
00079 "/set_font {",
00080 "       findfont exch",
00081 "       scalefont setfont",
00082 "} def",
00083 "",
00084 "% draw text fitted to its expected width",
00085 "/alignedtext {                 % width text",
00086 "       /text exch def",
00087 "       /width exch def",
00088 "       gsave",
00089 "               width 0 gt {",
00090 "                       [] 0 setdash",
00091 "                       text stringwidth pop width exch sub text length div 0 text ashow",
00092 "               } if",
00093 "       grestore",
00094 "} def",
00095 "",
00096 "/boxprim {                             % xcorner ycorner xsize ysize",
00097 "               4 2 roll",
00098 "               moveto",
00099 "               2 copy",
00100 "               exch 0 rlineto",
00101 "               0 exch rlineto",
00102 "               pop neg 0 rlineto",
00103 "               closepath",
00104 "} bind def",
00105 "",
00106 "/ellipse_path {",
00107 "       /ry exch def",
00108 "       /rx exch def",
00109 "       /y exch def",
00110 "       /x exch def",
00111 "       matrix currentmatrix",
00112 "       newpath",
00113 "       x y translate",
00114 "       rx ry scale",
00115 "       0 0 1 0 360 arc",
00116 "       setmatrix",
00117 "} bind def",
00118 "",
00119 "/endpage { showpage } bind def",
00120 "/showpage { } def",
00121 "",
00122 "/layercolorseq",
00123 "       [       % layer color sequence - darkest to lightest",
00124 "               [0 0 0]",
00125 "               [.2 .8 .8]",
00126 "               [.4 .8 .8]",
00127 "               [.6 .8 .8]",
00128 "               [.8 .8 .8]",
00129 "       ]",
00130 "def",
00131 "",
00132 "/layerlen layercolorseq length def",
00133 "",
00134 "/setlayer {/maxlayer exch def /curlayer exch def",
00135 "       layercolorseq curlayer 1 sub layerlen mod get",
00136 "       aload pop sethsbcolor",
00137 "       /nodecolor {nopcolor} def",
00138 "       /edgecolor {nopcolor} def",
00139 "       /graphcolor {nopcolor} def",
00140 "} bind def",
00141 "",
00142 "/onlayer { curlayer ne {invis} if } def",
00143 "",
00144 "/onlayers {",
00145 "       /myupper exch def",
00146 "       /mylower exch def",
00147 "       curlayer mylower lt",
00148 "       curlayer myupper gt",
00149 "       or",
00150 "       {invis} if",
00151 "} def",
00152 "",
00153 "/curlayer 0 def",
00154 "",
00155 "%%EndResource",
00156 "%%EndProlog",
00157 "%%BeginSetup",
00158 "14 default-font-family set_font",
00159 "1 setmiterlimit",
00160 "% /arrowlength 10 def",
00161 "% /arrowwidth 5 def",
00162 "",
00163 "% make sure pdfmark is harmless for PS-interpreters other than Distiller",
00164 "/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse",
00165 "% make '<<' and '>>' safe on PS Level 1 devices",
00166 "/languagelevel where {pop languagelevel}{1} ifelse",
00167 "2 lt {",
00168 "    userdict (<<) cvn ([) cvn load put",
00169 "    userdict (>>) cvn ([) cvn load put",
00170 "} if",
00171 "",
00172 "%%EndSetup",
00173 (char*)0 };

Generated on Mon Mar 31 19:03:25 2008 for Graphviz by  doxygen 1.5.1