k4.asm

60秒ISD2560语音芯片的汇编源程序

;-------------------------------------------------------------
;	By qdly
;	2006-1-12
;-------------------------------------------------------------	
 $INCLUDE   (t89c51cc01.INC)

	ORG	0000H
	AJMP	MAIN
	ORG	0003H
	AJMP	INT00
	ORG	0100H
MAIN:		
	MOV 	IEN0,#81H
	SETB	IT0
	;SETB	EA			
	MOV	R7,#00H

	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	LCALL	DELAY1S
	;MOV	P0,31H
	;MOV	P1,32H
	MOV	P2,41H
INT00:	
	PUSH	ACC
	PUSH	PSW
	MOV     C,P1.7
	MOV	B.0,C
	INC 	R7
	CJNE	R7,#1H,NE1
	MOV 	R1,#40H
EVENODD:
	MOV	C,B.0
	JNC	DY0
	MOV	@R1,#0FFH
	AJMP 	RET0
DY0:	MOV 	@R1,#0H
	AJMP 	RET0
NE1:	CJNE	R7,#2H,NE2
	INC	R1
	SJMP	NE19
NE2:	CJNE	R7,#0AH,NE0A
	INC	R1
	SJMP	NE19
NE0A:	CJNE	R7,#12H,NE12
	INC	R1
	SJMP	NE19
NE12:	CJNE	R7,#1AH,NE19
	MOV	R7,#00H
	INC 	R1
	SJMP	EVENODD
NE19:	
	MOV	A,@R1
	RL	A
	MOV 	C,B.0
	MOV	ACC.0,C
	MOV	@R1,A
RET0:	POP	PSW
	POP	ACC
	RETI
DELAY1S: 
	MOV     R2,#06H
DELAY11:MOV     R3,#0FFH	      
DELAY41:MOV     R4,#0FFH	      
        DJNZ    R4,$
        DJNZ    R3,DELAY41
        DJNZ    R2,DELAY11
        RET
	END