mirror of
https://bjh21.me.uk/bedstead/.git
synced 2026-07-10 14:03:06 -04:00
2a4fec6c17
I generate various sizes because the 16-pixel version looks better than the scaled-down larger versions.
12 lines
378 B
PostScript
12 lines
378 B
PostScript
%!
|
|
/bpy { size 8 div mul } bind def
|
|
/bpx { bpy 1.25 mul } bind def
|
|
<< /HWResolution [ 72 72 ] /PageSize [ size size ] >> setpagedevice
|
|
3 255 div 17 255 div 9 255 div setrgbcolor 0 0 size size rectfill
|
|
51 255 div 255 255 div 136 255 div setrgbcolor
|
|
/Bedstead-Extended findfont 10 bpy scalefont setfont
|
|
size 5 bpx sub 2 div 1 bpx sub
|
|
size 7 bpy sub 2 div
|
|
moveto (B) show
|
|
showpage
|