DA0832  EQU  9C00H

CODE SEGMENT
	ASSUME CS:CODE

START:  CALL BREAK
        MOV AL,00H
A1:     MOV DX,DA0832
        OUT DX,AL
        CALL DALLY
	INC AL
	CMP AL,7FH
        JNC START 
        JMP A1

DALLY:	PUSH CX
	PUSH AX
        MOV CX,0010H
A3:     MOV AX,1000H
A4:	DEC AX
	JNZ A4
	LOOP A3
	POP AX
	POP CX
	RET

BREAK  PROC  NEAR             
        MOV AH,06H
        MOV DL,0FFH
        INT 21H
        JE  RETURN
        MOV AX,4C00H
        INT 21H                
RETURN:RET
BREAK  ENDP

CODE ENDS
     END START