c3_8_1.asm

dsp入门与实践一书的源代码

           	.def  start
          	.def  McBSP0_REC
DRR0      	.equ   018C0000h   			
DXR0      	.equ   018C0004h
SPCR0     	.equ   018C0008h
RCR0      	.equ   018C000Ch
XCR0      	.equ   018C0010h   
SRGR0     	.equ   018C0014h   
MCR0      	.equ   018C0018h
RCER0     	.equ   018C001Ch
XCER0     	.equ   018C0020h
PCR0      	.equ   018C0024h

MUXH      	.equ   019C0000h   			
MUXL      	.equ   019C0004h
          	.text
start:      SUB    		A0,A0,A0
McBSP0_REC: MVC    		CSR,B0
          MVC    		A0,ISTP
          AND    		0x0FFFFFFFE,B0,B0
          MVKL   	0602H,A0             	
          MVKLH  	0000h,A0
          MVC    		B0,CSR          
          MVC    		A0,IER
Mcbsp0:
          MVKL   	SPCR0,A1         	
          MVKH   	SPCR0,A1
          MVKL   	0000H,A0
          MVKLH  	0000H,A0
          STW    		A0,*A1
          NOP    		3 
          MVKL   	PCR0,A1              	
          MVKH   	PCR0,A1
          MVKL   	0F00H,A0
          MVKLH  	0000H,A0
          STW    		A0,*A1
          NOP    		3
          MVKL   	RCR0,A1            
          MVKH   	RCR0,A1
          MVKL   	00A0H,A0
          MVKLH  	0004H,A0
          STW    		A0,*A1   
          NOP    		3 
          MVKL   	XCR0,A1            
          MVKH   	XCR0,A1
          MVKL   	00A0H,A0
          MVKLH  	0004H,A0
          STW    		A0,*A1   
          NOP    		3
          MVKL   	SRGR0,A1      	   
          MVKH   	SRGR0,A1
          MVKL   	8080H,A0 
          nop    		5
          nop    		5 
          MVKLH  	030A0H,A0
          STW    		A0,*A1
          NOP    		3 
          MVKL   	SPCR0,A1           
          MVKH   	SPCR0,A1
          MVKL   	0000H,A0
          MVKLH  	02C0H,A0
          STW    		A0,*A1   
          NOP    		3 
          MVKL   	SPCR0,A1           
          MVKH   	SPCR0,A1
          MVKL   	0001H,A0
          MVKLH  	02C1H,A0		
          STW    		A0,*A1		
          NOP    		3		
          NOP    		5
          MVKL   	MUXH,A1 
          MVKH   	MUXH,A1
          MVKL   	2D8DH,A0              
          MVKLH  	0820H,A0              
          STW    		A0,*A1 
          NOP    		3 
          NOP    		5 
          MVC    		IFR,B4        
          SUB    		A5,A5,A5
          MVKL   	07000H,B5
          MVKLH  	00000H,B5
          MVC    		CSR,B0        
          OR     		01H,B0,B0
          MVC    		B0,CSR
          NOP    		8
          NOP    		8
          NOP    		8
          MVKL   	0100H,B5              
          MVKLH  	000H,B5
          SUB    		A5,A5,A5      
          MVKL   	01000H,A0             
          MVKLH  	08000H,A0
          SUB    		A3,A3,A3
          MVKL   	0001H,B8
          MVKLH  	0000H,B8          
WAIT:          
          MVKL   	DXR0,A1              	
          MVKH   	DXR0,A1
          NOP    		3		
          ;LDW    	*A0++,A2            	
          NOP    		4
          ADD    		1H,A3,A3      
          NOP    		3 		
          STW    		A3,*A1        
          NOP    		4		
          SUB    		A5,A5,A5	
          NOP    		3
          ADD    		1H,A5,A5      
          NOP    		3
          
          MVKL   	0B00H,B0            	
          MVKLH  	00H,B0
          NOP    		3
DELAY:
          SUB    		B0,B8,B0
   [B0]   B      		DELAY		
          NOP    		5		
          SUB    		A5,B5,B0	
          NOP    		3             
  [B0]    B      		WAIT
          NOP    		5
          NOP
TRANS_END:
          NOP
          NOP
          B      		TRANS_END
          NOP    		5
          NOP    		5