汇编-字符串判回文

data segment
  str db 'abcdefgtegfedcba'
  len equ $-str
  msg1 db 'Yes$'
  msg2 db 'No$'
data ends

code segment
  assume cs:code,ds:data
start:
  mov ax,data
  mov ds,ax
  ;---------------
  mov bx,offset str
  mov di,len;尾指针
  dec di
  mov si,0;头指针
compare:
  cmp si,di
  jge stop1
  xor ax,ax
  mov al,[bx+si]
  cmp al,[bx+di]
  jne stop2
  inc si
  dec di
  jmp compare
stop1:
  lea dx,msg1
  mov ah,09h
  int 21h
  jmp over
stop2:
  lea dx,msg2
  mov ah,09h
  int 21h
  ;---------------
 over:
  mov ah,4ch
  int 21h
code ends
  end start