Viết chương trình hợp ngữ dạng .EXE thực hiện nhập vào từ bàn phím 2 ký tự trong đó phải có 1 ký tự là số, 1 ký tự là chữ in thường.

.model small
.stack 100h
.Data
s db 'Nhap vao mot ki tu la so:$'
s1 db 'Ki tu vua nhap khong phai la so, moi ban nhap lai:$'
s2 db 'So ban vua nhap la:$'
s3 db 'Nhap vao mot chu in thuong:$'
s4 db 'Nhap sai, xin nhap lai:$'
s5 db 'Chu ban vua nhap:$'


.Code
Main Proc
Mov ax,@Data
Mov ds,ax
Mov ah,9
Lea dx,s
int 21h
Mov ah,1
Int 21h
jmp tiep

Nhapso:
Mov ah,2
Mov dl,0DH
int 21h
Mov dl,0AH
int 21h

Mov ah,9
Lea dx,s1
int 21h

Mov ah,1
Int 21h

tiep:
cmp al,'0'
jb Nhapso
cmp al,'9'
Ja Nhapso
Mov bl,al

Mov ah,2
Mov dl,0DH
int 21h
Mov dl,0AH
int 21h

Mov ah,9
Lea dx,s2
Int 21h

Mov ah,2
Mov dl,bl
Int 21h

Mov ah,2
Mov dl,0DH
int 21h
Mov dl,0AH
int 21h

Xor bl,bl

Mov ah,9
Lea dx,s3
int 21h
Mov ah,1
Int 21h
jmp tiep1

Nhapchu:
Mov ah,2
Mov dl,0DH
int 21h
Mov dl,0AH
int 21h

Mov ah,9
Lea dx,s4
int 21h

Mov ah,1
Int 21h

tiep1:
cmp al,'a'
jb Nhapchu
cmp al,'z'
Ja Nhapchu
Mov bl,al

Mov ah,2
Mov dl,0DH
int 21h
Mov dl,0AH
int 21h

Mov ah,9
Lea dx,s5
Int 21h

Mov ah,2
Mov dl,bl
Int 21h

Call VEDOS

Main Endp
VEDOS Proc
Mov ah,4ch
Int 21h
VEDOS Endp
End Main