fft.asm

用汇编语言实现8位卷积算法

	.title "FFT.asm"
	.mmregs
STACK   .usect "STACK",20h
	.bss x,8
	.bss y,8
	.bss z,8
	.def _c_int00

	.data
table:  .word 1,1,1,1,1,1,1,1
	    .word 1,1,1,1,1,1,1,1

	.text
_c_int00: STM #0,SWWSR
       	  STM #STACK+20h,sp
	      STM #x,ar1
	      RPT #15
	      MVPD table,*ar1+
	      CALL sum
end:    B  end
sum:    STM #7,ar2
	    STM #z,ar3
loop:   STM #x,ar4
	    STM #y+7,ar5
	    LD #0,A
	    RPT ar2
	    MAC *ar4+,*ar5-,A
	    STL A,*ar3+
	    BANZ loop,*ar2-
	    RET
	    .end