Trả lời chủ đề

Nội dung

<blockquote data-quote="lamnhat" data-source="post: 93787" data-attributes="member: 84866">.model small.data&nbsp;moinhap db 10,13,&quot;Moi nhap 1 ho ten:$&quot;&nbsp;hienthi db 10,13,&quot;$&quot;&nbsp;hienthi1 db 10,13,&quot;Ten cua ban la: $&quot; &nbsp;hienthi2 db 10,13,&quot;Ho cua ban la: $&quot;&nbsp;hovaten db 50 dup(&quot;$&quot;)&nbsp;ten db 8 dup(&quot;$&quot;)&nbsp;s1 db 13,10,&#039;********************************&#039;,13,10 &nbsp;s2 db &#039;*LAM QUEN NHA MINH LA PHAM LAM NHAT&#039; ,13,10&nbsp;s4 db &#039;************************************$&#039;&nbsp;t db 10,13,&#039;nhap vao mot chuoi:chu y(chu hoa thi doi thanh chu thuong,chu thuong thi doi thanh chu hoa):$&#039;&nbsp;hoathuong db 10,13,&#039;chuoi ban nhap da duoc doi:$&#039;&nbsp;s db 99,?,100 dup (?)&nbsp;nhapkt db 10,13,&#039;cho biet kt dau tien cua ten nguoi ban can:$&#039;&nbsp;sai db 10,13,&#039;ban nhap sai roi!$&#039;&nbsp;nhlai db 10,13,&#039;moi ban nhap lai:$&#039;&nbsp;hien db 10,13,&#039;ban chu cai:$&#039;&nbsp;het db 10,13,&#039;ban nhap qua so lan quy dinh!hen ban lan sau!$&#039;&nbsp;nhdung db 10,13,&#039;chuc mung ban!$&#039;&nbsp;cviec db 10,13,&#039;Ban da vao duoc nhat ki cua lamnhat!$&#039;&nbsp;lviec db 10,13,&#039;bat dau:$&#039;&nbsp;nhapmk db 10,13,&#039;moi ban nhap mat khau:$&#039;&nbsp;ms1 db 10,13,&#039;moi nhap chuoi kt:$&#039;&nbsp;ms2 db 10,13,&#039;chuoi da nhap la:$&#039;&nbsp;ms3 db 10,13,&#039;chuoi doi thanh chu hoa:$&#039;&nbsp;ms4 db 10,13,&#039;chuoi doi thanh chu thuong:$&#039;&nbsp;hoten db 123 dup(&#039;$&#039;)&nbsp;hotenchuan db 123 dup (&#039;$&#039;)&nbsp;ln db 5 dup(&#039;$&#039;)&nbsp;mk1 db 15 dup(&#039;$&#039;)&nbsp;mk2 db 15 dup(&#039;$&#039;)&nbsp;.code &nbsp;batdau:&nbsp;mov ax,@data&nbsp;mov ds,ax&nbsp;call l\n&nbsp;call kq1&nbsp;call m\k&nbsp;call kq2&nbsp;call l\v&nbsp;call nhap&nbsp;call xuat1&nbsp;call xuat2&nbsp;call ae &nbsp;call hoten1&nbsp;call nhap&nbsp;call xuat1&nbsp;call xuat2&nbsp;call inho&nbsp;call inten&nbsp;call az&nbsp;call h\t&nbsp;call thoat&nbsp;l\n proc&nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; lea dx,nhapkt&nbsp; &nbsp; int 21h&nbsp; &nbsp; mov cx,3&nbsp; &nbsp; lap:&nbsp; &nbsp; mov ah,01h&nbsp; &nbsp; int 21h&nbsp; &nbsp; cmp al,&#039;n&#039;&nbsp; &nbsp; je n&nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; lea dx,nhlai&nbsp; &nbsp; int 21h&nbsp; &nbsp; loop lap&nbsp; &nbsp; jmp chiabuon&nbsp; &nbsp; jmp hengaplai&nbsp; &nbsp; l\n endp&nbsp; &nbsp; kq1 proc&nbsp; &nbsp; n:mov ah,09h&nbsp; &nbsp; lea dx,nhdung&nbsp; &nbsp; int 21h&nbsp; &nbsp; jmp m\k&nbsp; &nbsp; chiabuon:mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; lea dx,sai&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp; hengaplai:mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; lea dx,het&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; int 21h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; jmp thoat&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; kq1 endp&nbsp; &nbsp; m\k proc&nbsp; &nbsp;&nbsp; mov dl,&#039;l&#039;&nbsp; &nbsp;&nbsp; mov mk1[0],dl&nbsp; &nbsp;&nbsp; mov dl,&#039;a&#039;&nbsp; &nbsp;&nbsp; mov mk1[1],dl&nbsp; &nbsp;&nbsp; mov dl,&#039;m&#039;&nbsp; &nbsp;&nbsp; mov mk1[2],dl&nbsp; &nbsp;&nbsp; mov dl,&#039;n&#039;&nbsp; &nbsp;&nbsp; mov mk1[3],dl &nbsp; &nbsp;&nbsp; mov dl,&#039;h&#039;&nbsp; &nbsp;&nbsp; mov mk1[4],dl&nbsp; &nbsp;&nbsp; mov dl,&#039;a&#039;&nbsp; &nbsp;&nbsp; mov mk1[5],dl&nbsp; &nbsp;&nbsp; mov dl,&#039;t&#039;&nbsp; &nbsp;&nbsp; mov mk1[6],dl&nbsp; &nbsp;&nbsp; nhaplaimk:mov ah,09h&nbsp; &nbsp;&nbsp; lea dx,nhapmk&nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp;&nbsp; mov cx,7&nbsp; &nbsp;&nbsp; mov si,0&nbsp; &nbsp; lapnhap: mov ah,01h&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; mov mk2[si],al&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; inc si&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; loop lapnhap&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; mov cx,7&nbsp; &nbsp; &nbsp; &nbsp;&nbsp; mov si,0&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; lapsosanh:mov dl,mk2[si]&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; mov al,mk1[si]&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; cmp al,dl&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; jne kq2&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; inc si&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; loop lapsosanh&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; lea dx,nhdung&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; int 21h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; jmp l\v&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; m\k endp&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; kq2 proc&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; lea dx,sai&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; jmp nhaplaimk&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; kq2 endp&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; l\v proc&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; lea dx,cviec&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; int 21h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; lea dx,lviec&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; int 21h ae procmov ax,@datamov ds,axlea dx,s1mov ah,09Hint 21hae endp&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; az proc&nbsp; &nbsp; mov ah,09h&nbsp; &nbsp; lea dx,hien&nbsp; &nbsp; int 21h&nbsp; &nbsp; mov cx,26&nbsp; &nbsp; mov ah,02h&nbsp; &nbsp; mov dl,&#039;A&#039;lap1:int 21hinc dlloop lap1az endp h\t procmov ah,09lea dx, tint 21hmov ah,0ahlea dx, sint 21hlea si,s+2buoc3:mov al,[si]cmp al,0dhje buoc10cmp al,&#039;a&#039;jb buoc7cmp al,&#039;z&#039;ja buoc7sub al,32mov [si],aljmp buoc9buoc7:cmp al,&#039;A&#039;jb buoc9cmp al,&#039;Z&#039;ja buoc9add al,32mov [si],aljmp buoc9buoc9:inc sijmp buoc3buoc10:mov al,&#039;$&#039;mov [si],almov ah,09hlea dx,hoathuongint 21hmov ah,02mov dl,0dhint 21hmov ah,02mov dl,0ahint 21hmov ah,09lea dx, s+2int 21hh\t endp hoten1 proc&nbsp; &nbsp; mov ah,09h&nbsp; lea dx,moinhap&nbsp; int 21h&nbsp; mov cx,50&nbsp; mov si,0&nbsp; lapnhap1:&nbsp; mov ah,01h&nbsp; int 21h&nbsp; mov hovaten[si],al&nbsp; inc si&nbsp; cmp al,13&nbsp; loopne lapnhap1&nbsp; jmp intenhoten1 endpinten proc&nbsp; mov cx,50&nbsp; mov di,0&nbsp;lapdem:&nbsp; mov al,hovaten[si]&nbsp; mov ten[di],al&nbsp;&nbsp; inc di&nbsp;&nbsp; dec si&nbsp; cmp al,32&nbsp;loopne lapdem&nbsp; mov ah,09h&nbsp; lea dx,hienthi1&nbsp; int 21h&nbsp; mov cx,50&nbsp; dec di&nbsp; hienthiten:&nbsp;&nbsp; mov dl,ten[di]&nbsp;&nbsp; mov ah,02h&nbsp;&nbsp; int 21h&nbsp;&nbsp; dec di&nbsp; loopne hienthiten&nbsp;inten endpinho proc&nbsp;&nbsp; &nbsp; mov ah,09h&nbsp; lea dx,hienthi2&nbsp; int 21h&nbsp; inc si&nbsp; mov cx,si&nbsp; mov si,0&nbsp; hienthiho:&nbsp;&nbsp; mov dl,hovaten[si]&nbsp;&nbsp; mov ah,02h&nbsp;&nbsp; int 21h&nbsp;&nbsp; inc si&nbsp;&nbsp; loop hienthiho&nbsp;&nbsp; inho endpnhap procmov ah,09hlea dx,ms1int 21h mov cx,120mov si,0lapnhap2:mov ah,01hint 21h mov hoten[si],alinc sicmp al,13loopne lapnhap2&nbsp; nhap endpxuat1 proc&nbsp;mov ah,09h&nbsp;lea dx,ms2&nbsp;int 21h&nbsp;lea dx,hoten&nbsp;int 21h&nbsp; xuat1 endp&nbsp;xuat2 proc&nbsp; &nbsp; &nbsp; mov cx,si&nbsp; &nbsp; &nbsp; mov di,0&nbsp; &nbsp;&nbsp; copy:&nbsp; &nbsp; &nbsp; mov al,hoten[di]&nbsp; &nbsp; &nbsp; mov hotenchuan[di],al&nbsp; &nbsp; &nbsp; inc di&nbsp; &nbsp; loop copy&nbsp; &nbsp; &nbsp; mov al,hotenchuan[0]&nbsp; &nbsp; &nbsp; sub al,32&nbsp; &nbsp; &nbsp; mov hotenchuan[0],al&nbsp; &nbsp; &nbsp; dec si&nbsp; &nbsp; &nbsp; mov cx,si&nbsp; &nbsp; &nbsp; mov si,1&nbsp; &nbsp; &nbsp; mov di,2&nbsp; &nbsp; lapdoichuan:&nbsp; &nbsp; &nbsp;&nbsp; mov al,hotenchuan[si]&nbsp; &nbsp; &nbsp;&nbsp; cmp al,32&nbsp; &nbsp; &nbsp;&nbsp; je doi&nbsp; &nbsp; &nbsp;&nbsp; inc si &nbsp; &nbsp; &nbsp;&nbsp; inc di&nbsp; &nbsp; loop lapdoichuan&nbsp; &nbsp; doi:&nbsp; &nbsp;&nbsp; mov dl,hotenchuan[di]&nbsp; &nbsp;&nbsp; sub dl,32&nbsp; &nbsp;&nbsp; mov hotenchuan[di],dl&nbsp; &nbsp;&nbsp; mov ah,09h&nbsp; &nbsp;&nbsp; lea dx,ms3&nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp;&nbsp; lea dx,hotenchuan&nbsp; &nbsp;&nbsp; int 21h&nbsp; &nbsp;&nbsp; xuat2 endpthoat proc&nbsp;mov ah,4ch&nbsp;int 21hthoat endp&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; end batdau</blockquote>

