aab.asm

本程序用汇编16位语言实现字符串匹配的问题。很好的解决了这一类似的问题。

DATA	SEGMENT	;输入的是十进制数
	A	DB	1,2,3,4,5,6,7,8,9,10,11,12,13,14,15
	B	DB	11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,4
	C	DB	15 DUP(?)
		DB	'$'
DATA	ENDS
CODE	SEGMENT
MIAN	PROC	FAR
	ASSUME	CS:CODE,DS:DATA
START:	PUSH	AX
	PUSH	DS
	PUSH	SI
	PUSH	DI
	PUSH	CX
	PUSH	DX
	PUSH	BX
	MOV	AX,DATA
	MOV	DS,AX
	XOR	SI,SI
	XOR	BX,BX
	MOV	CL,0FH
L1:	MOV	CH,14H
	XOR	DI,DI
	MOV	DL,[SI]
	INC	SI
L2:	MOV	DH,[DI+15]
	INC	DI
	CMP	DL,DH
	JNE	L3
	
	
	MOV	C[BX],DL
	INC	BX
L3:	DEC	CH
	JNZ	L2

	DEC	CL
	JNZ	L1
	;输出结果
	;MOV	BX,OFFSET C
	;MOV	DS,BX
	;MOV	DX,0
	;MOV	AH,09
	;INT	21H

	RET
MIAN	ENDP
CODE	ENDS
	END	START