汇编作业（2006.5.28）

DATA SEGMENT
 STR1 DB '0120120001112223330123'
 NUM1 EQU $-STR1
 STR2 DB '012'
 NUM2 EQU $-STR2
 COUNT DB 0
DATA ENDS

STACK SEGMENT PARA STACK
 DW 20H DUP(0)
STACK ENDS

CODE SEGMENT
 ASSUME CS:CODE, DS:DATA, SS:STACK
BEGIN:  MOV AX, DATA
 MOV DS, AX
 MOV ES, AX

 MOV SI, OFFSET STR1
 MOV DI, OFFSET STR2
 MOV CX, NUM2
 MOV BX, NUM1
 MOV DX, 0
 CLD

LOP:  PUSH SI
 PUSH DI
 PUSH CX
 REPZ CMPSB
 JNZ NEXT
 INC DL

NEXT: POP CX
 POP DI
 POP SI
 INC SI 
 DEC BX
 CMP BX, 0
 JNE LOP

 MOV COUNT, DL
 MOV AH, 4CH
 INT 21H
CODE ENDS
END BEGIN