butteredtoast5/butteredtoast5.materials/Inform Map.eps

81 lines
2.2 KiB
PostScript
Raw Normal View History

2023-05-31 17:28:15 +00:00
%!PS-Adobe EPSF-3.0
%%BoundingBox: 0 0 240 144
%%IncludeFont: Helvetica
/Helvetica findfont 24 scalefont setfont
newpath % Ruled outline outer box of map
12 12 moveto % bottom left corner
228 12 lineto % bottom side
228 132 lineto % right side
12 132 lineto % top side
closepath
stroke
newpath % Ruled horizontal line
12 96 moveto % LHS
228 96 lineto % RHS
closepath
stroke
0 0 0 setrgbcolor % From HTML colour 000000
/Helvetica findfont 24 scalefont setfont
newpath (Map)
24 % = X
114 24 2 div sub % = Y centre-offset
moveto show
currentlinewidth % Push old line width onto stack
1 setlinewidth
setlinewidth % Pull old line width from stack
currentlinewidth % Push old line width onto stack
1 setlinewidth
setlinewidth % Pull old line width from stack
newpath % Room interior
0.827451 0.827451 0.827451 setrgbcolor % From HTML colour D3D3D3
30 36 moveto % bottom left corner
66 36 lineto % bottom side
66 72 lineto % right side
30 72 lineto % top side
closepath
fill
currentlinewidth % Push old line width onto stack
1 setlinewidth
newpath % Room outline
0 0 0 setrgbcolor % From HTML colour 000000
30 36 moveto % bottom left corner
66 36 lineto % bottom side
66 72 lineto % right side
30 72 lineto % top side
closepath
stroke
setlinewidth % Pull old line width from stack
0 0 0 setrgbcolor % From HTML colour 000000
/Helvetica findfont 12 scalefont setfont
newpath (StMrP)
dup stringwidth add 2 div 48 exch sub % = X centre-offset
54 12 2 div sub % = Y centre-offset
moveto show
newpath % Room interior
0.827451 0.827451 0.827451 setrgbcolor % From HTML colour D3D3D3
102 36 moveto % bottom left corner
138 36 lineto % bottom side
138 72 lineto % right side
102 72 lineto % top side
closepath
fill
currentlinewidth % Push old line width onto stack
1 setlinewidth
newpath % Room outline
0 0 0 setrgbcolor % From HTML colour 000000
102 36 moveto % bottom left corner
138 36 lineto % bottom side
138 72 lineto % right side
102 72 lineto % top side
closepath
stroke
setlinewidth % Pull old line width from stack
0 0 0 setrgbcolor % From HTML colour 000000
/Helvetica findfont 12 scalefont setfont
newpath (IslnC)
dup stringwidth add 2 div 120 exch sub % = X centre-offset
54 12 2 div sub % = Y centre-offset
moveto show