.title "fir_test.program"
           .mmregs
           .global _c_int00
           
           
           .include "fir_filter.inc"
           .include "fir_coff.inc"
 
stack_size    .set 200h
STACK         .usect "stack", stack_size
SYSTEM_STACK     .set STACK+stack_size 
                 .sect"vectors"
reset:
            BD _c_int00
            STM #SYSTEM_STACK,sp
            .space 31*4*16
               
               
               
            .text
              
_c_int00:      
               CALL fir_init;FIR buffer fills zero
               CALL fir_task;FIR filter


main_start:
               B main_start
               .end