*#######################################################################
*	     Program T...Send a Formfeed to Printer Utility
*
*                         Dr. David C. Wilcox
*                         DCW Industries, Inc.
*                5354 Palm Drive, La Canada, CA  91011
*                            818/790-3844
*
*                           August 1, 1985
*#######################################################################
boot	equ	00			*Warm Boot
list	equ	05			*List Output
ff	equ	12			*Ascii FF
bdos	equ	02			*bdos entry point
*#######################################################################
	move.b	#ff,d1			*Send a Form feed
	move.w	#list,d0		*to the printer
	trap	#bdos
	move.w	#boot,d0		*and return to CP/M 68k
	trap	#bdos			*via a warm boot
*#######################################################################
	end