Initial revision

git-svn-id: file:///srv/svn/joey/bsdgames-trunk@5086 a4a2c43b-8ac3-0310-8836-e0e880c912e2

fortune/tools/Do_spell

@@ -0,0 +1,11 @@
+#!/bin/sh -
+#	$NetBSD: Do_spell,v 1.2 1995/03/23 08:28:50 cgd Exp $
+#
+#	@(#)Do_spell	8.1 (Berkeley) 5/31/93
+#
+
+F=_spell.$$
+echo $1
+spell < $1 > $F
+sort $F $1.sp.ok | uniq -u | column
+rm -f $F

fortune/tools/Do_troff

@@ -0,0 +1,11 @@
+#!/bin/csh -f
+#	$NetBSD: Do_troff,v 1.2 1995/03/23 08:28:52 cgd Exp $
+#
+#	@(#)Do_troff	8.1 (Berkeley) 5/31/93
+#
+
+set file=$1
+shift
+( echo ".ds Se $file" ; cat Troff.mac ; sed -f Troff.sed $file ) | \
+	$* -me >& $file.tr
+echo troff output in $file.tr

fortune/tools/Troff.mac

@@ -0,0 +1,28 @@
+.\"	$NetBSD: Troff.mac,v 1.2 1995/03/23 08:28:53 cgd Exp $
+.\"
+.nr tp 8
+.nr hm 3v
+.nr fm 2v
+.nr tm 5v
+.nr bm 4v
+.cs R
+.sc
+.sz 6
+.ll +10n
+.lt \n(.l
+.de $h
+.tl 'Fortune Database'\\*(Se'\*(td'
+..
+.de $f
+.tl ''- % -''
+..
+.2c
+.nf
+.ta
+.ta 8n 16n 24n 32n 40n 48n 56n 64n 72n 80n
+.de %%
+.sp .3
+.ce
+\(sq\|\(sq\|\(sq\|\(sq\|\(sq\|\(sq\|\(sq\|\(sq\|\(sq
+.sp .2
+..

fortune/tools/Troff.sed

@@ -0,0 +1,13 @@
+/^['.]/s//\\\&&/
+/^%%/s//.&/
+/--/s//\\*-/g
+/_a-squared cos 2(phi)/s//\\fIa\\fP\\u2\\d cos 2\\(*f/
+/__**\([a-zA-Z]*\)/s//\\fI\1\\fP/g
+/"\(.\)/s//\1\\*:/g
+/`\(.\)/s//\1\\*`/g
+/'\(.\)/s//\1\\*'/g
+/~\(.\)/s//\1\\*~/g
+/\^\(.\)/s//\1\\*^/g
+/,\(.\)/s//\1\\*,/g
+/\(.\)\(.\)/s//\\o_\1\2_/g
+/*/s//\\(bs/g

fortune/tools/do_sort

@@ -0,0 +1,12 @@
+#! /bin/sh
+#	$NetBSD: do_sort,v 1.2 1995/03/23 08:28:54 cgd Exp $
+#
+#	@(#)do_sort	8.1 (Berkeley) 5/31/93
+#
+# an aggressive little script for sorting the fortune files
+# depends on octal 02 and 03 not being anywhere in the files.
+
+sp="/usr/bin/sort -bdfu -T /var/tmp"
+
+sed 's/^%$//' | tr '\12' '\3' | tr '\2' '\12' | $sp | sed 'a\
+	%' | sed -e 's/^//' -e 's/$//' | tr '\3' '\12'