Mzsmunna
10/16/2019 - 9:10 AM

mzscodeRO


.MODEL SMALL
.STACK 100H
.DATA
V1 DB ?
V2 DB ?
V3 DB ?
V4 DB ?
V5 DB ?
M1 DB 'Enter 5 characters $'
M2 DB 'U$'
M3 DB 'L$'

.CODE
MAIN PROC
    MOV AX,@DATA
    MOV DS,AX
    
    LEA DX,M1
    MOV AH,9
    INT 21H
    
    MOV AH,2
    MOV DL,0DH
    INT 21H
    MOV DL, 0AH
    INT 21H
    
    MOV AH,1
    INT 21H
    MOV V1,AL
    
    MOV AH,1
    INT 21H
    MOV V2,AL
    
    MOV AH,1
    INT 21H
    MOV V3,AL
    
    MOV AH,1
    INT 21H
    MOV V4,AL
    
    MOV AH,1
    INT 21H
    MOV V5,AL
    
    MOV AH,2
    MOV DL,0DH
    INT 21H
    MOV DL, 0AH
    INT 21H
    
    MOV CX,25
    MOV CL,90
    CMP V1,CL
    JNGE ULUP
    JGE LLUP
    
    ULUP:
    MOV BL,065
    CMP V1,BL
    JE L1
    JNE L2
    
    L1:
    CMP V1,BL
    JNE A1
    JE UEXIT
    A1:
    ADD BL,1
    CMP V1,BL
    JNE L1
    JE UEXIT
    
    L2:
    CMP V1,BL
    JNE A2
    JE UEXIT
    A2:
    ADD BL,1
    CMP V1,BL
    JNE L2
    JE UEXIT
    
    LLUP:
    MOV BH,097
    CMP V1,BH
    JE U1
    JNE U2
    
    U1:
    CMP V1,BH
    JNE B1
    JE LEXIT
    B1:
    ADD BH,1
    CMP V1,BH
    JNE U1
    JE LEXIT
    
    U2:
    CMP V1,BH
    JNE B2
    JE LEXIT
    B2:
    ADD BH,1
    CMP V1,BH
    JNE U2
    JE LEXIT
    
    
    UEXIT:
    LEA DX,M2
    MOV AH,9
    INT 21H
    JMP EXIT

    LEXIT:
    LEA DX,M3
    MOV AH,9
    INT 21H
    JMP EXIT
    
    EXIT:
    MOV AH,4CH
    INT 21H
    MAIN ENDP
END MAIN