172575Sphk#!/bin/sh
272575Sphk# ----------------------------------------------------------------------------
372575Sphk# "THE BEER-WARE LICENSE" (Revision 42):
472575Sphk# <phk@FreeBSD.ORG> wrote this file.  As long as you retain this notice you
572575Sphk# can do whatever you want with this stuff. If we meet some day, and you think
672575Sphk# this stuff is worth it, you can buy me a beer in return.   Poul-Henning Kamp
772575Sphk# ----------------------------------------------------------------------------
872575Sphk#
972575Sphk# $FreeBSD$
1072575Sphk#
1172575Sphk
1272575Sphkecho '%!'
1372575Sphkecho '/beastie {'
1472575Sphkcat beastie.eps
1572575Sphkecho '} def'
1672575Sphkcat FreeBSD.pfa
1772575Sphk
1872575Sphkecho '
1972575Sphk
2072575Sphk/mm {25.4 div 72 mul} def
2172575Sphk/FreeBSD findfont 120 scalefont setfont
2272575Sphk/center 210 mm 2 div def
2372575Sphk/top 297 mm def
2472575Sphk/cshow { dup stringwidth pop 2 div neg 0 rmoveto show } def
2572575Sphk
2672575Sphk% "FreeBSD" across the top.
2772575Sphk% 691 is "top - height of caps - (left - X("F"))"
2872575Sphkcenter 691 moveto
2972575Sphk(FreeBSD) cshow
3072575Sphk
3172575Sphk% Put beastie in the center
3272575Sphk/sc 1.25 def
3372575Sphkcenter 125 moveto 
3472575Sphk384 sc mul 2 div neg 0 rmoveto
3572575Sphkgsave currentpoint translate sc sc scale beastie grestore
3672575Sphk
3772575Sphk% A box for the bottom text
3872575Sphkgsave
3981262Sphk10 30 moveto
4072575Sphk210 mm 20 sub 0 rlineto
4172575Sphk0 70 rlineto
4272575Sphk210 mm 20 sub neg 0 rlineto
4372575Sphkclosepath
4472575Sphk.7 .7 .9 setrgbcolor
4572575Sphkfill
4672575Sphkgrestore
4772575Sphk
4872575Sphk% Bottom text
4981262Sphkcenter 90 moveto 
5081262Sphk/FreeBSD findfont 50 scalefont setfont
5172575Sphk
5281262Sphkcenter 50 moveto 
5372575Sphk(http://www.FreeBSD.org) cshow
5472575Sphk
5572575Sphk% Do not forget Kirks copyright string.
5681262Sphk10 105 moveto 
5772575Sphk/Times-Roman findfont 8 scalefont setfont
5872575Sphk(BSD Daemon ) show
5972575Sphk/Symbol findfont 8 scalefont setfont
6072575Sphk(\343 ) show
6172575Sphk/Times-Roman findfont 8 scalefont setfont
6272575Sphk(Copyright 1988 by Marshall Kirk McKusick.  All Rights Reserved.) show
6372575Sphk
6472575Sphkshowpage
6572575Sphk'
66