include 'emu8086.inc'
.model small
.stack 100h
.code
main proc

    PRINT "ENTER A VALUE"
    MOV AH,1
    int 21h

    PRINTN
    CMP AL,"M"
    JE  ML
    CMP AL,"D"
    JE  DV
    PRINTN "WRONG INPUT"
    JMP EXIT

    DV:
    printn "enter 2 values"
    mov ah,1
    int 21h
    mov bl,al
    sub bl,30h

    int 21h
    sub al,30h

    mov ah,0
    div bl


    add al,30h
    add ah,30h

    mov bx,ax

    printn

    mov ah,2
    mov dl,bl
    int 21h
    printn
    mov dl,bh
    int 21h
    JMP EXIT


    ML:
    printn "enter 2 values"
    mov ah,1
    int 21h
    mov bl,al
    sub bl,30h

    int 21h
    sub al,30h

    mov ah,0
    MUL BL
    AAM

    add al,30h
    add ah,30h

    mov bx,ax

    printn

    mov ah,2
    mov dl,bH
    int 21h
    mov dl,bL
    int 21h
    JMP EXIT

    exit: