Вывод данных на экран в Assembler

[sap_ax]

Помогите вывести среднее арифметическое значение на экран после подсчета этого значения массива B.

.model small

; stack
.stack 100h

; data
.data
A db 1,3,6,4,7,8
B db 6 dup(?)
n db 6
cc db 3
szStr db ' $'
; code
.code
mov ax,@data
mov ds,ax
mov es,ax

mov cx,3
mov si,-1
xor al,al
m1:
add si,2
mov al,A[si]
mov B[di],al
inc di
loop m1

mov cx,3
xor di,di
mov al,B[di]
m2:
inc di
add al,B[di]
loop m2
mov dl,al
mov ah,0
div cc
; вывод на экран среднего арифметического: частное и остаток

lea di,szStr+1
call HexStr
mov ah,9
mov dx,di
int 21h

xor cx,cx
mov cl,3
xor si,si
m3:
;mov bl,al
xor ax,ax
mov al,B[si]
lea di,szStr+1
call HexStr
mov ah,9
mov dx,di
int 21h
inc si
loop m3



; sleep
mov ah,1
int 21h

; exit
mov ax, 4C00h
int 21h

HexStr proc ; преобразуем из числа в строку
; входные параметры
; al - число для вывода
; di - адрес строки для преобразования, куда будет записано символьное выражение
push cx
mov cx,10
digit:
cmp ax,10
jb proc_exit
xor dx,dx
div cx
or dl,30h
mov [di],dl
dec di
jmp digit
proc_exit:
or al,30h
mov [di],al
pop cx
ret
HexStr endp
end