Hola:
Paso a dejarles otro programita en ensamblador, ojala les sea util, saludos
;====================================================================
;==== PROGRAMA QUE PERMITE MOSTRAR EL EQUIVALENTE EN NUMERO ROMANO
;==== AL ELEGIR UN NUMERO EN DECIMAL DEL 1 AL 9 (0 = SALIR)
;====================================================================
.model small
.data
msj1 db 'Teclea un numero del 1 al 9 (0 para salir):$'
esp db ' ',10,13,'$'
num1 db '= I$'
num2 db '= II$'
num3 db '= III$'
num4 db '= IV$'
num5 db '= V$'
num6 db '= VI$'
num7 db '= VII$'
num8 db '= VIII$'
num9 db '= IX$'
.code
inicio:
mov ax, @data
mov ds,ax
mov dx, offset esp
mov ah,09
int 21h
mov dx, offset msj1
mov ah,09
int 21h
mov ah,01h
int 21h
;=====================================================================
cmp al,'0'
je fin
cmp al,'1'
je uno
cmp al,'2'
je dos
cmp al,'3'
je tres
cmp al,'4'
je cuatro
cmp al,'5'
je cinco
cmp al,'6'
je seis
cmp al,'7'
je siete
cmp al,'8'
je ocho
cmp al,'9'
je nueve
;=====================================================================
uno:
mov dx, offset num1
mov ah,09
int 21h
jmp inicio
dos:
mov dx, offset num2
mov ah,09
int 21h
jmp inicio
tres:
mov dx, offset num3
mov ah,09
int 21h
jmp inicio
cuatro:
mov dx, offset num4
mov ah,09
int 21h
jmp inicio
cinco:
mov dx, offset num5
mov ah,09
int 21h
jmp inicio
seis:
mov dx, offset num6
mov ah,09
int 21h
jmp inicio
siete:
mov dx, offset num7
mov ah,09
int 21h
jmp inicio
ocho:
mov dx, offset num8
mov ah,09
int 21h
jmp inicio
nueve:
mov dx, offset num9
mov ah,09
int 21h
jmp inicio
fin:
mov ah, 4ch
int 21h
.stack
end inicio