Thực hành buổi 1 - NNHT
2 posters
k4info :: Khu vực học tập :: Học Tập :: Thư viện :: Ngôn ngữ hệ thống
Trang 1 trong tổng số 1 trang
Thực hành buổi 1 - NNHT
Đây là bộ công cụ dùng để thực hành. Còn phần hướng dẫn sử dụng thì mình không nói ở đây chắc các bạn cũng biết vì đã làm bài nộp cho thầy thì sẽ gõ. Sau này đi thực hành sẽ biết.
+ Bộ công cụ:
[You must be registered and logged in to see this link.]
--> Bài 1: Viết chương trình nhập vào 1 chuỗi ký tư sau đó:
+ In ra chuỗi ký tự vừa nhập.
+ In Hoa chuỗi ký tự vừa nhập
+ In Thường chuỗi ký tự vừa nhập
Hình demo:
+ Bộ công cụ:
[You must be registered and logged in to see this link.]
--> Bài 1: Viết chương trình nhập vào 1 chuỗi ký tư sau đó:
+ In ra chuỗi ký tự vừa nhập.
+ In Hoa chuỗi ký tự vừa nhập
+ In Thường chuỗi ký tự vừa nhập
- Code:
MyCOM GROUP CodeSeg, DataSeg
ASSUME CS:MyCOM, DS:MyCOM
CodeSeg SEGMENT PUBLIC ;
ORG 100h
Main PROC
lea dx,TB1
call WriteStr
call Nhap
lea dx,TB2
call WriteStr
call PrintStr2
lea dx,TB3
call WriteStr
call PrintStr3
lea dx,TB4
call WriteStr
call PrintStr4
int 20h
Main ENDP
;-------------------------------
Nhap PROC
mov ah,0Ah
lea dx,Max
int 21h
ret
Nhap ENDP
;-------------------------------
PrintStr1 PROC
lea si,Buffer
LoadChar:
lodsb
cmp al,0Dh
jz EndStr
mov dl,al
call WriteChar
jmp Short LoadChar
EndStr:
ret
PrintStr1 ENDP
;-------------------------------
PrintStr2 PROC
lea si,Buffer
mov ch,0
mov cl,Len
LoadChr:
lodsb
mov dl,al
call WriteChar
loop LoadChr
ret
PrintStr2 ENDP
;-------------------------------
WriteStr PROC
mov ah,9
int 21h
ret
WriteStr ENDP
;-------------------------------
PrintStr3 PROC
lea si,Buffer
Load1:
lodsb
cmp al,0Dh
jz EndStr3
cmp al,'a'
jb WrChr
cmp al,'z'
ja WrChr
sub al,32
WrChr:
mov dl,al
call WriteChar
jmp Load1
EndStr3:
ret
PrintStr3 ENDP
;-------------------------------
WriteChar PROC
mov ah,2
int 21h
ret
WriteChar ENDP
;-------------------------------
PrintStr4 PROC
lea si,Buffer
Load2:
lodsb
cmp al,0Dh
jz EndStr4
cmp al,'A'
jb WrChr1
cmp al,'Z'
ja WrChr1
add al,32
WrChr1:
mov dl,al
call WriteChar
jmp Load2
EndStr4:
ret
PrintStr4 ENDP
;-------------------------------
CodeSeg ENDS
DataSeg SEGMENT PUBLIC
TB1 DB 'Moi ban nhap chuoi:','$'
TB2 DB 0dh,0ah,'Ban vua nhap chuoi:','$'
TB3 DB 0dh,0ah,'Chuoi in hoa:','$'
TB4 DB 0dh,0ah,'Chuoi in thuong:','$'
Max DB 127
Len DB 0
Buffer DB 128 dup(0)
DataSeg ENDS
END Main
Hình demo:
Re: Thực hành buổi 1 - NNHT
Lưu ý về bài 1, ở phần code thự hiện yêu cầu đầu tiên (nhập chuỗi in ra chuỗi vừa nhập ) có 2 cách.
+ Cách 1 là hàm PrintStr1: dùng lệnh cmp al,0Dh tức là in đến ký tự Enter thì ngừng
+ Cách 2 là hàm PrintStr2: Dùng vòng lặp Loop in đến khi nào cx=0 (cx=Len) thì ngừng
Trong Main muốn xài hàm nào ta gọi lại hàm đó
+ Cách 1 là hàm PrintStr1: dùng lệnh cmp al,0Dh tức là in đến ký tự Enter thì ngừng
+ Cách 2 là hàm PrintStr2: Dùng vòng lặp Loop in đến khi nào cx=0 (cx=Len) thì ngừng
Trong Main muốn xài hàm nào ta gọi lại hàm đó
Similar topics
» Thực hành buổi 3 - HĐH
» Thực hành buổi 4 - HĐH
» Bài thực hành buổi 1
» bt 1.2 thuc hanh buoi 4
» Thực hành buổi 2 - HĐH
» Thực hành buổi 4 - HĐH
» Bài thực hành buổi 1
» bt 1.2 thuc hanh buoi 4
» Thực hành buổi 2 - HĐH
k4info :: Khu vực học tập :: Học Tập :: Thư viện :: Ngôn ngữ hệ thống
Trang 1 trong tổng số 1 trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết
|
|