org 100h
include 'emu8086.inc'
.data
numeros db 2 dup (?) ;creacion de un arreglo
cad2 dw ?
msg dw "Multiplicacion por 10: $"
msg2 dw "Division por 5: $"
.code
print 'Ingresa el primer numero:'
call scan_num
mov numeros[0],cl
printn ""
print 'Ingresa el segundo numero:'
call scan_num
mov numeros[1],cl
//multi:
xor ax,ax
mov al,numeros[0]
mov bl,10
mul bl
printn ""
mov bx, ax
mov ah,09
lea dx,msg
int 21h
mov ax, bx
printn ""
call PRINT_NUM
xor ax,ax
mov al,numeros[1]
mov bl,5
div bl
printn ""
mov bx, ax
mov ah,09
lea dx,msg2
int 21h
mov ax, bx
printn ""
call PRINT_NUM
ret
define_print_num
define_scan_num
define_print_num_uns
define_print_string
define_get_string
end
