at45fra.asm

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

$INCLUDE   (t89c51cc01.INC)

AT_SCK		EQU	P0.5
AT_SO		EQU	P3.7
AT_SI		EQU	P0.6
AT_CS		EQU	P3.3
		ORG	0030H
		AJMP	MAIN
		ORG	0100H
MAIN:	
		MOV	P0,#0FFH
		MOV	P3,#0FFH
		MOV	R0,#00H
		MOV	R1,#00H
		MOV	R3,#96H
		LCALL	at_buf1wrt

		MOV	R3,#00H		;
		MOV	A,#00H		;

		LCALL	at_buf1rd
at_rdsta:
		CLR	AT_CS
		MOV	A,#57H
		LCALL	s_dat
		LCALL	r_dat
		SETB	AT_CS
		RET

at_buf1wrt:
		CLR	AT_CS
		CLR	AT_SCK
		MOV	A,#84H
		LCALL	s_dat

		MOV	A,#00H
		LCALL	s_dat

		MOV	A,R1
		LCALL	s_dat

		MOV	A,R0
		LCALL	s_dat

		MOV	A,R3
		LCALL	s_dat

		SETB	AT_CS
		SETB	AT_SCK
		RET

at_buf1rd:
		CLR	AT_CS
		CLR	AT_SCK
		MOV	A,#54H
		LCALL	s_dat

		MOV	A,#00H
		LCALL	s_dat

		MOV	A,R1
		LCALL	s_dat

		MOV	A,R0
		LCALL	s_dat

		MOV	A,#00H
		LCALL	s_dat
				
		LCALL	r_dat
		MOV	P2,A
		SETB	AT_CS
		SETB	AT_SCK
		RET

s_dat:	
		MOV	R7,#08H
s_loop:		
		CLR	AT_SCK
		RLC	A
		MOV	AT_SI,C
		SETB	AT_SCK
		DJNZ	R7,s_loop
		RET

r_dat:	
		MOV	R7,#08H
r_loop:
		CLR	AT_SCK
		NOP
		SETB	AT_SCK
		MOV	C,AT_SO
		RLC	A
		SETB	AT_SCK
		DJNZ	R7,r_loop
		RET
		END