a6-2.asm

汇编语言的设计

STACK SEGMENT STACK
	DW 64 DUP(?)
STACK ENDS

CODE SEGMENT
	ASSUME CS:CODE

START:	MOV AX,0000H
	MOV DS,AX
	MOV ES,AX
	MOV SI,3000H
	MOV CX,001EH
	MOV DI,3100H
A1:	CALL branch
	MOV AL,1EH
	SUB AL,CL
	INC AL
	MOV BX,DX
	MOV [BX+DI],AL
	LOOP A1
	INT 03H

branch: PUSH CX
	MOV CX,001EH
	MOV AL,00H
	MOV BX,3000H
	MOV SI,BX
A2:	CMP AL,[SI]
	JAE A3
	MOV AL,[SI]
	MOV DX,SI
	SUB DX,BX
A3:	INC SI
	LOOP A2
	ADD BX,DX
	MOV AL,00H
	MOV [BX],AL
	POP CX
	RET	
CODE ENDS
     END START