	page	132,66,2,2
	opt	nomd,nomex,loc,cre,nocex

	include	'sin16.mac'
	include 'ditfft.mac'

;
; Main program to call the FFT macro
;	Argument list
;
;	16 point complex DIT FFT
;	4 FFT passes
;	Data starts at address 0
;	Twiddle factor table starts at address 16
;
reset	equ	0
start	equ	$100
points	equ	16
passes	equ	4
data	equ	0
twiddle	equ	16

	sin16	twiddle

	opt	mex
	org	p:reset
	jmp	start

	org	p:start
	ditfft	points,passes,data,twiddle
	end
