BDOS EQU 5

	ORG 100H

	MVI	C,09H		;BDOS PRINT STRING DE POINTS TO
	LXI	D,MSG1
	CALL	BDOS

	MVI E,0CH		;BDOS LIST THE CHARACTER IN C OUTPUT
	MVI C,05H
	CALL BDOS

	MVI	C,09H		;BDOS PRINT STRING DE POINTS TO
	LXI	D,MSG2
	JMP	BDOS		;WILL RETURN TO CP/M CONTROL

MSG1:	DB	'ATTEMPTING TO SEND A FORM FEED TO LIST DEVICE.',0AH,0DH,'$'
MSG2:	DB	'FORM FEED SENT TO LIST DEVICE.$'

	END