TỔNG HỢP NHỮNG BÀI TẬP TRONG LẬP TRÍNH HỢP NGỮ doc

TỔNG HỢP NHỮNG BÀI TẬP TRONG LẬP TRÍNH HỢP NGỮ 8088/8086

(BIÊN SOẠN CHỈNH SỬA THỨC NGUYỄN) Gmail:thucnguyen2091991@gmail.com.vn CÂU1:Viết chương trình hiển thị dòng chữ “chào 36cdvt5”

Giải:

.model small

.stack 100h

.data

Ch1 db 13,10,’chao 36cdvt5’,’$’

.code

Main proc

Mov ax,@data

Mov ds,ax

Mov ah,09h

Lea dx,ch1

int 21h

mov ah,4ch

int 21h

main endp

end main

CÂU2:Viết chương trình để nhập một ki tự và có hiển thị kí tự đó ra màn hình ,trước khi nhập một

Kí tự thì hiển thị ra màn hình dòng chữ “bạn hãy nhập một kí tự bất kì”

Giải:

.model small

.stack 100h

.data

Ch1 db 13,10,’ban hay nhap mot ki tu bat ki :’,’$’

.code

Main proc

Mov ax,@data

Mov ds,ax

Mov ah,09h

Lea dx,ch1

int 21h

mov ah,01h

int 21h

mov ah,4ch

int 21h

main endp

end main

CÂU3:Viết chương trình để nhập một kí tự và kiểm tra nó là ki tự “a”thì hiển thị dòng chữ “bạn vừa Nhập kí tự a” nếu không phải kí tự “a”thí hiển thị dòng chữ “bạn đã nhập không phải chữ bạn nhập Không phải kí tự a”

GIẢI:

.model small

.Stack 100h

.data

Ch1 db 13,10,’ban hay nhap ki tu bat ki :’,’$’

Ch2 db 13,10,’ban vua nhap ki tu a ‘,’$’

Ch3 db 13,10,’ban vua nhap khong phai ki tu a’,’$’

.code

Main proc

Mov ax,@data

Mov ax,ds

Mov ah,09h

Lea dx,ch1

Int 21h

Mov ah,01h

Lea dx,ch1

Int 21h

Cmp ah,’a’

Je cv1

Mov ah,09h

Lea dx,ch3

Int 21h

Mov ah,4ch

Int 21h

Cv1:

Mov ah,09h

Lea dx,ch2

Int 21h

Mov ah,4ch

Int 21h

Main endp

End main

CÂU4:Viết chương trình kiểm tra phim caplock bật hay tắt ? GIẢI:

.model small

.stack 100h

.data

Ch1 db 13,10,’phim caplock mo’,’$’

Ch2 db 13,10,’phim caplock dong’,’$’

.code

Main proc

Mov ax,@data

Mov ds,ax

Mov ah,02h

Int 16h

And al,01000000b

Jz cv1

Mov ah,09h

Lea dx,ch1

Int 21h

Mov ah,4ch

Int 21h

Cv1:

Mov ah,09h

Lea dx,ch2

Int 21h

Mov ah,4ch

Int 21h

Main endp

End main

CÂU5: viết chương trình hiển thị trạng thái làm việc của các phím “capslock”và phím “inst” và Phím “numlock”?

GIẢI:

.model small

.stack 100h

.data

Ch1 db 13,10,’phim ints dang hoat dong !’,’$’

Ch2 db 13,10,’phim ints khong hoat dong!’,’$’

Ch3 db 13,10,’phim capslock dang hoat dong!’,’$’

Ch4 db 13,10,’phim capslock khong hoat dong!’,’$’

Ch5 db 13,10,’phim numblock dang hoat dong!’,’$’

Ch6 db 13,10,’phim numblock khong hoat dong!’,’$’

.code

Main proc

Mov ax,@data

Mov ds,ax

;kiem tra phim ints

Lap1:mov ah,02h

Int 16h

And al,10000000b

Jz cv1

Mov ah,09h

Lea dx,ch1

Int 21h

Jmp lap2

Cv1:mov ah,09h

Lea dx,ch2

Int 21h

Jmp lap2

;kiem tra phim capslock

Lap2:mov ah,02h

Int 16h

And al,01000000b

Jz cv2 ;neu al=0 thi nhay cv2

Mov ah,09h

Lea al,ch3

Int 21h

Jmp lap3

Cv2:mov ah,09h

Lea dx,ch4

Int 21h

Jmp lap3

;kiem tra phim numblock

Lap3:mov ah,02h

Int 16h

And al,00100000b

Jz cv3

Mov ah,09h Lea dx,ch5

Int 21h

Jmp lap4

Cv3:mov ah,09h Lea dx,ch6

Int 21h

Jmp lap4

Lap4:mov ah,01h Int 21h

Cmp al,’t’

Je thoat

Jmp lap1

Thoat:mov ah,4ch Int 21h

Main endp

End main