[net.sources] Letter writing macro package

spoon (08/13/82)

Some time ago a request for a letter writting macro package was
sent out.  I didn't see any show up so I've submitted this one.
It is somewhat compatible with the '-ms' macro package requests.
::::::::::::::::::::
tmac.l
::::::::::::::::::::
.		I0 - initialisation functions
.de I0
.pi /bin/col
.ll 45
.po 7
.sp 8
.wh -5 Np
.nr Li 30
..
.		Line trap and housekeeping macros
.de Np
'bp
'sp 2
'tl '''Page \\n%'
'sp 2
..
.I0
.		LH - Room for letter head (optional arg is size)
.de LH
.if \$1 .sp \$1
.if !\$1 .sp 4
..
.		A1 - first (source) address
.de A1
.nf
.in \n(Li
..
.		A2 - second (target) address
.de A2
.nf
.sp 8
.in 0
..
.		SA - salutation
.de SA
.in 0
.nf
.sp
..
.		RE - reference line
.de RE
.ce
.nf
.sp
..
.		PP - paragraph
.de PP
.fi
.in 0
.sp
.ti 8
..
.		YT - `yours truly'-type line
.de YT
.sp
.in \n(Li
.nf
..
.		RI - reference initials
.de RI
.ds Ri \\$1
..
.		ED - enclosed documents
.de ED
.ds Ed Encl.
..
.		SG - Signature line
.de SG
.sp 6
.in 0
.nf
\\*(Ri
\\*(Ed
.rt -2
.in \n(Li
..
.		LI - letterhead indent
.de LI
.nr Li \\$1
..
::::::::::::::::::::
ml.7
::::::::::::::::::::
.hc %
.TH ML 7 local
.SH NAME
ml \- macros for formatting letters
.SH SYNOPSIS
.B "nroff \-ml"
[ options ]
file ... 
.br
.B "troff \-ml"
[ options ]
file ... 
.SH DESCRIPTION
This package of 
.I nroff
and
.I troff
macro definitions provides a canned formatting
.li
facility for business letters.
.PP
Currently, the package supports only  partial  blocked  mode
with  the sender's address (or just date), the `yours truly'
and signature lines indented.  This indentation can  option%ally
be changed or suppressed.
.PP
The macro requests  are  defined below.
Most
.I nroff
and
.I troff
requests are safe in conjunction
with this package.  The requests listed  below  may
prove useful on occasion to augment the formatting capabilities
provided by the package.
.PP
.IP
.ta \w'.sp n 'u
.li
.bp	begin new page
.nf
.li
.br	break output line here
.li
.sp n	insert n spacing lines
.li
.ls n	(line spacing) n=1 single, n=2 double space
.li
.na	no alignment of right margin
.fi
.PP
.SH FILES
/usr/lib/tmac.l
.SH "SEE ALSO"
nroff(1), troff(1), tbl(6), ms(7)
.tr &.
.SH AUTHOR
Randall Howard
.SH REQUESTS 
.ta \w'..ND \fIdate\fR 'u +\w'Initial 'u +\w'Cause 'u
.br
.di x
			\ka
.br
.di
.in \nau
.ti0
Request	Initial	Cause	Explanation
.ti0
	Value	Break
.br
.in \nau
.ti0
.li
.A1	-	yes	Start the first (sender's) address (or
date).
.ti0
.li
.A2	-	yes	Start the second (receiving) address.
.ti0
.li
.B	yes	no	boldface text follows.
.ti0
.li
.DA	no	no	Date (instead of first address) follows
.ti0
.li
.I	yes	no	Italic text follows.
.ti0
.li
.LG	no	no	Make letters larger. This is effective
only for typesetters.
.ti0
.li
.LH n	-	yes	Leave n extra lines for the letterhead.
.ti0
.li
.LI n	30	yes	Set the letterhead indent to n spaces.
.ti0
.li
.NL	yes	no	Make letters normal size.
.ti0
.li
.PP	no	yes	Begin new paragraph. First line indented.
.ti0
.li
.R	yes	no	Roman text follows.
.ti0
.li
.RE	-	yes	Reference line follows.
.ti0
.li
.SA	-	yes	Salutation follows.
.ti0
.li
.RI x	-	no	The reference initials are given by
.I x.
.ti 0
.li
.ED	-	no	Enclosed documents; the appropriate
`Encl.' will appear near the signature.
.ti0
.li
.SG	-	yes	Identifications of signature(s) follow.
.ti0
.li
.SM	no	no	Make letters smaller. This is only effective
on typesetting devices.
.ti0
.li
.YT	-	yes	`Yours truly' lines follow.
::::::::::::::::::::
end-of-files
::::::::::::::::::::