fsk.asm

这里面有很多dsp应用程序源码

*********************************************************
* FSK调制程序 		      				*
* F0为64个点，一个周期波形；F1为64个点，两个周期波形	*
*********************************************************
	.title	"FSK.asm"
	.mmregs
	.copy 	"FSKCOEFF.inc"
	.def 	start
indata	.usect	"buffer",1
outdata	.usect	"buffer",32
STACK	.usect	"STACK",10
********************************************************
	.text
start:	LD	#indata,DP
	STM	#indata,AR1
	
********************************************************
input:	nop
	STM	#outdata,AR4
	LD	*AR1,A		;读入数据
	BC	A1,AGT		;if A>0,then goto A1
	STM	#F0,AR3		;A=0
	B	OUT
A1:	STM	#F1,AR3		;A=1
	B	OUT		
********************************************************
OUT:	RPT	#63
	MVDD	*AR3+,*AR4+
	nop
	B	input
	.end
********************************************************