DATA SEGMENT
S1 DB 'Please input string1: $'
S2 DB 'Please input string2: $'
S3 DB 'MATCH$'
S4 DB 'NO MATCH$'
S5 DB 10 DUP(?)
S6 DB 10 DUP(?)

DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA

START: MOV AX,DATA ;put data to DS
MOV DS,AX
MOV ES,AX

LEA DX,S1 ;show message1
MOV AH,09H
INT 21H

LEA DX,S5 ;input string1
MOV AH,0AH
INT 21H
CALL CLRF

LEA DX,S2 ;show message2
MOV AH,09H
INT 21H

LEA DX,S6 ;input string2
MOV AH,0AH
INT 21H

CALL CLRF
mov si,0
ok: mov al,s5[si]

lea di,s6
mov cx,10
cld
lp: scasb
jz match
dec cx
jcxz lp

cmp si,10
inc si
jb ok


LEA DX,S4 ;show no match
MOV AH,09H
INT 21H

JMP FINISH ;go to finish

MATCH: LEA DX,S3 ;show info of match
MOV AH,09H
INT 21H

FINISH: MOV AH,4CH ;return to Dos
INT 21H
CLRF PROC NEAR
MOV DL,0DH ;cr
MOV AH,02H
INT 21H
MOV DL,0AH ;next line
MOV AH,02H
INT 21H
ret
CLRF ENDP

CODE ENDS
END START

S5 DB 10 DUP(?)
S6 DB 10 DUP(?)
改成
S5 DB 10
DB ?
DB 10 DUP(?)
S6 DB 10
DB ?
DB 10 DUP(?)
这是为什么呢?要多开辟两个单元?还有你说的DX是这里的
LEA DX,S6
MOV AH,0AH
INT 21H
吗?这里是输入字符串S6,应该没错吧.呵呵太菜了不懂解释一下
谢谢

DATA SEGMENT
S1 DB 'Please input string1: $'
S2 DB 'Please input string2: $'
S3 DB 'MATCH$'
S4 DB 'NO MATCH$'
S5 DB 10
DB ?
DB 10 DUP(?)
S6 DB 10
DB ?
DB 10 DUP(?)

DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA

START: MOV AX,DATA ;put data to DS
MOV DS,AX
MOV ES,AX

LEA DX,S1 ;show message1
MOV AH,09H
INT 21H

LEA DX,S5 ;input string1
MOV AH,0AH
INT 21H
CALL CLRF

LEA DX,S2 ;show message2
MOV AH,09H
INT 21H

LEA DX,S6 ;input string2
MOV AH,0AH
INT 21H

CALL CLRF
mov si,2
ok: mov al,s5[si]

lea di,offset s6+2
mov cx,10
cld
lp: scasb
jz match
dec cx
jcxz lp

cmp si,10
inc si
jb ok


LEA DX,S4 ;show no match
MOV AH,09H
INT 21H

JMP FINISH ;go to finish

MATCH: LEA DX,S3 ;show info of match
MOV AH,09H
INT 21H

FINISH: MOV AH,4CH ;return to Dos
INT 21H
CLRF PROC NEAR
MOV DL,0DH ;cr
MOV AH,02H
INT 21H
MOV DL,0AH ;next line
MOV AH,02H
INT 21H
ret
CLRF ENDP

CODE ENDS
END START
红色的地方是我改过的,仍然是没定义ES,但加了两个单元就可以了.
这个程序是如果两字符串有一个相同就MATCH否者就NO MATCH.
这是什么原因?

我是在ASM FOR WINDOWS 里运行的,是可以的呀.因为我一开始多了两个字节,两个字节后
才是字符串开始.

DATA SEGMENT
S1 DB 'Please input string1: $'
S2 DB 'Please input string2: $'
S3 DB 'MATCH$'
S4 DB 'NO MATCH$'
S5 DB 10,0,10 DUP(0)
S6 DB 10,0,10 DUP(0)

DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA

START: MOV AX,DATA ;put data to DS
MOV DS,AX

LEA DX,S1 ;show message1
MOV AH,09H
INT 21H

LEA DX,S5 ;input string1
MOV AH,0AH
INT 21H
CALL CLRF

LEA DX,S2 ;show message2
MOV AH,09H
INT 21H

LEA DX,S6 ;input string2
MOV AH,0AH
INT 21H

CALL CLRF

MOV SI,2
OK: MOV DI,OFFSET S6+2
MOV AL,S5[SI]
MOV CL,S6[1]
MOV CH,0
CLD
LP: SCASB
JZ MATCH
DEC CX
JNZ LP

MOV CL,S5[1] ;characters of s5
CMP CX,SI ;the end of s5?
INC SI
JNB OK

LEA DX,S4 ;show no match
MOV AH,09H
INT 21H

JMP FINISH ;go to finish
CLRF PROC NEAR
MOV DL,0DH ;cr
MOV AH,02H
INT 21H
MOV DL,0AH ;next line
MOV AH,02H
INT 21H
RET
CLRF ENDP
MATCH: LEA DX,S3 ;show info of match
MOV AH,09H
INT 21H

FINISH: MOV AH,4CH ;return to Dos
INT 21H

CODE ENDS
END START
啊,总算可以了呀.现在要多谢谢爱以走远.
我要好好学习!