Graphviz  2.29.20120524.0446
plugin/core/ps.h
Go to the documentation of this file.
00001 static const 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 "/tapered { } bind def",
00059 "",
00060 "% hooks for setting color ",
00061 "/nodecolor { sethsbcolor } bind def",
00062 "/edgecolor { sethsbcolor } bind def",
00063 "/graphcolor { sethsbcolor } bind def",
00064 "/nopcolor {pop pop pop} bind def",
00065 "",
00066 "/beginpage {   % i j npages",
00067 "       /npages exch def",
00068 "       /j exch def",
00069 "       /i exch def",
00070 "       /str 10 string def",
00071 "       npages 1 gt {",
00072 "               gsave",
00073 "                       coordfont setfont",
00074 "                       0 0 moveto",
00075 "                       (\\() show i str cvs show (,) show j str cvs show (\\)) show",
00076 "               grestore",
00077 "       } if",
00078 "} bind def",
00079 "",
00080 "/set_font {",
00081 "       findfont exch",
00082 "       scalefont setfont",
00083 "} def",
00084 "",
00085 "% draw text fitted to its expected width",
00086 "/alignedtext {                 % width text",
00087 "       /text exch def",
00088 "       /width exch def",
00089 "       gsave",
00090 "               width 0 gt {",
00091 "                       [] 0 setdash",
00092 "                       text stringwidth pop width exch sub text length div 0 text ashow",
00093 "               } if",
00094 "       grestore",
00095 "} def",
00096 "",
00097 "/boxprim {                             % xcorner ycorner xsize ysize",
00098 "               4 2 roll",
00099 "               moveto",
00100 "               2 copy",
00101 "               exch 0 rlineto",
00102 "               0 exch rlineto",
00103 "               pop neg 0 rlineto",
00104 "               closepath",
00105 "} bind def",
00106 "",
00107 "/ellipse_path {",
00108 "       /ry exch def",
00109 "       /rx exch def",
00110 "       /y exch def",
00111 "       /x exch def",
00112 "       matrix currentmatrix",
00113 "       newpath",
00114 "       x y translate",
00115 "       rx ry scale",
00116 "       0 0 1 0 360 arc",
00117 "       setmatrix",
00118 "} bind def",
00119 "",
00120 "/endpage { showpage } bind def",
00121 "/showpage { } def",
00122 "",
00123 "/layercolorseq",
00124 "       [       % layer color sequence - darkest to lightest",
00125 "               [0 0 0]",
00126 "               [.2 .8 .8]",
00127 "               [.4 .8 .8]",
00128 "               [.6 .8 .8]",
00129 "               [.8 .8 .8]",
00130 "       ]",
00131 "def",
00132 "",
00133 "/layerlen layercolorseq length def",
00134 "",
00135 "/setlayer {/maxlayer exch def /curlayer exch def",
00136 "       layercolorseq curlayer 1 sub layerlen mod get",
00137 "       aload pop sethsbcolor",
00138 "       /nodecolor {nopcolor} def",
00139 "       /edgecolor {nopcolor} def",
00140 "       /graphcolor {nopcolor} def",
00141 "} bind def",
00142 "",
00143 "/onlayer { curlayer ne {invis} if } def",
00144 "",
00145 "/onlayers {",
00146 "       /myupper exch def",
00147 "       /mylower exch def",
00148 "       curlayer mylower lt",
00149 "       curlayer myupper gt",
00150 "       or",
00151 "       {invis} if",
00152 "} def",
00153 "",
00154 "/curlayer 0 def",
00155 "",
00156 "%%EndResource",
00157 "%%EndProlog",
00158 "%%BeginSetup",
00159 "14 default-font-family set_font",
00160 "1 setmiterlimit",
00161 "% /arrowlength 10 def",
00162 "% /arrowwidth 5 def",
00163 "",
00164 "% make sure pdfmark is harmless for PS-interpreters other than Distiller",
00165 "/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse",
00166 "% make '<<' and '>>' safe on PS Level 1 devices",
00167 "/languagelevel where {pop languagelevel}{1} ifelse",
00168 "2 lt {",
00169 "    userdict (<<) cvn ([) cvn load put",
00170 "    userdict (>>) cvn ([) cvn load put",
00171 "} if",
00172 "",
00173 "%%EndSetup",
00174 (char*)0 };