12
;hien thi 80 dau * tren 1 dong
.model small
.stack 100h
.code
main proc
mov cx,80
jcxz thoat_
lap_:
mov ah,2
mov dl,'*'
int 21h
loop lap_
thoat_:
mov ah,4ch
int 21h
main endp
end main
;Nhap vao tu ban phim 1 chuoi ki tu bat ki sau do dem xem o bao nhieu ki tu 0 co bso nhieu ki tu 1
.model small
.stack 100h
.data
tb db 'Hay nhap vao 1 chuoi ki tu:$'
dem1 db ?
dem2 db ?
tb1 db 13,10,'So ki tu 1 nhap vao la:$'
tb2 db 13,10,'So ki tu 0 nhap vao la:$'
.code
main proc
mov ax,@data
mov ds,ax
mov ah,9
lea dx,tb
int 21h
mov dem1,0
mov dem2,0
mov ah,1
lap_:
int 21h
cmp al,13
je nhan1_
jne nhan2_
nhan2_:
cmp al,'1'
je tang1_
cmp al,'0'
je tang2_
jmp lap_
tang1_:
inc dem1
jmp lap_
tang2_:
inc dem2
jmp lap_
nhan1_:
mov ah,9
lea dx,tb1
int 21h
add dem1,30h
mov dl,dem1
mov ah,2
int 21h
mov ah,9
lea dx,tb2
int 21h
add dem2,30h
mov dl,dem2
mov ah,2
int 21h
mov ah,4ch
int 21h
main endp
end main
;viet chuong trinh cho phep nhap 1 ki tu tu ban phim neu ki tu vua nhap thuoc [0..9],[a..z],[A..Z] thi xuat ra man hinh ki tu do
.model small
.stack 100h
.data
tb db 13,10, 'Nhap vao 1 ki tu:$'
tb1 db ' la so $'
tb2 db ' la chu thuong $'
tb3 db ' la chu hoa $'
tb4 db 13,10,'Ki tu vua nhap:$'
tb5 db 13,10,'Ki tu ban vua nhap khong thoa man yeu cau$'
.code
main proc
mov ax,@data
mov ds,ax
lap:
mov ah,9
lea dx,tb
int 21h
mov ah,1
int 21h
cmp al,'0'
jae nhan1_
jb nhan6_
nhan1_:
cmp al,'9'
jbe hien1_
ja nhan2_
nhan2_:
cmp al,':'
jae nhan3_
nhan3_:
cmp al,'@'
jbe hien4_
ja nhan4_
nhan4_:
cmp al,'A'
je hien2_
jae nhan5_
nhan5_:
cmp al,'Z'
jbe hien2_
ja nhan6_
nhan6_:
cmp al,'['
je hien4_
ja nhan7_
nhan7_:
cmp al,60h
jbe hien4_
ja nhan8_
nhan8_:
cmp al,'a'
je hien3_
ja nhan9_
nhan9_:
cmp al,'z'
jbe hien3_
ja hien4_
hien1_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb1
int 21h
jmp thoat_
hien3_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb2
int 21h
jmp thoat_
hien2_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb3
int 21h
jmp thoat_
hien4_:
mov ah,9
lea dx,tb5
int 21h
jmp lap
thoat_:
mov ah,4ch
int 21h
main endp
end main
.model small
.stack 100h
.data
tb1 db 'De chay duoc 1 CT hop ngu ban can thuc hien cac buoc sau:$'
tb2 db 13,10,'Dich file ASM thanh file OBJ$'
tb3 db 13,10,'Lien ket file OBJ thanh file EXE$'
tb4 db 13,10,'Chay file EXE $'
.code
main proc
mov ax,@data
mov ds,ax
mov ah,9
lea dx,tb1
int 21h
mov ah,9
lea dx,tb2
int 21h
mov ah,9
lea dx,tb3
int 21h
mov ah,9
lea dx,tb4
int 21h
mov ah,4ch
int 21h
main endp
end main
;viet chuong trinh cho phep nhap 1 ki tu tu ban phim neu ki tu vua nhap thuoc [0..9],[a..z],[A..Z] thi xuat ra man hinh ki tu do
.model small
.stack 100h
.data
tb db 'Nhap vao 1 ki tu:$'
tb1 db ' la so $'
tb2 db ' la chu thuong $'
tb3 db ' la chu hoa $'
tb4 db 13,10,'Ki tu vua nhap:$'
.code
main proc
mov ax,@data
mov ds,ax
mov ah,9
lea dx,tb
int 21h
mov ah,1
int 21h
cmp al,'0'
jae nhan1_
jb nhan6_
nhan1_:
cmp al,'9'
jbe hien1_
ja nhan2_
nhan2_:
cmp al,'A'
jae nhan3_
nhan3_:
cmp al,'Z'
jbe hien2_
ja nhan4_
nhan4_:
cmp al,'a'
jae nhan5_
nhan5_:
cmp al,'z'
jbe hien3_
hien1_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb1
int 21h
jmp thoat_
hien3_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb2
int 21h
jmp thoat_
hien2_:
mov bl,al
mov ah,9
lea dx,tb4
int 21h
mov dl,bl
mov ah,2
int 21h
mov ah,9
lea dx,tb3
int 21h
jmp thoat_
thoat_:
mov ah,4ch
int 21h
main endp
end main
;nhap hai so nguyen duong N, M thuoc [0..9] nhap 1 ki tu char.xuat ra man hinh ma tran dom n dong Mcot gom ki tu char
.model small
.stack 100h
.data
tb1 db 'nhap vao so dong cua ma tran N=$'
tb2 db 13,10,'Nhap vao so cot cua ma tran M=$'
c db ?
M db ?
N db ?
d db ?
d1 db ?
.code
main proc
mov ax,@data
mov ds,ax
mov ah,9
lea dx,tb1
int 21h
mov ah,1
int 21h
sub al,30h
mov N,al
mov ah,9
lea dx,tb2
int 21h
sub al,30h
mov M,al
mov ah,1
int 21h
mov c,al
mov cl,M
mov d1,0
mov bl,N
jcxz thoat_
nhan_:
add bl,bl
inc d1
loop nhan_
mov d,0
mov cl,bl
jcxz thoat_
lap_:
mov ah,2
mov dl,c
int 21h
inc d
mov bl,d1
dec bl
cmp d,bl
jna tiep_
mov ah,2
mov dl,0dh
int 21h
mov dl,0ah
int 21h
mov d,0
tiep_: loop lap_
thoat_:
mov ah,4ch
int 21h
main endp
end main
;nhap hai so nguyen duong N, M thuoc [0..9] nhap 1 ki tu char.xuat ra man hinh ma tran dom n dong Mcot gom ki tu char
.model small
.stack 100h
.data
tb1 db 'nhap vao so dong cua ma tran N=$'
tb2 db 13,10,'Nhap vao so cot cua ma tran M=$'
c db ?
M db ?
N db ?
d db ?
d1 db ?
.code
main proc
mov ax,@data
mov ds,ax
mov ah,9
lea dx,tb1
int 21h
mov ah,1
int 21h
sub al,30h
mov N,al
mov ah,9
lea dx,tb2
int 21h
sub al,30h
mov M,al
mov ah,1
int 21h
mov c,al
mov cl,M
mov d1,0
mov bl,N
jcxz thoat_
nhan_:
add bl,bl
inc d1
loop nhan_
mov d,0
mov cl,bl
jcxz thoat_
lap_:
mov ah,2
mov dl,c
int 21h
inc d
mov bl,d1
dec bl
cmp d,bl
jna tiep_
mov ah,2
mov dl,0dh
int 21h
mov dl,0ah
int 21h
mov d,0
tiep_: loop lap_
thoat_:
mov ah,4ch
int 21h
main endp
end main
Bạn đang đọc truyện trên: Truyen2U.Pro