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

	include	'sin64.mac'
	include 'ditfft.mac'


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

	sin64	twiddle

	opt	mex
	org	p:reset
	jmp	start

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