test2407.asm

EVM2407板卡上的测试程序源码

*******************************************************
* TMS320C2x/C2xx/C5x ANSI C Codegen Version 7.00       
*******************************************************
;	C:\TIC2XX\C2000\CGTOOLS\BIN\DSPAC.EXE -v2xx test2407.c C:\WINDOWS\TEMP\test2407.if 
;	dspopt NOT RUN
;	C:\TIC2XX\C2000\CGTOOLS\BIN\DSPCG.EXE -o -v2xx -o C:\WINDOWS\TEMP\test2407.if C:\WINDOWS\TEMP\test2407.asm C:\WINDOWS\TEMP\test2407.tmp 
	.port
	.file	"test2407.c"
	.file	"f2407_c.h"
	.globl	_portFF0F
	.globl	_portFFFF
	.file	"test2407.c"
	.globl	_port40
	.text

	.sym	_main,_main,32,2,0
	.globl	_main

	.func	11
;>>>> 	void main(void)
;>>>> 	   unsigned int d_ram,p_ram,t_sci,t_x25650;
******************************************************
* FUNCTION DEF : _main
******************************************************
_main:
	POPD	*+
	SAR	AR0,*+
	SAR	AR1,*
	LARK	AR0,5
	LAR	AR0,*0+,AR3

	.sym	_d_ram,1,14,1,16
	.sym	_p_ram,2,14,1,16
	.sym	_t_sci,3,14,1,16
	.sym	_t_x25650,4,14,1,16
	.line	4
;>>>> 	   *WDCR  = 0x00E8;
	LARK	AR3,28713
	LACK	232
	SACL	* 
	.line	5
;>>>> 	   *SCSR1 = 0x00fd;
	LACK	253
	SBRK	17
	SACL	*+
	.line	6
;>>>> 	   *SCSR2 = (*SCSR2 | 0x000B) & 0x000F;
	LACK	11
	OR	* 
	ANDK	15
	SACL	* ,AR0
	.line	7
;>>>> 	   WSGR = 0x01c0;
	LACK	448
	SACL	* 
	OUT	* ,0ffffh,AR3
	.line	8
;>>>> 	   *MCRA = 0x0003;                     /* group A pins */
	LACK	3
	ADRK	119
	SACL	* 
	.line	9
;>>>> 	   *MCRB = 0xFE1C;                     /* group B pins */
	ADRK	2
	SPLK	#65052,* 
	.line	10
;>>>> 	   *MCRC = 0x0000;                     /* group C pins */
	LACK	0
	ADRK	2
	SACL	* 
	.line	11
;>>>> 	   asm("	setc	INTM");
	setc	INTM
	.line	12
;>>>> 	   *IMR = 0x0000;                      /* clear the IMR register */
	LARK	AR4,4
	MAR	* ,AR4
	SACL	* 
	.line	13
;>>>> 	   *IFR = 0xffff;                      /* clear any pending core interrupts */ 
	ADRK	2
	SPLK	#65535,* ,AR3
	.line	14
;>>>> 	   *WDKEY =0x5555;
	SBRK	111
	SPLK	#21845,* 
	.line	15
;>>>> 	   *WDKEY =0xaaaa; 
	SPLK	#43690,* 
	.line	16
;>>>> 	   *PCDATDIR=*PCDATDIR|0x2000;		/*PC5 is output*/
	LACK	8192
	ADRK	119
	OR	* 
	SACL	* ,AR4
	.line	24
;>>>> 	    LEDTest(5);
	MAR	*-,AR1
	SAR	AR4,*+
	CALL	_LEDTest
	MAR	*-,AR0
	.line	25
;>>>> 	    LED=0x00ff;
	LACK	255
	SACL	* 
	OUT	* ,040h
	.line	27
;>>>> 	    LED=0x00fe;
	LACK	254
	SACL	* 
	OUT	* ,040h,AR1
	.line	28
;>>>> 	    p_ram=prog_ram_check();
	CALL	_prog_ram_check
	MAR	* ,AR2
	LARK	AR2,2
	MAR	*0+
	SACL	* 
	.line	29
;>>>> 		if(p_ram==0)LEDflash(0x00fe);
	LAC	* 
	BNZ	L1
	MAR	* ,AR1
	LACK	254
	SACL	*+
	CALL	_LEDflash
	MAR	*-
L1:
	.line	32
;>>>> 		LED=0xfffd;	
	LACK	65533
	MAR	* ,AR0
	SACL	* 
	OUT	* ,040h,AR1
	.line	33
;>>>> 		d_ram = data_ram_check();
	CALL	_data_ram_check
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	.line	34
;>>>> 		if(d_ram==0)LEDflash(0x00fd);
	LAC	* 
	BNZ	L2
	MAR	* ,AR1
	LACK	253
	SACL	*+
	CALL	_LEDflash
	MAR	*-
L2:
	.line	36
;>>>> 	    LED=0xfffb;
	LACK	65531
	MAR	* ,AR0
	SACL	* 
	OUT	* ,040h,AR1
	.line	37
;>>>> 	    t_sci=test_sci();
	CALL	_test_sci
	MAR	* ,AR2
	LARK	AR2,3
	MAR	*0+
	SACL	* 
	.line	38
;>>>> 	    if(t_sci==0)LEDflash(0x00fb);
	LAC	* 
	BNZ	L3
	MAR	* ,AR1
	LACK	251
	SACL	*+
	CALL	_LEDflash
	MAR	*-
L3:
	.line	40
;>>>> 	    LED=0xfff7;
	LACK	65527
	MAR	* ,AR0
	SACL	* 
	OUT	* ,040h,AR1
	.line	41
;>>>> 	    t_x25650=test_x25650();
	CALL	_test_x25650
	MAR	* ,AR2
	LARK	AR2,4
	MAR	*0+
	SACL	*-
	.line	42
;>>>> 	    if(t_sci==0)LEDflash(0x00f7);
	LAC	* 
	BNZ	L4
	MAR	* ,AR1
	LACK	247
	SACL	*+
	CALL	_LEDflash
	MAR	*-
L4:
	.line	46
;>>>> 		DACtest();
	CALL	_DACtest,AR1
L5:
	.line	49
;>>>> 		while(1);
	B	L5
	.endfunc	60,000000000H,5
*****************************************************
* UNDEFINED REFERENCES                              *
*****************************************************
	.global	_LEDTest
	.global	_prog_ram_check
	.global	_LEDflash
	.global	_data_ram_check
	.global	_test_sci
	.global	_test_x25650
	.global	_DACtest
	.end