20/08/2013 เปรียบเทียบ สตริง

stseg segment para stack db 64 dup('A'); sttop label word stseg ends dtseg segment str1 db 'Hello,World',0dh,0ah,'$' str2 db 'Hello,World',0dh,0ah,'$' mess1 db 'Str1 is match Str2',0dh,0ah,'$' mess2 db 'Str1 does not match Str2',0dh,0ah,'$' dtseg ends cdseg segment main proc far assume cs:cdseg,es:dtseg,ds:dtseg,ss:stseg mov ax,dtseg mov ds,ax mov es,ax mov ax,stseg mov ss,ax lea sp,sttop ;------------------------------------------------------------------- lea si,str1 lea di,str2 cld mov cx,14 repe cmpsb je match nomatch: lea dx,mess2 mov ah,9 int 21h jmp done match: lea dx,mess1 mov ah,9 int 21h jmp done done: ;------------------------------------------------------------------- mov ah,4ch int 21h main endp cdseg ends end main