Mayor o menor de edad.

.model small
.stack 64
.data



diez db 10
num1 db 0
mens db 'Ingrese la edad: $'
mens1 db 10,13,'Eres Mayor de Edad $'
mens2 db 10,13,'Eres Menor de Edad $'

.code
  inicio proc Far
    mov ax,@data ;direccionamiento
    mov ds,ax ;los datos
     ;poner el primer letrero
    mov ah,09
    lea dx,mens
    int 21h
   
    mov ah,01
    int 21h
    sub al,30 ;conviertir valor
    mul diez ;se multiplica el numero siguiente
    mov num1,al
   
    mov ah,01
    int 21h
    sub al,30h
    add num1,al
    mov al,num1     
   
    cmp al,18
    jge mayor
    jmp menor
   
    mayor:
       mov ah,09
       lea dx,mens1
       int 21h
       jmp fin 
     
    menor:
       mov ah,09
       lea dx,mens2
       int 21h
       jmp fin
     
    fin:                     
       mov ax,4c00h           
     
    Inicio endp
  ret