Unidad No.-1 Programa que verifica si una persona es mayor de edad o no

.model small
.stack
.data                       
include "emu8086.inc"           
num1 db 0; variable para la edad
.code
inicio proc far
   
    ;poner el primer letrero
    print " Ingrese su edad: "
   
    ;lectura del valor
    call scan_num
    mov num1,cl
   
    ;lectura segundo valor
   

    xor ax,ax  ;xor limpiar el registro ax
    mov al,num1
    cmp al,18d ;Si lo que se encuentra en al>18
    JGE mayor ;salta a mayor
    JMP menor ;sino ve a menor 
   
    mayor:
        printn " "
        print "Eres mayor de edad"
        jmp final
    menor:
        printn " "
        print "Eres menor de edad"
             
        jmp final
         
         
    final: 
         print " "
         printn " "
         print "Presiona enter para salir..."
         mov ah,0 ;servicios de lectura de una pulsación de teclado
         int 16h  ;Invoca a servicios de teclado
         mov ah,4ch
         int 21h
         ret
define_print_string
define_print_num
define_print_num_uns ;del procedimiento
define_scan_num
endp inicio

end