%!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: Mon Dec 08 14:39:01 2008 %%DocumentFonts: Helvetica-Bold %%BoundingBox: 0 0 336 336 %%Copyright: 2008, Chris F.A. Johnson %%Copying: Released under a Creative Commons %% Attribution-Share Alike 2.5 Canada License. %% http://creativecommons.org/licenses/by-sa/2.5/ca/ %%Location: http://cfaj.freeshell.org/webcentric/ %%EndComments /bdef {bind def} bind def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% Outline thickness /ollw 4 def %% City hall line thickness /chlw 3 def %% Greyscale colours /black { 0 g } bdef /grey10 { .1 g } bdef /grey20 { .2 g } bdef /grey30 { .3 g } bdef /grey40 { .4 g } bdef /grey50 { .5 g } bdef /grey60 { .6 g } bdef /grey70 { .7 g } bdef /grey80 { .8 g } bdef /grey90 { .9 g } bdef /grey95 { .95 g } bdef /white { 1 g } bdef %% RGB colours /b .25 def % uniform adjustment /blue { b b 1 setrgbcolor } bdef /green { b 1 b setrgbcolor } bdef /red { 1 b b setrgbcolor } bdef /yellow { 1 1 b setrgbcolor } bdef %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /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 /rls { rl st } bdef /F { findfont exch scalefont setfont } bdef /tw 336 def /h tw 2 div def /w 90 def /margin tw w 3 mul sub 4 div def /w1 { 0 w rm 0 h rl w 0 rl 0 w h add neg rl w neg w rl } def /background { %% Background fill 0 0 m 0 tw rl tw 0 rl 0 tw neg rl tw neg 0 rl fill } def /webcentric { gs /kern -2 def /fs 51 def fs /Helvetic-Bold F /namewidth (WebCentric) stringwidth pop kern add def h namewidth 2 div sub h w 30 add add m 1 0 rm (W) show kern 0 rm (ebCentric) show gr } def /toronto { /kern -3 def /fs 22 def fs /Helvetic-Bold F /namewidth (Toronto) stringwidth pop kern add def h namewidth 2 div sub h w 5 sub add m 0 0 rm (T) show kern 0 rm (oronto) show } def /slab { dup margin mul exch 1 sub w mul add margin m } def /outline { ollw setlinewidth slab w1 st } def /outlines { 1 outline 2 outline 3 outline } def /ct { gs currentpoint translate -10 -2 -20 -1 -24 12 c 0 -1 rl st gr } def /cityhall { newpath chlw setlinewidth h 60 w 20 sub 60 120 arc st h 126 m gs -20 2 rm 0 72 rl ct gr gs 20 2 rm 0 99 rl -1 1 scale ct gr } def /draw { /bnx 1 def } def /panel { bnx slab w1 fill /bnx bnx 1 add def } def /slant { gs slab -45 rotate slantx slanty rm show gr } def /toronto.on.ca { /slantx -41 def /slanty 40 def 22 /Helvetica-Bold F (Toronto) 1 slant (Ontario) 2 slant (Canada) 3 slant } def /edshaso { /slantx -50 def /slanty 42 def 20 /Helvetica-Bold F (Education) 1 slant (Sharing) 2 slant (Socializing) 3 slant } def /torontoslant { /slantx -47 def /slanty 40 def 20 /Helvetica-Bold F (TORONTO) 2 slant } def %% Pre-defined logos /wcl { black background white webcentric draw blue panel green panel red panel } def /wclo { black background white webcentric draw red panel green panel blue panel white outlines } def /wclto { black background white webcentric draw blue panel green panel red panel black toronto } def /wclto { black background white webcentric draw blue panel green panel red panel black toronto } def /wcltos { black background white webcentric draw blue panel green panel red panel 18 /Helvetica-Bold F white torontoslant } def %%EndProlog %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% %% Pre-defined logos %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % wcl %% Plain logo % wclo %% Logo with outlines % wclto wcltos %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% %% Add your custom code here %% %% See http://cfaj.freeshell.org/webcentric/ for examples %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% showpage