Не могу найти ошибку

[18541]

Нужно ввести строку чисел, вывести сумму этих элементов через один.
Текст программы:
.model tiny
.code
org 100h
start:
Lea DX,A
Mov AH,9
int 21h

Lea DX,B
mov ah,10
int 21h
Lea DX,D
mov ah,9
int 21h

mov al,0
mov cl,b+1
mov ch,0
mov bl,2
mov bh,0

h:
test bx,1b
jz i
add al,b[bx]
i:
inc bx
loop h

mov dl,al
add dl,48
mov ah,9
int 21h
ret
A DB 'Vvedite chisla',13,10,'$'
B DB 10,?,11 DUP('$')
D DB 13,10,'$'
end start