	title hex output
	; input in BH
	.stack 100h
	.data
	var db 97		; change 97 to anything you want
	.code
	main proc
;
	mov ax,@data
	mov ds,ax
; OUTPUT FIRST HEX DIGIT
	mov bh, var
	mov dl, bh
	mov cl, 4
	shl dl, cl
	cmp dl, 10
	ja  BIG1
	add dl, 30h
	jmp DONE1
BIG1:	add dl, 41h
DONE1:	mov ah,2
	int 21h
; OUTPUT NEXT HEX DIGIT
	mov dl, bh
	and dl, 0Fh		; clear the high order 4 bits
	cmp dl, 10
	ja  BIG2
	add dl, 30h
	jmp DONE2
BIG2:	add dl, 41h
DONE2:	mov ah, 2
	int 21h
; DOS EXIT
	mov ax, 4c00h
	int 21h
	main endp
	end main

