Adición del lenguaje ensamblador del 1 al 100, el resultado se muestra en hexadecimal

segmento dseg

pestaña db '0123456789ABCDEF'

str db 4 dup(?),'$'

termina el dseg

p>

segmento cseg

asume cs: cseg, ds: dseg

begin: mov ax, dseg

mov ds, ax

mov ax, 1

mov bx, 2

mov cx, 99

siguiente: agregar ax, bx

inc bx

bucle siguiente

llamada disp

mov ah, 4ch

int 21h

disp proc

lea si, str

mov cl, 4

mov di, 4

abc: rol ax, cl

mov dx, ax

y ax, 0fh

lea bx, tab

xlat

mov [si ], al

inc si

mov ax, dx

dec di

jnz abc

lea dx , str

mov ah, 9

int 21h

ret

disp endp

cseg termina

fin comienzo