Lap Trinh Hop Ngu
Lap Trinh Hop Ngu
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI BAN NHAP 1 KY TU : $’
THONGBAO2 DB 13, 10, ‘KY TU LIEN TRUOC LA : $’
THONGBAO3 DB 13, 10, ‘KY TU LIEN SAU LA : $’
KYTU DB ?
. CODE
MAIN PROC
; KHOI TAO THANH GHI DS
MOV AX, @DATA
MOV DS, AX
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
; LUU TRU KY TU
MOV KYTU, AL
; KY TU LIEN TRUOC
DEC DL
; XUAT KY TU
MOV AH, 02H
INT 21H
; KY TU LIEN SAU
INC DL
; XUAT KY TU
MOV AH, 02H
INT 21H
Bài 3 :
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI NHAP 1 KY TU HOA : $’
THONGBAO2 DB 13, 10, ‘KY TU THUONG LA : $’
KYTU DB ?
. CODE
MAIN PROC
; KHOI TAO THANH GHI DS
MOV AX, @DATA
MOV DS, AX
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
; LUU TRU KY TU
MOV KYTU, AL
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
; LUU TRU KY TU
MOV KYTU, AL
; NHAP KY TU
MOV AH, 01H
LAP :
INT 21H
CMP AL, 13D
JE THOAT
LOOP LAP;
THOAT :
; THOAT CHUONG TRINH, TRO VE DOS
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN
Bài 6 :
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI NHAP KY TU : $’
. CODE
MAIN PROC
; KHOI TAO THANH GHI DS
MOV AX, @DATA
MOV DS, AX
; NHAP KY TU
MOV AH, 01H
LAP :
INT 21H
CMP CX, 0
JE THOAT
LOOP LAP
THOAT :
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN
Bài 7 :
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI NHAP KY TU : $’
. CODE
MAIN PROC
; KHOI TAO THANH GHI DS
MOV AX, @DATA
MOV DS, AX
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
LASO :
; HIEN THI THONGBAO2
MOV AH, 09H
LEA DX, THONGBAO2
INT 21H
JMP THOAT
KHONGLASO :
; HIEN THI THONGBAO3
MOV AH, 09H
LEA AX, THONGBAO3
INT 21H
THOAT :
; THOAT CHUONG TRINH, TRO VE DOS
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN
Bài 9 :
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI NHAP 1 KY TU : $’
THONGBAO2 DB 13, 10, ‘LA KY TU HOA! $’
THONGBAO3 DB 13, 10, ‘LA KY TU THUONG! $’
THONGBAO4 DB 13, 10, ‘KHONG LA KY TU CHU! $’
. CODE
MAIN PROC
; KHOI TAO THANH GHI DS
MOV AX, @DATA
MOV DS, AX
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
; SO SANH
CMP AL, 65D
JB KHONGLAKYTUCHU
CMP AL, 122D
JA KHONGLAKYTUCHU
CMP AL, 90D
JBE LAKYTUHOA
CMP AL, 97D
JAE LAKYTUTHUONG
LAKYTUHOA :
; HIEN THI THONGBAO2
MOV AH, 09H
LEA DX, THONGBAO2
INT 21H
LAKYTUTHUONG :
; HIEN THI THONGBAO3
MOV AH, 09H
LEA DX, THONGBAO3
INT 21H
KHONGLAKYTUCHU
; HIEN THI THONGBAO4
MOV AH, 09H
LEA DX, THONGBAO4
INT 21H
THOAT :
; THOAT CHUONG TRINH, TRO VE DOS
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN
Bài 10 :
. MODEL SMALL
. STACK 100
. DATA
THONGBAO1 DB ‘MOI NHAP SO THU NHAT : $’
THONGBAO2 DB 13, 10, ‘MOI NHAP SO THU HAI : $’
THONGBAO3 DB 13, 10, ‘TONG HAI SO LA : $’
THONGBAO4 DB 13, 10, ‘KHONG THE THUC HIEN PHEP CONG !$’
SOTHU1 DB ?
TONG DB ?
. CODE
MAIN PROC
MOV AX, @DATA
MOV DS, AX
; TINH TONG 2 SO
ADD AL, SOTHU1
SUB AL, 48D
JA KHONGTHUCHIEN
HIENTHIKETQUA:
; HIEN THI THONGBAO3
MOV AH, 09H
LEA DX, THONGBAO3
INT 21H
KHONGTHUCHIEN:
; HIEN THI THONGBAO4
MOV AH, 09H
LEA DX, THONGBAO4
INT 21H
THOAT :
; THOAT CHUONG TRINH, TRO VE DOS
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN
Bài 11 :
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 ‘MOI NHAP SO THU NHAT : $’
THONGBAO2 13, 10, ‘MOI NHAP SO THU HAI : $’
THONGBAO3 13, 10, ‘TONG NHO HON 5 !$’
THONGBAO4 13, 10, ‘TONG BANG 5 !$’
THONGBAO5 13, 10, ‘TONG LON HON 5 !$’
THONG BAO6 13, 10, ‘KHONG THE THUC HIEN PHEP CONG !$’
SOTHU1 DB ?
. CODE
MAIN PROC
MOV AX, @DATA
MOV DS, AX
; NHAP 1 SO
MOV AH, 01H
INT 21H
; NHAP 1 SO
MOV AH, 01H
INT 21H
; TINH TONG 2 SO
ADD AL, SOTHU1
SUB AL, 48D
; KIEM TRA
CMP AL, 48D
JB KHONGTHUCHIEN
CMP AL, 57D
JA KHONGTHUCHIEN
CMP AL, 53D
JA SOLONHON5
JE SOBANG5
JB SONHOHON5
SOLONHON5:
; HIEN THI THONGBAO3
MOV AH, 09H
LEA DS, THONGBAO3
INT 21
JMP THOAT
SOBANG5:
; HIEN THI THONGBAO4
MOV AH, 09H
LEA DS, THONGBAO4
INT 21H
JMP THOAT
SONHOHON5:
; HIEN THI THONGBAO5
MOV AH, 09H
LEA AH, THONGBAO5
INT 21H
JMP THOAT
KHONG THUC HIEN
; HIEN THI THONGBAO6
MOV AH, 09H
LEA DS, THONGBAO6
INT 21H
MAIN ENDP
END MAIN
; NHAP 1 KY TU
MOV AH, 01H
INT 21H
; LUU TRU KY TU
MOV KYTU, AL
MOV DL, AL
MOV AH, 2
INT 21H
; NHAP CHUOI KY TU
MOV AH, 01H
INT 21H
3. Viết chương trình nhập vào 1 chuỗi ký tự, in ra chuỗi thường, chuỗi hoa.
5. Chương trình tính tổng của 2 số bất kỳ.
. MODEL SMALL
. STACK 100H
. DATA
THONGBAO1 DB ‘MOI NHAP SO THU NHAT : $’
THONGBAO2 DB 13,10, ‘MOI NHAP SO THU HAI : $’
THONGBAO3 DB 13, 10, ‘ TONG CUA 2 SO LA : $’
SOTHU1 DB ?
TONG DB ?
. CODE
MAIN PROC
MOV AX, @DATA
MOV DS, AX
; TINH TONG 2 SO
ADD AL, SOTHU1
SUB AL, 48D
HIENTHIKETQUA :
; HIEN THI THONGBAO3
MOV AH, 09H
LEA DX, THONGBAO3
INT 21H
MOV DL, TONG
MOV AH, 02H
INT 21H
JMP THOAT
THOAT :
MOV AH, 4CH
INT 21H
MAIN ENDP
END MAIN