TITLE  -- ISSUE FORMFEED TO PRINTER  (big deal, huh!)
COMMENT *
		This program issues one formfeed to PRN
	*
;
DATA SEGMENT PARA PUBLIC 'DATA'
DATA ENDS
;	 DESCRIPTION OF THE STACK SEGMENT
STACK	SEGMENT	PARA STACK 'STACK'
	DB	40 DUP('STACK   ')
STACK	ENDS
;
CSEG	SEGMENT	PARA PUBLIC 'CODE'
START	PROC	FAR
	ASSUME CS:CSEG,SS:STACK,DS:DATA,ES:DATA
;
        PUSH    DS              ;Set return segment addr to stack
	SUB	AX,AX		;Clear a reg
	PUSH	AX		;Put zero return addr to stack
	MOV	AX,DATA		;Get location of data segment
	MOV	ES,AX		;Set segreg base of data segment
	MOV	DS,AX
;
	MOV	AH,5		;function code to output to printer
	MOV	DL,0CH		; form feed code
	INT	21H		; DOS interrupt
;
	RET			; EXIT TO DOS
;
START	ENDP
CSEG	ENDS
	END	START