.model small
        .stack
dispmsg  macro message
         mov ah,9
         lea dx,message
         int 21h
         endm
choose   macro
        dispmsg msg0
        mov ah,1
        int 21h
        cmp al,'1'
        je next1
        cmp al,'2'
        je next2
        cmp al,'3'
       ...