Initial import from FreeBSD RELENG_4:
[dragonfly.git] / share / examples / BSD_daemon / poster.sh
1 #!/bin/sh
2 # ----------------------------------------------------------------------------
3 # "THE BEER-WARE LICENSE" (Revision 42):
4 # <phk@FreeBSD.ORG> wrote this file.  As long as you retain this notice you
5 # can do whatever you want with this stuff. If we meet some day, and you think
6 # this stuff is worth it, you can buy me a beer in return.   Poul-Henning Kamp
7 # ----------------------------------------------------------------------------
8 #
9 # $FreeBSD: src/share/examples/BSD_daemon/poster.sh,v 1.1.2.1 2001/03/04 09:19:24 phk Exp $
10 #
11
12 echo '%!'
13 echo '/beastie {'
14 cat beastie.eps
15 echo '} def'
16 cat FreeBSD.pfa
17
18 echo '
19
20 /mm {25.4 div 72 mul} def
21 /FreeBSD findfont 120 scalefont setfont
22 /center 210 mm 2 div def
23 /top 297 mm def
24 /cshow { dup stringwidth pop 2 div neg 0 rmoveto show } def
25
26 % "FreeBSD" across the top.
27 % 691 is "top - height of caps - (left - X("F"))"
28 center 691 moveto
29 (FreeBSD) cshow
30
31 % Put beastie in the center
32 /sc 1.25 def
33 center 125 moveto 
34 384 sc mul 2 div neg 0 rmoveto
35 gsave currentpoint translate sc sc scale beastie grestore
36
37 % A box for the bottom text
38 gsave
39 10 10 moveto
40 210 mm 20 sub 0 rlineto
41 0 70 rlineto
42 210 mm 20 sub neg 0 rlineto
43 closepath
44 .7 .7 .9 setrgbcolor
45 fill
46 grestore
47
48 % Bottom text
49 center 70 moveto 
50 /NRBWelshGillianBold findfont 50 scalefont setfont
51
52 center 30 moveto 
53 (http://www.FreeBSD.org) cshow
54
55 % Do not forget Kirks copyright string.
56 10 10 moveto 
57 /Times-Roman findfont 8 scalefont setfont
58 (BSD Daemon ) show
59 /Symbol findfont 8 scalefont setfont
60 (\343 ) show
61 /Times-Roman findfont 8 scalefont setfont
62 (Copyright 1988 by Marshall Kirk McKusick.  All Rights Reserved.) show
63
64 showpage
65 '