func.asm

DSP的实验测试程序

*******************************************************
* TMS320C24xx ANSI C Codegen Version 7.02       
*******************************************************
;	dspac -v2xx -iC:/ti/c2400/cgtools/include func.c C:\DOCUME~1\jjd\LOCALS~1\Temp\func.if 
;	dspopt NOT RUN
;	dspcg -o -v2xx -o C:\DOCUME~1\jjd\LOCALS~1\Temp\func.if C:\DOCUME~1\jjd\LOCALS~1\Temp\func.asm C:\DOCUME~1\jjd\LOCALS~1\Temp\func.tmp 
	.port
	.bss	_num_f_d,1,1
	.bss	_b_time,2,1
	.bss	_pwm_half_per,1
	.bss	_timer2_per,1
	.bss	_F_V_radio,2,1
	.file	"func.c"
	.file	"f2407_c.h"
	.globl	_portFF0F
	.globl	_portFFFF
	.file	"C:/ti/c2400/cgtools/include\math.h"
	.globl	_asin
	.globl	_acos
	.globl	_atan
	.globl	_atan2
	.globl	_ceil
	.globl	_cos
	.globl	_cosh
	.globl	_exp
	.globl	_fabs
	.globl	_floor
	.globl	_fmod
	.globl	_frexp
	.globl	_ldexp
	.globl	_log
	.globl	_log10
	.globl	_modf
	.globl	_pow
	.globl	_sin
	.globl	_sinh
	.globl	_sqrt
	.globl	_tan
	.globl	_tanh
	.file	"var.h"

	.sect	".cinit"
	.word	1,_num_f_d
	.word	33

	.sym	_num_f_d,_num_f_d,14,2,16
	.globl	_num_f_d
	.word	2,_b_time
	.float	3.e-1

	.sym	_b_time,_b_time,6,2,32
	.globl	_b_time
	.word	1,_pwm_half_per
	.word	2000

	.sym	_pwm_half_per,_pwm_half_per,14,2,16
	.globl	_pwm_half_per
	.word	1,_timer2_per
	.word	1000

	.sym	_timer2_per,_timer2_per,14,2,16
	.globl	_timer2_per
	.word	2,_F_V_radio
	.float	1.2

	.sym	_F_V_radio,_F_V_radio,6,2,32
	.globl	_F_V_radio
	.file	"func.c"
	.text

	.sym	_ini,_ini,32,2,0
	.globl	_ini

	.func	7
;>>>> 	void ini(void)
******************************************************
* FUNCTION DEF : _ini
******************************************************
_ini:
	POPD	*+
	SAR	AR0,*+
	SAR	AR1,*
	LARK	AR0,1
	LAR	AR0,*0+,AR3

	.line	5
;>>>> 	    *SCSR1 = 0x00FD;
	LARK	AR3,28696
	LACK	253
	SACL	*+
	.line	22
;>>>> 	    *SCSR2 = (*SCSR2 | 0x000B) & 0x000F;
	LACK	11
	OR	* 
	ANDK	15
	SACL	* 
	.line	34
;>>>> 	    *WDCR  = 0x00E8;
	LACK	232
	ADRK	16
	SACL	* ,AR0
	.line	45
;>>>> 	    WSGR = 0x0000;
	LACK	0
	SACL	* 
	OUT	* ,0ffffh,AR3
	.line	56
;>>>> 	    *MCRA = 0x0fc0;                     /* group A pins */
	ADRK	103
	SPLK	#4032,* 
	.line	76
;>>>> 	    *MCRB = 0xFE00;                     /* group B pins */
	ADRK	2
	SPLK	#65024,* 
	.line	96
;>>>> 	    *MCRC = 0x0000;                     /* group C pins */
	ADRK	2
	SACL	* ,AR4
	.line	120
;>>>> 	    *IMR = 0x0000;                      /* clear the IMR register */
	LARK	AR4,4
	SACL	* 
	.line	121
;>>>> 	    *IFR = 0x003F;                      /* clear any pending core interrupts */
	LACK	63
	ADRK	2
	SACL	* 
	.line	122
;>>>> 	    *IMR = 0x0004;                      /* enable desired core interrupts (in1,in3)*/
	LACK	4
	SBRK	2
	SACL	* ,AR5
	.line	125
;>>>> 	    *EVAIFRA = 0xFFFF;                  /* clear all EVA group A interrupts */
	LARK	AR5,29743
	SPLK	#65535,*+
	.line	126
;>>>> 	    *EVAIFRB = 0xFFFF;                  /* clear all EVA group B interrupts */
	SPLK	#65535,*+
	.line	127
;>>>> 	    *EVAIFRC = 0xFFFF;                  /* clear all EVA group C interrupts */
	SPLK	#65535,* ,AR4
	.line	128
;>>>> 	    *EVAIMRA = 0x0000;                  /* enable desired EVA group A interrupts */
	SBRK	4
	MAR	* ,AR5
	SBRK	5
	SAR	AR4,*+,AR4
	.line	129
;>>>> 	    *EVAIMRB = 0x0001;                  /* enable desired EVA group B interrupts ENABLE TIME2*/
	MAR	*+,AR5
	SAR	AR4,*+,AR4
	.line	130
;>>>> 	    *EVAIMRC = 0x0000;                  /* enable desired EVA group C interrupts */
	MAR	*-,AR5
	SAR	AR4,* 
	.line	132
;>>>> 	    *EVBIFRA = 0xFFFF;                  /* clear all EVB group A interrupts */
	LARK	AR5,29999
	SPLK	#65535,*+
	.line	133
;>>>> 	    *EVBIFRB = 0xFFFF;                  /* clear all EVB group B interrupts */
	SPLK	#65535,*+
	.line	134
;>>>> 	    *EVBIFRC = 0xFFFF;                  /* clear all EVB group C interrupts */
	SPLK	#65535,* 
	.line	135
;>>>> 	    *EVBIMRA = 0x0000;                  /* enable desired EVB group A interrupts */
	SBRK	5
	SAR	AR4,*+
	.line	136
;>>>> 	    *EVBIMRB = 0x0000;                  /* enable desired EVB group B interrupts */
	SAR	AR4,*+
	.line	137
;>>>> 	    *EVBIMRC = 0x0000;                  /* enable desired EVB group C interrupts */
	SAR	AR4,* ,AR1
EPI0_1:
	.line	139
	SBRK	2
	LAR	AR0,*-
	PSHD	*
	RET

	.endfunc	145,000000000H,1
	.end