maina.s54

TI公司DSP/tms320c55x/tms320c54x系列的声学回声消除代码

*-------------------------------------------------------------------------*
*                                                                         *
*   THIS IS AN UNPUBLISHED WORK CONTAINING CONFIDENTIAL AND PROPRIETARY   *
*   INFORMATION.  IF PUBLICATION OCCURS, THE FOLLOWING NOTICE APPLIES:    *
*      "COPYRIGHT 2003 MIKET DSP SOLUTIONS, ALL RIGHTS RESERVED"          *
*                                                                         *
*-------------------------------------------------------------------------*/
	.mmregs

	.if 0
;-------------------------------------------------------------------------
	.global _sRndSav
	.text
	
;-------------------------------------------------------------------------
MULT    			.set (31821)
INC     			.set (13849)
;-------------------------------------------------------------------------

;-------------------------------------------------------------------------
	.global                       _fill_rand
;-------------------------------------------------------------------------
_fill_rand
; S16 *psTo		= a
; S16 len		= sp(1)
; S16 amp		= sp(2)
	stlm 	a, ar0
	ssbx	sxm
	nop
	stm 	#_sRndSav, ar3
	ld 		*sp(1), b
	sub 	#1, b
	stlm	b, brc
	ld 		#MULT, #16, a;
	mvmm 	sp, ar4
	mar 	*+ar4(#2)
	rptb	J10-1	
		mpya	*ar3
		add 	#INC, b
		stl 	b, *ar3
		nop;
		nop;
		mpy 	*ar3, *ar4, b
		sth 	b,1, *ar0+
J10		
	ret;
	.endif
	
;-------------------------------------------------------------------------
	.global                       _stack_ini
;-------------------------------------------------------------------------
_stack_ini
; S16 sSize 	= a
;
; returns 
; S16 *psWhere 	= a
;
	mvmm 	sp, ar0;
	mar 	*ar0-

	sub 	#1, a	
	stlm 	a, brc
	ld 		#0x2222, b;
	ldm 	ar0, a
	rptb	J20-1
		stl 	b, *ar0-
J20		
	ret;
	
;-------------------------------------------------------------------------
	.global                       _stack_used
;-------------------------------------------------------------------------
_stack_used
; S16 *psStart 	= a
; S16 sSize		= sp(1)
;
; returns 
; S16 sUsed		= a
;
	stlm	a, ar0
	ssbx 	sxm
	ld 		#0, a
J30
		cmpm 	*ar0-, #0x2222
		add 	#1, a
		bc 		J30, ntc
	ret;	
	
;-------------------------------------------------------------------------
	.global                       _main_stop
;-------------------------------------------------------------------------
_main_stop
	nop
	nop
	nop
	nop
	ret