%TITLE "Select compressed 132-character Printer output"

	IDEAL
	DOSSEG
	MODEL	small
	STACK	256

;----- DATASEG

prCodes	DB	27,15,0		;if you want comments
				; BUY the book

	CODESEG

Start:
	mov	ax,@data
	mov	ds,ax

	cld
	mov	si, offset prCodes
Next:
	lodsb
	or	al,al
	jz	Exit
	mov	dl,al
	mov	ah,05h
	int	21h
	jmp 	Next

Exit:
	mov	ax,04C00h
	int 	21h

	End 	Start