deng60.asm

来自「包括显示彩条、偶数求和、小数、加法、字母、显示字符等9个小程序,压缩包自带运行工」· 汇编 代码 · 共 31 行

data  segment
buf   db 80,90,70,50,61,20,100
n     equ $-buf
str1  db 'find$'
str2  db 'nofind$'
data  ends
code  segment
   assume cs:code,ds:data
begin:mov ax,data
      mov ds,ax
lea   di,buf
mov   cx,n
next: mov al,[di]
      cmp al,60
      je  find
      inc di
      dec cx
      jne next
      mov ah,9
      lea dx,str2
      int 21h
      jmp exit
exit: mov ah,4ch
      int 21h
find: mov ah,9
      lea dx,str1
      int 21h
      jmp exit
code  ends
  end begin