%!PS-Adobe-2.0 EPSF-2.0 %%Title: WebCentric logos %%Creator: Chris F.A. Johnson (emacs) %%For: WebCentric MeetUp group %%Routing: (mailto:cfaj@freeshell.org) %%CreationDate: Tue Nov 25 20:54:10 2008 %%DocumentFonts: Helvetica-Bold %%BoundingBox: 0 0 672 672 %%Copyright: 2008, Chris F.A. Johnson, All Rights Reserved %%EndComments /bdef {bind def} bind def /ldef {load def} bdef /n /newpath ldef /m /moveto ldef /l /lineto ldef /rm /rmoveto ldef /rl /rlineto ldef /gs /gsave ldef /gr /grestore ldef /g /setgray ldef /st /stroke ldef /c /curveto ldef /black { 0 g } bdef /white { 1 g } bdef /F { findfont exch scalefont setfont } bdef /inch { 72 mul } bdef /h 56 def /w 30 def /b .25 def /blue { b b 1 setrgbcolor } def /green { b 1 b setrgbcolor } def /red { 1 b b setrgbcolor } def /w1 { 0 w rm 0 h rl w 0 rl 0 w h add neg rl w neg w rl } def /wo { gs w1 st gr } def /wf { gs w1 fill gr } def /wfo { gs wf gr gs white wo gr } def /background { %% Background fill 0 0 m 0 112 rl 112 0 rl 0 -112 rl -112 0 rl fill } def /bar { 1 sub w 5 add mul 0 m } def /bar1 { 0 0 m 3 0 translate } def /bar2 { 0 0 m w 3 add 0 m } def /bar3 { 0 0 m w 4 add 2 mul 0 m } def /logo1 { blue 1 bar wf green 2 bar wf red 3 bar wf } def /logo2 { red 1 bar wfo green 2 bar wfo blue 3 bar wfo } def /toronto { 11.25 w add 3 mul 1 add h 4.45 mul m 22 /Helvetic-Bold F black gs (T) show -2 0 rm (oronto) show gr } def /ct { gs currentpoint translate -10 0 -20 0 -30 15 curveto st gr } def /cityhall { newpath black 3 setlinewidth 168 48 w 3 mul 8 sub 47 133 arc st 168 126 m gs -20 0 rm 0 72 rl ct gr gs 20 0 rm 0 99 rl -1 1 scale ct gr } def /x { gs 18 /Helvetic-Bold F 0 0 m w 12 sub w 2.5 mul m white -45 rotate (TORONTO) show gr } def /y { gs 18 /Helvetic-Bold F 0 0 m w 4 mul w 2.5 mul m white -45 rotate (ONTARIO) show gr } def /z { gs 18 /Helvetic-Bold F 0 0 m w 7.5 mul w 2.5 mul m white -45 rotate (CANADA) show gr } def /to { gs 18 /Helvetic-Bold F 0 0 m w 4 mul w 2.5 mul m white -45 rotate (TORONTO) show gr } def /ed { gs 18 /Helvetic-Bold F 0 0 m w 12 sub w 2.5 mul m white -45 rotate (EDUCATION) show gr } def /sh { gs 18 /Helvetic-Bold F 0 0 m w 4 mul w 2.5 mul m white -45 rotate (SHARING) show gr } def /so { gs 18 /Helvetic-Bold F 0 0 m w 7.5 mul w 2.5 mul m white -45 rotate (SOCIALIZING) show gr } def /title { } %%EndProlog %% If changing scale, also change BoundingBox in header comments 2 dup scale gs 3 3 scale 0 g %% background colour background 5.5 5 translate 2.5 h w add 4 add m 17 /Helvetic-Bold F white 1 0 rm (W) show -1 0 rm (ebCentric) show %% Uncomment desired logo logo1 %logo2 gr %% Uncomment as desired -- or not % toronto %% "Toronto" centered in middle pane % cityhall %% Outline of city hall % to %% Adds TORONTO on the diagonal of middle pane %% Adds TORONTO ONTARIO CANADA on the diagonals % -8 8 translate 10 /Helvetic-Bold F x y z %% Adds EDUCATION, SHARING and SOCIALIZING to the diagonals % -7 7 translate ed sh so showpage