UC知道请高手帮忙改汇编程序 查找指定的数据或字符
来源：百度知道 编辑：UC知道 时间：2024/06/08 11:46:44
DATAS SEGMENT
STR DB 0,1,2,3,4,5,6,7,8,9
N = $-STR
ADDR1 DB 'Found$'
ADDR2 DB 'Not Found$'
ARRAY DB 10 DUP(?)
INPUT DB 13,10,'Input the number you want to find:',13,10,'$'
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START: MOV AX,DATAS
MOV DS,AX
MOV ES,AX
LEA DI,ARRAY
MOV CX,N
LEA DX,INPUT
MOV AH,09H
INT 21H
MOV AH,01H
INT 21H
Begin: LEA SI,STR
MOV CX,N
CMP AX,[SI]
JZ Next
LEA DX,ADDR2
MOV AH,09H
INT 21H
JMP LAST
Next: LEA DX,ADDR1
MOV AH,09H
INT 21H
LAST: MOV AH,4CH
INT
STR DB 0,1,2,3,4,5,6,7,8,9
N = $-STR
ADDR1 DB 'Found$'
ADDR2 DB 'Not Found$'
ARRAY DB 10 DUP(?)
INPUT DB 13,10,'Input the number you want to find:',13,10,'$'
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START: MOV AX,DATAS
MOV DS,AX
MOV ES,AX
LEA DI,ARRAY
MOV CX,N
LEA DX,INPUT
MOV AH,09H
INT 21H
MOV AH,01H
INT 21H
Begin: LEA SI,STR
MOV CX,N
CMP AX,[SI]
JZ Next
LEA DX,ADDR2
MOV AH,09H
INT 21H
JMP LAST
Next: LEA DX,ADDR1
MOV AH,09H
INT 21H
LAST: MOV AH,4CH
INT
DATAS SEGMENT ;验证无误.
STR DB '0123456789'
N = $-STR
ADDR1 DB 'Found$'
ADDR2 DB 'Not Found$'
;ARRAY DB 10 DUP(?)
INPUT DB 13,10,'Input the number you want to find:',13,10,'$'
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START: MOV AX,DATAS
MOV DS,AX
LEA DX,INPUT
MOV AH,09H
INT 21H
MOV AH,01H
INT 21H
LEA SI,STR
MOV CX,N
next: cmp al,[si]
jz ok
inc si
loop next
LEA DX,ADDR2
JMP L1
ok: LEA DX,ADDR1
L1: MOV AH,09H
INT 21H
mov ah,0
int 16h
quit: MOV AH,4CH
INT 21H
CODES ENDS
END START
试试看：
STR DB '