sample.asm

汇编语言的实验报告

datarea segment
 string1 db 'Move the cursor backward.'
 string2 db 'Move the cursor backward.'
 mess1   db 'Match.'
 mess2   db 'No match!'
datarea ends
prognam segment
main proc far
     assume cs:prognam,ds:datarea,es:datarea
start:
      push ds
      sub ax,ax
      push ax
      mov ax,datarea
      mov ds,ax
      mov es,ax
      lea si,string1
      lea di,string2
      cld
      mov cx,25
      repz cmpsb
      je match
      lea dx,mess2
      jmp short disp
match:
      lea dx,mess1
disp:
      mov ah,08
      int 21h
      ret
main    endp
prognam ends
        end start