Phần 2: Lập trình hợp ngữ
A. Giải thích chương trình
1. Cho đoạn chương trình hợp ngữ sau, hãy giải thích từng lệnh (theo ngữ cảnh) và cho biết kết quả trên màn hình.
MOV BH,41H ;Gán BH=41H (kí tự ‘A’)
MOV BL,4 ;Gán BL=4
MOV AH,2 ;Gán AH=2
LAP:
MOV CX,5 ;Gán CX=5
LAI:
MOV DL,BH ;Chuyển nội dung BH vào DL
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL(=BH) LOOP LAI ;Lặp lại việc in ra màn hình kí tự trong DL 5 lần (CX=5) MOV DL,’_’ ;Gán DL= kí tự ‘_’
INT 21H ;Gọi ngắt 21H 3 lần, in ra màn hình 3 kí tự ‘_’ liên tiếp INT 21H
INT 21H
INC BH ;Tăng BH 1
DEC BL ;Giảm BL 1
JNZ LAP ;Nhảy tới nhãn LAP nếu cờ ZF chưa bật Kết quả trên màn hình:
AAAAA___BBBBB___CCCCC___DDDDD___
2. Giải thích từng lệnh và viết kết quả trên màn hình của đoạn chương trình sau MOV BH,48 ;Gán BH=48 (kí tự ‘0’)
MOV BL,4 ;Gán BL=4 FO1:
MOV CX,5 ;Gán CX=5 MOV AH,2 ;Gán AH=2 FO2:
MOV DL,BH ;Chuyển nội dung BH vào DL
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL (=BH) INC DL ;Tăng DL 1
LOOP FO2 ;Lặp lại việc in ra màn hình kí tự trong DL 5 lần
MOV DL,0AH ;Gán DL=0AH (LF)
INT 21H ;Gọi ngắt 21H, in kí tự điều khiển LF (tạo một dòng mới)
MOV DL,0DH ;Gán DL=0DH (CR)
INT 21H ;Gọi ngắt 21H, in kí tự điều khiển CR (về đầu dòng)
INC BH ;Tăng BH 1
DEC BL ;Giảm BL 1
JNZ FO1 ;Nhảy tới nhã FO1 nếu cờ ZF chưa bật Kết quả trên màn hình:
00000 11111 22222 33333
11
3. Cho đoạn chương trình hợp ngữ sau.
...
.DATA
M1 DB 0Bh,10h,15h,2DUP(?) B1 DB 10
.CODE Thu proc
...
MOV AL,B1 ;AL = B1 = 10 (= 0Ah) LEA BX,M1 ;BX trỏ tới M1
ADD [BX+2],AL ;[BX+2] += AL (= M1[2] = 15h + 0Ah = 1Fh) ADD AL,[BX]+1 ;AL += [BX+1] (= 0Ah + 10h = 1Ah)
MOV BX,3 ;BX = 3
MOV M1[BX],AL ;M1[3] = AL = 1Ah SUB B1,10h ;B1 -= 0Ah - 10h = FAh MOV AL,B1 ;AL = B1 = FAh
INC BX ;BX += 1 = 4 MOV M1[BX],AL ;M1[4] = AL = FAh ...
Hãy cho biết giá tri mới của mảng M1 sau các lệnh trên.
M1: 0Bh,10h,1Fh,1Ah,FAh
12
4. Cho đoạn chương trình hợp ngữ sau.
...
.DATA
M1 DB ‘t’,’h’,’i’,’l’,’a’,’i’,2 DUP(‘*’) B1 DB 20H
.CODE
...
MOV AL,B1 ;Gán AL = B1 = 20H LEA BX,M1 ;BX trỏ tới M1 MOV CX,6 ;Gán CX = 6 LAP:
SUB [BX],AL ;[BX] -= AL = [BX] – 20H (chữ thường thành chữ hoa) ADD BX,1 ;BX += 1
LOOP LAP ;Lặp lại 6 lần ...
MOV AH,2 ;Gán AH = 2
MOV BX,0 ;Gán BX = 0 MOV CX,8 ;Gán CX = 8 LAI:
MOV DL,M1[BX] ;Gán DL = M1[BX]
INT 21H ;In ra màn hình kí tự trong DL
INC BX ;Tăng BX 1
LOOP LAI ;Lặp lại quá trình trên 8 lần (CX = 8)
Hãy cho biết giá tri mới của mảng M1 sau các lệnh trên và kết quả trên màn hình.
M1: ‘T’,’H’,’I’,’L’,’A’,’I’,’*’,’*’
Kết quả trên màn hình:
THILAI**
13
5. Giải thích từng lệnh và viết kết quả trên màn hình của đoạn chương trình sau MOV BH,41H ;Gán BH = 41H (kí tự ‘A’)
MOV BL,4 ;Gán BL = 4 MOV AH,2 ;Gán AH = 2 LAP:
MOV CX,5 ;Gán CX = 5 LAI:
MOV DL,BH ;Chuyển nội dung BH vào DL
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL OR DL,20H ;DL OR 20H (chuyển chữ hoa thành chữ thường) INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL LOOP LAI ;Lặp lại quá trình trên 5 lần (CX = 5)
MOV DL,’_’ ;Gán DL = ‘_’
INT 21H ;Gọi ngắt 21H 3 lần, in ra 3 lần kí tự ‘_’
INT 21H INT 21H
INC BH ;Tăng BH 1
DEC BL ;Giảm BL 1
JNZ LAP ;Nhảy tới nhãn LAP nếu cờ ZF bật
……….
Kết quả trên màn hình:
AaAaAaAaAa___BbBbBbBbBb___CcCcCcCcCc___DdDdDdDdDd___
14
6. Giải thích từng lệnh và viết kết quả trên màn hình của đoạn chương trình sau MOV BH,0AH ;Gán BH = 0AH (kí tự điều khiển LF)
MOV DL,39H ;Gán DL = 39H (kí tự ‘9’)
ADD DL,BH ;DL += BH = 39H + 0AH = 43H (kí tự ‘C’) MOV CX,5 ;Gán CX = 5
MOV AH,2 ;Gán AH = 2 LAP:
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL LOOP LAP ;Lặp lại quá trình trên 5 lần (CX = 5)
XCHG BH,DL ;Đổi chỗ giá trị trong BH và DL (BH = 43H, DL = 0AH) INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL (kí tự LF) MOV DL,0DH ;Gán DL = 0DH (kí tự điều khiển CR)
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL (kí tự CR) MOV CX,8 ;Gán CX = 8
MA:
XOR DL,DL ;DL XOR DL (Xóa DL = 0) ROL BH,1 ;Quay trái BH 1, CF = MSB
RCL DL,1 ;Quay trái DL qua cờ CF 1, LSB = CF ADD DL,30H ;DL += 30H (đổi số thành mã ASCII)
INT 21H ;Gọi ngắt 21H, in ra màn hình kí tự trong DL LOOP MA ;Lặp lại quá trình trên 8 lần (CX = 8)
Kết quả trên màn hình:
CCCCC 01000011
15
Bài tập lập trình
1. Viết chương trình hợp ngữ đầy đủ thực hiện công việc sau - Thông báo để vào một dòng chữ bất kỳ, kết thúc bằng Enter.
- Vào một dòng chữ.
- Đếm số chữ hoa trong dòng.
- Nếu không có chữ hoa hiển thị thông báo “Không có chữ hoa”.
- Ngược lại hiển thị số chữ hoa lên màn hình.(giả thiết số chữ hoa không quá 9).
- Về DOS.
Giải:
.MODEL SMALL .STACK 100H .DATA
S1 DB 'Vao mot dong chu bat ki: $’
S2 DB ‘Khong co chu hoa$’
S3 DB 0AH,0DH,’$’
.CODE MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
MOV AH,9 ;In ra thông báo để vào một dòng chữ bất kì LEA DX,S1
INT 21H
MOV AH,1 ;Bắt đầu đọc kí tự vào
XOR CX,CX ;CX chứa số chữ hoa trong dòng LAP1:
INT 21H ;Đọc một kí tự
CMP AL,0DH ;Xem có phải là Enter không?
JE TIEP1 ;Nếu là Enter thì nhảy tới nhãn TIEP1 CMP AL,41H ;Xem có <’A’ không?
JL NOTUPPER ;Nếu <’A’ thì nhảy tới nhãn NOTUPPER CMP AL,5AH ;Nếu >=’A’, xét xem có >’Z’ không?
JG NOTUPPER ;Nếu lớn hơn thì nhảy tới nhãn NOTUPPER INC CX ;Nếu <=’Z’ thì là chữ hoa, tăng CX 1
NOTUPPER:
JMP LAP1 ;Nếu không phải là chữ hoa thì lặp lại việc đọc kí tự TIEP1:
MOV AH,9 ;In ra chuỗi CRLF, xuống dòng LEA DX,S3
INT 21H
16
CMP CX,0 ;Xem CX có bằng 0 không?
JE NOUPPER ;Nếu CX = 0, nhảy tới nhã NOUPPER
MOV DX,CX ; Nếu CX <> 0, chuyển số chữ hoa trong CX sang DX ADD DL,30H ;Đổi sang kí tự số
MOV AH,2
INT 21H ;In ra số chữ hoa JMP EXIT ;Nhảy tới nhãn EXIT NOUPPER:
MOV AH,9 ;Nếu không có chữ hoa, in ra thông báo S2 LEA DX,S2
INT 21H EXIT:
MOV AH,4CH ;Trả lại điều khiển cho hệ thống INT 21H
MAIN ENDP END MAIN
17
2. Cho một mảng số liệu có tên M1 gồm 50 phần tử cỡ WORD. Viết chương trình hợp ngữ đầy đủ đếm và hiển thị số lượng phần tử là số âm lên màn hình.
(Giả thiết có chương trình con hiển thị số hệ 10 tên là IN_DEC, số cần hiển thị để trong AX.)
Giải:
.MODEL SMALL .STACK 100H .DATA
M1 DW -10,-9,2,-3,5,45 DUP(-1) .CODE
MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
XOR CX,CX ;CX chứa số số âm
XOR BX,BX ;BX đóng vai trò chỉ số khi chạy trong mảng LEA SI,M1 ;SI trỏ vào đầu mảng M1
LAP1:
CMP BX,50 ;So sánh BX với 50
JE TIEP1 ;Nếu BX = 50 nhảy tới nhãn TIEP1 MOV AX,[SI] ;AX = phần tử trỏ bởi SI
CMP AX,0 ;So sánh AX với 0
JGE SO_DUONG ;Nếu AX>=0, nhảy tới nhãn SO_DUONG INC CX ;Nếu AX<0, tăng số số âm 1
SO_DUONG:
INC BX ;Tăng BX 1
ADD SI,2 ;Tăng SI 2 (do mỗi phần tử trong M1 là 1 word) JMP LAP1 ;Lặp lại đến khi duyệt hết mảng M1
TIEP1:
MOV AX,CX ;In ra số số âm hệ 10 CALL IN_DEC
MOV AH,4CH ;Trả lại điều khiển cho hệ thống INT 21H
MAIN ENDP
IN_DEC PROC ;Thủ tục in ra số hệ 10 chứa trong AX PUSH AX ;Lưu lại các thanh ghi
PUSH BX PUSH CX PUSH DX
CMP AX,0 ;So sánh AX với 0
JGE SODUONG ;Nếu AX>=0, nhảy tới SODUONG PUSH AX ;Nếu AX<0, lưu lại số trong AX MOV AH,2 ;In ra dấu âm ‘-‘
MOV DL,'-'
18
INT 21H
POP AX ;Lấy lại số âm trong AX
NEG AX ;Rồi đổi dấu số âm trong AX thành số dương SODUONG:
XOR CX,CX ;CX chứa số chữ số của số cần in MOV BX,10 ;Gán BX = 10
LAY_SO_DU:
XOR DX,DX ;Chuẩn bị cho phép chia DXAX cho 10
DIV BX ;Chia AX cho 10
PUSH DX ;Số dư cất vào Stack INC CX ;Tăng số chữ số lên 1 CMP AX,0 ;So sánh thương với 0
JNE LAY_SO_DU ;Nếu <> 0 thì lặp lại quá trình chia DXAX cho 10 MOV AH,2 ;In ra các chữ số của AX
IN_SO_DU:
POP DX ;Lấy các số dư khi chia DXAX cho 10 OR DL,30H ;Đổi thành kí tự số trong bảng ASCII
INT 21H ;In ra
LOOP IN_SO_DU ;Lặp lại số lần bằng số chữ số của AX POP DX ;Khôi phục các thanh ghi
POP CX POP BX POP AX RET IN_DEC ENDP END MAIN
19
3. Cho một mảng số liệu có tên M1 gồm 80 phần tử, mỗi phần tử cỡ 1 BYTE chứa 1 kí tự. Viết chương trình hợp ngữ đầy đủ làm các công việc sau:
+ Vào một dòng kí tự lưu trong mảng.
+ Đếm và hiển thị những kí tự là chữ số ở dòng tiếp theo.
Giải:
.MODEL SMALL .STACK 100H .DATA
M1 DB 80 DUP(0)
S1 DB ‘Vao mot dong ki tu: $’
S2 DB ‘So chu so: $’
S3 DB ‘Cac chu so: $’
CRLF DB 13,10,’$’
.CODE MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
MOV AH,9 ;In ra thông báo vào một dòng kí tự LEA DX,S1
INT 21H
XOR CX,CX ;CX chứa số chữ số LEA SI,M1 ;SI trỏ vào đầu mảng M1 MOV AH,1
LAP1:
INT 21H ;Đọc các kí tự nhập vào
CMP AL,0DH ;Xem có phải phím Enter không JE TIEP1 ;Nếu đúng thì nhảy đến nhãn TIEP1 MOV [SI],AL ;Lưu kí tự đọc được vào ô nhớ trỏ bởi SI
INC SI ;Tăng SI 1 (do các phần tử trong mảng kiểu BYTE) CMP AL,48 ;So sánh kí tự nhập vào với ‘0’
JL LAP1 ;Nếu nhỏ hơn thì đọc kí tự tiếp theo CMP AL,57 ;So sánh kí tự nhập vào với ‘9’
JG LAP1 ;Nếu lớn hơn thì đọc kí tự tiếp theo INC CX ;Nếu < ‘9’ thì tăng số chữ số lên 1 JMP LAP1 ;Đọc kí tự tiếp theo
TIEP1:
MOV [SI],’$’ ;Gán cho kí tự cuối cùng của xâu là ‘$’
MOV AH,9 ;In ra chuỗi CRLF, xuống dòng LEA DX,CRLF
20
INT 21H
LEA DX,S2 ;In ra thông báo số chữ số INT 21H
MOV AX,CX ;In ra số chữ số dưới dạng hệ 10 CALL IN_DEC
MOV AH,9 ;In ra chuỗi CRLF, xuống dòng LEA DX,CRLF
INT 21H
LEA DX,S3 ; In ra thông báo các chữ số INT 21H
MOV AH,2
LEA SI,M1 ;SI trỏ vào đầu mảng M1 LAP2:
CMP [SI],’$’ ;So sánh [SI] với kí tự ‘$’
JE TIEP2 ;Nếu đúng thì nhảy tới nhãn TIEP2 MOV DL,[SI] ;Nếu không thì gán DL bằng [SI]
CMP DL,’0’ ;So sánh DL với ‘0’
JL NOT_NUMBER ;Nếu <’0’thì nhảy tới nhãn NOT_NUMBER CMP DL,’9’ ;Nếu >=’0’ thì so sánh với ‘9’
JG NOT_NUMBER ;Nếu >’9’ thì nhảy tới nhãn NOT_NUMBER INT 21H ;Nếu <=’9’ thì in ra chữ số đó
MOV DL,’ ‘ ;In ra dấu ‘ ‘ INT 21H
NOT_NUMBER:
INC SI ;Nếu không phải là chữ số thì tăng SI 1
JMP LAP2 ;Chuyển sang xét kí tự tiếp theo trong mảng M1 TIEP2:
MOV AH,4CH ;Trả lại điều khiển cho hệ thống INT 21H
MAIN ENDP
IN_DEC PROC ;Thủ tục in ra số hệ 10 chứa trong AX PUSH AX ;Lưu lại các thanh ghi
PUSH BX PUSH CX PUSH DX
CMP AX,0 ;So sánh AX với 0
21
JGE SODUONG ;Nếu AX>=0, nhảy tới SODUONG PUSH AX ;Nếu AX<0, lưu lại số trong AX MOV AH,2 ;In ra dấu âm ‘-‘
MOV DL,'-' INT 21H
POP AX ;Lấy lại số âm trong AX
NEG AX ;Rồi đổi dấu số âm trong AX thành số dương SODUONG:
XOR CX,CX ;CX chứa số chữ số của số cần in MOV BX,10 ;Gán BX = 10
LAY_SO_DU:
XOR DX,DX ;Chuẩn bị cho phép chia DXAX cho 10
DIV BX ;Chia AX cho 10
PUSH DX ;Số dư cất vào Stack INC CX ;Tăng số chữ số lên 1 CMP AX,0 ;So sánh thương với 0
JNE LAY_SO_DU ;Nếu <> 0 thì lặp lại quá trình chia DXAX cho 10 MOV AH,2 ;In ra các chữ số của AX
IN_SO_DU:
POP DX ;Lấy các số dư khi chia DXAX cho 10 OR DL,30H ;Đổi thành kí tự số trong bảng ASCII
INT 21H ;In ra
LOOP IN_SO_DU ;Lặp lại số lần bằng số chữ số của AX POP DX ;Khôi phục các thanh ghi
POP CX POP BX POP AX RET IN_DEC ENDP END MAIN
22
4. Viết chương trình hợp ngữ đầy đủ tính a=b+c với điều kiện:
+ a,b,c là các biến kiểu byte.
+ Thông báo để vào giá trị b,c bằng một số hệ 10 từ bàn phím.
+ Tính a=b+c và thông báo kết quả lên màn hình.
(Nếu a>9 hãy trừ đi 10 và in ra số 1, Đổi a ra chữ số và hiển thị. ) + Về DOS.
Giải:
.MODEL SMALL .STACK 100H .DATA
S1 DB ‘Vao cac chu so tu 0 – 9: $’
S2 DB ‘b = $’
S3 DB ‘c = $’
S4 DB ‘Tong cua b va c la: $’
CRLF DB 13,10,’$’
.CODE MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
MOV AH,9 ;In ra thông báo vào các chữ số LEA DX,S1
INT 21H
LEA DX,CRLF ;Xuống dòng INT 21H
LEA DX,S2 ;In ra thông báo nhập b = INT 21H
MOV AH,1 ;Nhập giá trị cho b INT 21H
SUB AL,30H ;Đổi b thành số và chứa trong BL MOV BL,AL
MOV AH,9 ;Xuống dòng
LEA DX,CRLF INT 21H
LEA DX,S3 ;In ra thông báo nhập c = INT 21H
MOV AH,1 ;Nhập giá trị cho c
23
INT 21H
SUB AL,30H ;Đổi c thành số
ADD BL,AL ;Thực hiện b + c và chứa kết quả trong BL
MOV AH,9 ;Xuống dòng
LEA DX,CRLF INT 21H
LEA DX,S4 ;In ra thông báo tổng của b và c là INT 21H
CMP BL,10 ;So sánh tổng với 10
JL NHO_HON_10 ;Nếu nhỏ hơn thì nhảy tới nhãn NHO_HON_10 MOV AH,2 ;Nếu lớn hơn 10 thì
MOV DL,’1’ ;In ra số 1 INT 21H
SUB BL,10 ;Và trừ tổng đi 10 NHO_HON_10:
MOV AH,2
MOV DL,BL ;Gán DL = BL
ADD DL,30H ;Đổi ra mã ASCII của chữ số tương ứng INT 21H ;In ra chữ số trong BL
MOV AH,4CH ;Trả lại điều khiển cho hệ thống INT 21H
MAIN ENDP END MAIN
24
5. Viết chương trình hợp ngữ đầy đủ thực hiện công việc sau
- Thông báo để vào một từ bất kỳ.( Từ dài nhất cũng không quá 15 kí tự) - Vào một từ và lưu trong mảng có tên Name ( Đếm số chữ).
- Nếu chữ đầu là chữ thường đổi thành chữ hoa.
- Nếu các chữ tiếp theo là hoa đổi thành thường.
- Hiển thị từ đã sửa ở dòng tiếp theo.
- Về DOS.
Ví dụ: Bạn hãy vào một cái tên: BiNH Tên đã sửa: Binh
Giải:
.MODEL SMALL .STACK 100H .DATA
S1 DB ‘Ban hay vao mot cai ten: $‘
S2 DB ‘Ten da sua: $‘
S3 DB 15 DUP(0) CRLF DB 13,10,’$’
.CODE MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
MOV AH,9 ;In ra thông báo vào một cái tên LEA DX,S1
INT 21H
XOR CX,CX ;CX chứa số chữ cái của xâu nhập vào LEA SI,S3 ;SI trỏ vào đầu mảng S3
MOV AH,1 LAP1:
INT 21H ;Đọc một kí tự
CMP AL,13 ;Xem có ấn phím Enter không?
JE TIEP1 ;Nếu là phím Enter, nhảy tới nhãn TIEP1 MOV [SI],AL ;Lưu kí tự vừa nhập vào mảng
INC CX ;Tăng số chữ cái lên 1
INC SI ;Tăng SI 1
JMP LAP1 ;Đọc kí tự tiếp theo TIEP1:
MOV [SI],’$’ ;Gán kí tự cuối cùng của xâu là ‘$’
MOV AH,9 ;Xuống dòng
25
LEA DX,CRLF INT 21H
LEA DX,S2 ;In ra thông báo “Tên đã sửa: “ INT 21H
LEA SI,S3 ;SI trỏ vào đầu mảng S3 MOV AL,[SI] ;Gán AL = [SI]
CMP AL,’a’ ;So sánh kí tự đầu với ‘a’
JL NOT_LOWER ;Nếu <’a’ thì nhảy tới nhãn NOT_LOWER CMP AL,’z’ ;Nếu >=’a’ thì so sánh với ‘z’
JG NOT_LOWER ;Nếu >’z’ thì nhảy tới nhãn NOT_LOWER SUB AL,20H ;Nếu <=’z’ thì đổi thành chữ hoa
NOT_LOWER:
MOV AH,2 ;In ra kí tự đầu tiên của xâu chứa trong AL MOV DL,AL
INT 21H DEC CX LAP2:
INC SI ;Tăng SI, trỏ tới kí tự tiếp theo trong xâu MOV AL,[SI] ;Gán AL = [SI]
CMP AL,’A’ ;So sánh AL với ‘A’
JL NOT_UPPER ;Nếu <’A’ thì nhảy đến nhãn NOT_UPPER CMP AL,’Z’ ;Nếu >=’A’ thì so sánh với ‘Z’
JG NOT_UPPER ;Nếu >’Z’ thì nhảy đến nhãn NOT_UPPER ADD AL,20H ;Nếu <=’Z’ thì là chữ hoa, đổi thành chữ thường NOT_UPPER:
MOV AH,2 ;In ra kí tự trong AL MOV DL,AL
INT 21H
LOOP LAP2 ;Lặp lại với các kí tự tiếp theo MOV AH,4CH ;Trả lại điều khiển cho hệ thống INT 21H
MAIN ENDP END MAIN
26
6. Viết chương trình hợp ngữ đầy đủ thực hiện công việc sau
- Hiển thị thông báo :’Hãy gõ vào một chuỗi chữ cái hoa, CR để thôi’
- Nhận chuỗi chữ cái hoa.
- Xuống dòng về đầu dòng.
- Hiển thị thông báo :’Chữ cuối cùng đã đổi ra chữ thường’
- Hiển thị chữ cuối đã đã đổi ra chữ thường.
- Về DOS.
Giải:
.MODEL SMALL .STACK 100H .DATA
S1 DB ‘Hay go vao mot chuoi chu cai hoa, CR de thoi: $’
S2 DB ‘Chu cuoi cung da doi ra chu thuong: $’
CRLF DB 13,10,’$’
.CODE MAIN PROC
MOV AX,@DATA ;Khởi tạo DS MOV DS,AX
MOV AH,9 ;In ra thông báo vào một chuỗi chữ hoa LEA DX,S1
INT 21H MOV AH,1 LAP1:
INT 21H ;Đọc một kí tự
CMP AL,13 ;Xem có ấn Enter không?
JE TIEP1 ;Nếu ấn Enter thì nhảy đến nhãn TIEP1 MOV BL,AL ;Chứa kí tự vừa đọc trong BL
JMP LAP1 ;Đọc kí tự tiếp theo TIEP1:
MOV AH,9 ;Xuống dòng
LEA DX,CRLF INT 21H
LEA DX,S2 ;In ra thông báo chữ cuối cùng đổi ra chữ thường INT 21H
MOV AH,2
MOV DL,BL ;Chuyển chữ cuối cùng chứa trong BL vào DL ADD DL,20H ;Đổi ra chữ thường
INT 21H ;In ra chữ cuối cùng đã đổi thành chữ thường
27