title	putchar
	include	asm.inc

	.code
	public	putchar

;;	putchar
;
;	entry	AL	character
;
putchar	proc
	pushm	ax,dx
	mov	ah,2
	mov	dl,al
	int	21h
	popm	dx,ax
	ret
putchar	endp

	end