El programa en lenguaje ensamblador cuenta el número de entradas A
; Este programa está compilado y se ejecuta correctamente
Segmento de código
Asuma CS:Code,DS:Code
N equ 16
Prompt_Chr db 'Ingrese una cadena: $'
Inicio: push cs
pop ds
lea dx,Prompt_Chr; dirección de información de cadena de entrada
mov ah,9 ;Mostrar información de cadena
int 21h
mov cx,N ;Ingrese hasta N caracteres
xor bl,bl; Borrar contador
Entrada: mov ah,1; Introduce un carácter
int 21h
cmp al,13;
jz Disp ;Sí, finaliza la entrada y muestra el número de caracteres de entrada 'A'
cmp al,'A' ;'A'?
jnz $+4 ;No, ingresa el siguiente carácter
inc bl ;Sí, cuenta
entrada del bucle
Disp: mov ah,2
mov dl,13
int 21h
mov dl,10
int 21h
mov al,bl
xor ah,ah
mov bl,10
div bl
o ax,3030h ;convertir a ASCII
mov dx,ax
mov ah,2
cmp dl,'0'
jz $+4
int 21h p >
xchg dh,dl
int 21h
Exit_Proc: mov ah,4ch ;Finalizar programa
int 21h
Código FINALIZA
FIN Inicio ;La compilación termina aquí