[QUOTE="lamnhat, post: 93787, member: 84866"] .model small .data moinhap db 10,13,"Moi nhap 1 ho ten:$" hienthi db 10,13,"$" hienthi1 db 10,13,"Ten cua ban la: $" hienthi2 db 10,13,"Ho cua ban la: $" hovaten db 50 dup("$") ten db 8 dup("$") s1 db 13,10,'********************************',13,10 s2 db '*LAM QUEN NHA MINH LA PHAM LAM NHAT' ,13,10 s4 db '************************************$' t db 10,13,'nhap vao mot chuoi:chu y(chu hoa thi doi thanh chu thuong,chu thuong thi doi thanh chu hoa):$' hoathuong db 10,13,'chuoi ban nhap da duoc doi:$' s db 99,?,100 dup (?) nhapkt db 10,13,'cho biet kt dau tien cua ten nguoi ban can:$' sai db 10,13,'ban nhap sai roi!$' nhlai db 10,13,'moi ban nhap lai:$' hien db 10,13,'ban chu cai:$' het db 10,13,'ban nhap qua so lan quy dinh!hen ban lan sau!$' nhdung db 10,13,'chuc mung ban!$' cviec db 10,13,'Ban da vao duoc nhat ki cua lamnhat!$' lviec db 10,13,'bat dau:$' nhapmk db 10,13,'moi ban nhap mat khau:$' ms1 db 10,13,'moi nhap chuoi kt:$' ms2 db 10,13,'chuoi da nhap la:$' ms3 db 10,13,'chuoi doi thanh chu hoa:$' ms4 db 10,13,'chuoi doi thanh chu thuong:$' hoten db 123 dup('$') hotenchuan db 123 dup ('$') ln db 5 dup('$') mk1 db 15 dup('$') mk2 db 15 dup('$') .code batdau: mov ax,@data mov ds,ax call l\n call kq1 call m\k call kq2 call l\v call nhap call xuat1 call xuat2 call ae call hoten1 call nhap call xuat1 call xuat2 call inho call inten call az call h\t call thoat l\n proc mov ah,09h lea dx,nhapkt int 21h mov cx,3 lap: mov ah,01h int 21h cmp al,'n' je n mov ah,09h lea dx,nhlai int 21h loop lap jmp chiabuon jmp hengaplai l\n endp kq1 proc n:mov ah,09h lea dx,nhdung int 21h jmp m\k chiabuon:mov ah,09h lea dx,sai int 21h hengaplai:mov ah,09h lea dx,het int 21h jmp thoat kq1 endp m\k proc mov dl,'l' mov mk1[0],dl mov dl,'a' mov mk1[1],dl mov dl,'m' mov mk1[2],dl mov dl,'n' mov mk1[3],dl mov dl,'h' mov mk1[4],dl mov dl,'a' mov mk1[5],dl mov dl,'t' mov mk1[6],dl nhaplaimk:mov ah,09h lea dx,nhapmk int 21h mov cx,7 mov si,0 lapnhap: mov ah,01h int 21h mov mk2[si],al inc si loop lapnhap mov cx,7 mov si,0 lapsosanh:mov dl,mk2[si] mov al,mk1[si] cmp al,dl jne kq2 inc si loop lapsosanh mov ah,09h lea dx,nhdung int 21h jmp l\v m\k endp kq2 proc mov ah,09h lea dx,sai int 21h jmp nhaplaimk kq2 endp l\v proc mov ah,09h lea dx,cviec int 21h mov ah,09h lea dx,lviec int 21h ae proc mov ax,@data mov ds,ax lea dx,s1 mov ah,09H int 21h ae endp az proc mov ah,09h lea dx,hien int 21h mov cx,26 mov ah,02h mov dl,'A' lap1: int 21h inc dl loop lap1 az endp h\t proc mov ah,09 lea dx, t int 21h mov ah,0ah lea dx, s int 21h lea si,s+2 buoc3: mov al,[si] cmp al,0dh je buoc10 cmp al,'a' jb buoc7 cmp al,'z' ja buoc7 sub al,32 mov [si],al jmp buoc9 buoc7: cmp al,'A' jb buoc9 cmp al,'Z' ja buoc9 add al,32 mov [si],al jmp buoc9 buoc9: inc si jmp buoc3 buoc10: mov al,'$' mov [si],al mov ah,09h lea dx,hoathuong int 21h mov ah,02 mov dl,0dh int 21h mov ah,02 mov dl,0ah int 21h mov ah,09 lea dx, s+2 int 21h h\t endp hoten1 proc mov ah,09h lea dx,moinhap int 21h mov cx,50 mov si,0 lapnhap1: mov ah,01h int 21h mov hovaten[si],al inc si cmp al,13 loopne lapnhap1 jmp inten hoten1 endp inten proc mov cx,50 mov di,0 lapdem: mov al,hovaten[si] mov ten[di],al inc di dec si cmp al,32 loopne lapdem mov ah,09h lea dx,hienthi1 int 21h mov cx,50 dec di hienthiten: mov dl,ten[di] mov ah,02h int 21h dec di loopne hienthiten inten endp inho proc mov ah,09h lea dx,hienthi2 int 21h inc si mov cx,si mov si,0 hienthiho: mov dl,hovaten[si] mov ah,02h int 21h inc si loop hienthiho inho endp nhap proc mov ah,09h lea dx,ms1 int 21h mov cx,120 mov si,0 lapnhap2:mov ah,01h int 21h mov hoten[si],al inc si cmp al,13 loopne lapnhap2 nhap endp xuat1 proc mov ah,09h lea dx,ms2 int 21h lea dx,hoten int 21h xuat1 endp xuat2 proc mov cx,si mov di,0 copy: mov al,hoten[di] mov hotenchuan[di],al inc di loop copy mov al,hotenchuan[0] sub al,32 mov hotenchuan[0],al dec si mov cx,si mov si,1 mov di,2 lapdoichuan: mov al,hotenchuan[si] cmp al,32 je doi inc si inc di loop lapdoichuan doi: mov dl,hotenchuan[di] sub dl,32 mov hotenchuan[di],dl mov ah,09h lea dx,ms3 int 21h lea dx,hotenchuan int 21h xuat2 endp thoat proc mov ah,4ch int 21h thoat endp end batdau [/QUOTE]

Tên

Mã xác nhận