c5_4_5.asm

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

           .def usb_transfer
           .ref fft
           .ref rpt, ad_start
           .ref reg
       
ce0ctl       	.equ   01800008h 		
gblctl       	.equ   01800000h		
pcr0         	.equ   018c0024h		
ep2_addr     	.equ   80004000h		
ep6_addr     	.equ   80006000h		
pcr1         	.equ   01900024h		

           .text
usb_transfer:

          mvkl   pcr0,a0			
          mvkh   pcr0,a0
          mvkl   3828h,a1   			
          stw    a1,*a0				
          nop    3
          
          mvkl   gblctl,b0			
          mvkh   gblctl,b0
          mvkl   3380h,b1
          mvkh   3380h,b1
          stw    b1,*b0
          nop    4
          
          mvkl   ce0ctl,b0			
          mvkh   ce0ctl,b0
          mvkl   0ff2fh,b1
          mvklh  0ffffh,b1
          stw    b1,*b0
          nop    3  
          
          mvkl   reg,a4
          mvkh   reg,a4
          ldw    *a4,a5
          nop    4 
 
          mvkl   ep2_addr,b3       	
          mvkh   ep2_addr,b3	 
          mvkl   ep6_addr,b4
          mvkh   ep6_addr,b4
          mvkl   fft,a4
          mvkh   fft,a4
          mvkl   1f40h,b6
          mvkh   1f40h,b6
          mvkl   1h,b5
          mvkh   1h,b5
          mvkl   0fdfdh,a7    		
          mvkh   0fdfdh,a7
          mvkl   3e7fh,b7     		
          mvkh   3e7fh,b7
          add    a4,b7,b7
          xor    a2,a2,a2
           
command1:
          ldw    *b3,a2            	
          nop    4
          shl    a2,16,a2
          shru   a2,16,a2
          cmpeq 0ah,a2,a1
          cmpeq 05h,a2,b2
     [b2]  b      ad_start
          nop    5
    [!a1]  b      command1
          nop    5
                    
            mvkl 	pcr1,a10
            mvkh 	pcr1,a10
            mvkl 	3a0ah,b10 			
            stw  	b10,*a10
            nop  	4
            nop  	8
            nop  	8
            
            mvkl 	3a2ah,b10			
            stw  	b10,*a10
            nop  	4
            nop  	8
            nop  	8
            
            mvkl 	3a0ah,b10			
            stw  	b10,*a10
            nop  	4
            nop  	8
            nop  	8
            
            mvkl 	3a2ah,b10			
            stw  	b10,*a10
            nop  	4
            nop  	8
            nop  	8
            
            mvkl 	3a0ah,b10			
            stw  	b10,*a10
            nop  	4
          
usbwrite_start:          
          zero   	a2
          mvkl   	100h,b2
          mvkh   	100h,b2    		
    
          cmpeq  	b5,1,a1
    [a1]   stw    	b5,*b4   		
          nop    	4
          
usbwrite:          
          cmpgtu 	a4,b7,a1
     [a1]  mv     	a7,a8  			
    [!a1]  ldh    	*a4++,a8		
          nop    	4
           
          stw    	a8,*b4
          nop    	4
          
          sub    	b2,1,b2			
     [b2] b      	usbwrite		
          nop    	5
          
          add    	b5,1,b5   		
          b      	command1
          nop    	5
         .end