filter.asm

C5000系列DSP上实现自适应滤波器的源码

             .mmregs
             .def jump
             .def start
           
k_sample_num .set 256
out_data     .usect "out_vars",k_sample_num
in_data      .usect "in_vars",1
d_cr0_send   .usect "cr_send",1
d_cr1_send   .usect "cr_send",1
d_temp       .usect "temp",1
k_cr0_send   .set 0080h
k_cr1_send   .set 0100h

k_iptr       .set 000111000b<<07
k_temp       .set 1111111b
d_pmst       .usect "pmst",1

             .sect "prog"    
start:
             ldm   pmst,a
             and   #k_temp,a
             or    #k_iptr,a
             stl   a,ar2
             mvdm  ar2,pmst
             
             stm   #0001h,imr
             nop
             nop
             stm   #0002h,ifr
             nop
             rsbx  intm  
             nop
             
             stm    #d_temp,ar2
             stm    #d_cr0_send,ar1
             st     #k_cr0_send,*ar1+
             st     #k_cr1_send,*ar1 
             stm    #d_cr0_send,ar1
             ld     #k_sample_num,a
             stm    #out_data,ar5
             portr  0fffeh,*ar2
             portw  *ar1+,07fffh
             nop
             nop
             nop                   
             nop
             nop
             portw  *ar1,07fffh 
             nop
             nop
             nop
             nop
             portr 0ffffh,*ar2
             nop
             nop
wait:        nop
             nop
             nop
             b    wait
 
             
jump:        rsbx  xf
             nop
             nop
             nop
             portr 07fffh,*ar5
             nop
             nop
             nop
             ssbx  xf
             nop
             nop
             nop
             portr 0fffeh,*ar2
             nop
             nop
             nop
             portw *ar5,0bfffh
             nop            
             nop
             nop
             rete