Suma de numeros de 16 bits

Programa Sum16cl
;Sumamos 3 números de 16 bits a partir de 1000H
;OJO byte menos significativo primero
;;
USAREMOS B,A PARA RESULTADO
;
DATA .EQU 1000H ;La DATA comienza en dirección 1000h
MVIC,3 ;Vamos a sumar tres números de 16 bits.CONTADOR = 3
LXI H,DATA ;Apunto a primer B-S
XRA A ;Pongo A = 0
MOV B,A ;A = B = 0
OTRO: ADD M ;Sumo próximo B-S
MOV D,A ;Guardo temporalmente Suma deB-S
MOV A,B ;Copio suma de B+S
INX H ;Apunto a próximo B+S
ADC M ;Sumo B+S con el CARRY de la SUMA de los B-S
MOV B,A ;Retorno suma de B+S a B
MOV A,D ;y recobro suma de B-S
INX H ;Apunto apróximo B-S
DCR C ;¿Llegé al final?
JNZ OTRO ;No, vamos a por el siguiente número (16 bits)
HLT ;Sí, terminamos
.ORG 1000h
.DB 23h,4Fh,34h,55h,87h,0A7h
.END

Como una curiosidad y para introducirnuevas instrucciones para manejo de registros de dirección
veamos el siguiente programa.
Programa Suma16
;Programa que suma dos números de
;16 bits usando instrucciones de gestión de direcciones.;
LHLD 0040H ;Carga par H,L con los contenidos de 40h y 41h
XCHG ;Intercambiar D.E con H,L
LHLD 0042H ;Carga par H,L con los contenidos de 42h y 43h
DAD D ;Sumar D.E con H,L, resultado en H.LSHLD 0044H ;Guardar esultado en 44h y 45h
HLT
.ORG 0040
.DB 47,06,72,25
.END

BCD
Programa SERIE_BCD
;Programa que suma una serie de N números en BCD a partir de 0041. La cantidad N está en ladirección 0040. El resultado de 4
dígitos BCD lo deja en par B,A. Este programa chequea si N = 0
;
N .EQU 0040H
;
LXI H,N ;Apunto a N
MOV A,M ;Cargo N a A
MOV C,A ;Cargo CONTADOR de todasmaneras
ADD A ;Sumo A consigo mismo. si A = 0, resultado también será 0
DAA ;Hago el ajuste decimal
MOV A,0 ;Coloco A = 0. No uso una operación para preservar bandera de ADD A
MOV B,A ;Me aseguro que B= A = 0
JZ FUERA ;Si suma fue 0 salto a FUERA, y A quedará en 0. Si no recupero N original y sigo
INX H ;Apunto a principio de serie
MOV A,M ;Tomo el primer número
DCR C ;He llegado al final?...