有一个程序请大家诊断一下!,谢谢

jxw1987628 jxw1987628 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
这是一个比较键盘输入的个个句子,前面一个是关键词,后面一个是句子.找到关键词就显示"Match"否则"NO match."
datarea segment
key db 10
string1 db 'Enter key word:',13,10,'$'
mess1 db 'Match.',13,10,'$'
mess2 db 'No match.',13,10,'$'
string2 db 'Enter Sentence:',13,10,'$'
;
str db 50
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 dx,string1
mov ah,09
int 21h

lea dx,key
mov ah,0ah
int 21h

lea dx,string2
mov ah,09
int 21h

lea dx, es:str
mov ah,0ah
int 21h
lea si,key
lea di,str
mov cx,17
cld
rep cmpsb
je matchmess
lea dx,mess2
mov ah,09
int 21h
ret
matchmess:
lea dx,mess1
mov ah,09
int 21h
ret
main endp
prognam ends
end start





...全文
评论 17
收藏 已收藏
分享
返回顶部
jxw1987628
汇编语言 21,500 成员 41,619 内容