El ensamblador ayuda a ingresar una cadena de caracteres a través del teclado, finaliza con un retorno de carro, cuenta y genera el número de 0 y 1, etc. en línea.
SEGMENTO D
LIMIT DB 10
NUMB DB ?
MSG DB 10 DUP(0)
MSG1 DB 'Ingrese un STR: $'
MSG2 DB 13, 10, 'La suma es:
DB 13, 10, 'N(0) = '
N_0 DB 30H p>
DB 13, 10, 'N(1) = '
N_1 DB 30H
DB 24H
D TERMINA
SEGMENTO C
ASUME CS: C, DS: D
INICIO:
MOV AX, D
MOV DS , AX
MOV DX, OFFSET MSG1
MOV AH, 9
INT 21H
MOV DX, LÍMITE DE COMPENSACIÓN
MOV AH, 10
INT 21H
MOV BX, NÚMERO DE COMPENSACIÓN
LOP:
INC BX
CMP BYTE PTR [BX], 13
JE DISP
CMP BYTE PTR [BX], 30H
JNE L1
INC BYTE PTR N_0
L1:
CMP BYTE PTR [ 4CH
INT 21H
C FINALIZA
FINALIZAR INICIO