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(?)

不过你这程序有错

你没定义 es ASSUME CS:CODE,DS:DATA,es:data

还有一个错误就是 dx不等做偏移地址 把改为bx

还有就是感觉你的程序有错
你在lp 和ok那里
你自己改改哈 呵呵

[此贴子已经被作者于2007-5-10 13:02:34编辑过]

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.
这是什么原因?

你调试出来没错吗
神奇拉 呵呵 还是错的哈
我大慨看拉一哈 你把si改为2干吗 你定义的是字节嘛

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