⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 menu.asm

📁 我在公司做的基于430F206的互感器现场效验仪
💻 ASM
字号:
*******************************************************
* TMS320C2x/C2xx/C5x ANSI C Codegen Version 7.00       
*******************************************************
;	C:\TDS-EMU2XX\C2000\CGTOOLS\BIN\DSPAC.EXE -v2xx -x0 menu.c C:\WINDOWS\TEMP\menu.if 
;	dspopt NOT RUN
;	C:\TDS-EMU2XX\C2000\CGTOOLS\BIN\DSPCG.EXE -o -v2xx -o C:\WINDOWS\TEMP\menu.if C:\WINDOWS\TEMP\menu.asm C:\WINDOWS\TEMP\menu.tmp 
	.port
	.bss	_page_flag,1,1
	.bss	_jack_flag,1
	.file	"menu.c"
	.file	"d:\lhybak\tyclh.h"
	.sym	_Boolean,0,14,13,16

	.stag	_StructKeyNode,112
	.member	_nkey,0,14,8,16
	.member	_nPageType,16,14,8,16
	.member	_nCs,32,14,8,16
	.member	_nPage,48,14,8,16
	.member	_nCursor,64,14,8,16
	.member	_nCursorPreLine,80,4,8,16
	.member	_nCursorOldLine,96,4,8,16
	.eos
	.globl	_portffe4
	.globl	_portffe8
	.globl	_portffec
	.globl	_portfff0
	.globl	_portfff1
	.globl	_portfff4
	.globl	_portfff5
	.globl	_portfff6
	.globl	_portfff7
	.globl	_portfff8
	.globl	_portfff9
	.globl	_portfffa
	.globl	_portfffc
	.globl	_port4000
	.file	"c:\TDS-EMU2XX\c2000\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	"menu.c"
	.globl	_nTbSysTime
	.globl	_adt
	.globl	_KeyNode
	.globl	_ferr
	.globl	_perr
	.globl	_VA_wave
	.globl	_mea_flag

	.sect	".cinit"
	.word	1,_page_flag
	.word	0

	.sym	_page_flag,_page_flag,14,2,16
	.globl	_page_flag
	.word	1,_jack_flag
	.word	0

	.sym	_jack_flag,_jack_flag,4,2,16
	.globl	_jack_flag
	.text

	.sym	_page,_page,32,2,0
	.globl	_page

	.func	11
;>>>> 	void page()/*--------page information-------*/  
;>>>> 				unsigned int jj;
******************************************************
* FUNCTION DEF : _page
******************************************************
_page:
	POPD	*+
	SAR	AR0,*+
	SAR	AR1,*
	LARK	AR0,2
	LAR	AR0,*0+,AR0

	.sym	_jj,1,14,1,16
	.line	4
;>>>> 			    reg_prd=2500;
	LACK	2500
	SACL	* 
	OUT	* ,0fff9h
	.line	5
;>>>> 	            reg_tcr=0x0c27;
	LACK	3111
	SACL	* 
	OUT	* ,0fff8h
	.line	6
;>>>> 	            mea_flag=1;  
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	7
;>>>> 	            asm("	clrc	intm");
	clrc	intm
	.line	8
;>>>> 	          	for(jj=0;jj<0xffff;jj++)
	LACK	0
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L3
	MAR	* ,AR1
L1:
	.line	9
;>>>> 	          	SysTb(&nTbSysTime,1500);
;>>>> 	          	switch(KeyNode.nPage)
;>>>> 	    		case 13006:
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	8
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L1
	B	L3
L4:
	.line	13
;>>>> 	    			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	15
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	16
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L7
	MAR	* ,AR1
L6:
	.line	17
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	16
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L6
L7:
	.line	18
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	19
;>>>> 	    				direct_ratio();
	CALL	_direct_ratio,AR1
	.line	20
;>>>> 	    				KeyNode.nkey=0;
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	21
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	23
;>>>> 					break;   
;>>>> 	    		case 13291:
	B	L8
L9:
	.line	25
;>>>> 	    			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	27
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	28
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L12
	MAR	* ,AR1
L11:
	.line	29
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	28
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L11
L12:
	.line	30
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	31
;>>>> 	     				CT_measure();  
	CALL	_CT_measure,AR1
	.line	32
;>>>> 	    				KeyNode.nkey=0;
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	33
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	35
;>>>> 	    			break;    
;>>>> 	    		case 13733:                                        
	B	L8
L13:
	.line	37
;>>>> 	    			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	39
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	40
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L16
	MAR	* ,AR1
L15:
	.line	41
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	40
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L15
L16:
	.line	42
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	43
;>>>> 	     				CT_measure();
	CALL	_CT_measure,AR1
	.line	44
;>>>> 	    				KeyNode.nkey=0;  
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	45
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	47
;>>>> 	    			break;		
;>>>> 	    		case  13982:
	B	L8
L17:
	.line	49
;>>>> 	   				if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	51
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	52
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L20
	MAR	* ,AR1
L19:
	.line	53
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	52
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L19
L20:
	.line	54
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	55
;>>>> 	     				CT_burden();
	CALL	_CT_burden,AR1
	.line	56
;>>>> 	    				KeyNode.nkey=0;  
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	57
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	59
;>>>> 	   				break;
;>>>> 				case	14660:
	B	L8
L21:
	.line	61
;>>>> 		   			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	63
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	64
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L24
	MAR	* ,AR1
L23:
	.line	65
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	64
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L23
L24:
	.line	66
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	67
;>>>> 	     				PT_burden();
	CALL	_PT_burden,AR1
	.line	68
;>>>> 	    				KeyNode.nkey=0;  
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	69
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	71
;>>>> 	   				break;  
;>>>> 				case	14289:
	B	L8
L25:
	.line	73
;>>>> 		   			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	75
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	76
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L28
	MAR	* ,AR1
L27:
	.line	77
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	76
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L27
L28:
	.line	78
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	79
;>>>> 	     				PT_measure();
	CALL	_PT_measure,AR1
	.line	80
;>>>> 	    				KeyNode.nkey=0;  
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	81
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	83
;>>>> 	   				break;
;>>>> 				case	14498:
	B	L8
L29:
	.line	85
;>>>> 	 	  			if(KeyNode.nCursorPreLine==0&&KeyNode.nkey==13)
	LDPK	_KeyNode+5
	LAC	_KeyNode+5
	BNZ	L8
	LDPK	_KeyNode
	LAC	_KeyNode
	SUBK	13
	BNZ	L8
	.line	87
;>>>> 	    				mea_flag=0;
	LACK	0
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	88
;>>>> 	   			       	for(jj=0;jj<0xffff;jj++)
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L32
	MAR	* ,AR1
L31:
	.line	89
;>>>> 	       			   	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	88
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L31
L32:
	.line	90
;>>>> 						asm("	setc	intm");
	setc	intm
	.line	91
;>>>> 	     				PT_err();
	CALL	_PT_err,AR1
	.line	92
;>>>> 	    				KeyNode.nkey=0;  
	LACK	0
	LDPK	_KeyNode
	SACL	_KeyNode
	.line	93
;>>>> 	    				mea_flag=1;
	LACK	1
	LDPK	_mea_flag
	SACL	_mea_flag
	.line	95
;>>>> 	   				break;
;>>>> 				case	14109:
	B	L8
L33:
	.line	97
;>>>> 	       		   	for(jj=0;jj<0xffff;jj++)
	LACK	0
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L35
	MAR	* ,AR1
L34:
	.line	98
;>>>> 	        	  	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	97
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L34
L35:
	.line	99
;>>>> 					VA_measure();
	CALL	_VA_measure,AR1
	.line	100
;>>>> 					break;	
;>>>> 	   		default:	
	B	L8
	.line	102
;>>>> 	    			break;
L3:
	.line	10
	LDPK	_KeyNode+3
	ZALS	_KeyNode+3
	SUBK	13006
	BZ	L4
	SUBK	285
	BZ	L9
	SUBK	442
	BZ	L13
	SUBK	249
	BZ	L17
	SUBK	127
	BZ	L33
	SUBK	180
	BZ	L25
	SUBK	209
	BZ	L29
	SUBK	162
	BZ	L21
L8:
	.line	104
;>>>> 			    reg_prd=2500;
	LACK	2500
	MAR	* ,AR0
	SACL	* 
	OUT	* ,0fff9h
	.line	105
;>>>> 	   	 	    reg_tcr=0x0c27;
	LACK	3111
	SACL	* 
	OUT	* ,0fff8h
	.line	106
;>>>> 	       		asm("	clrc	intm");
	clrc	intm
	.line	107
;>>>> 	       	 	for(jj=0;jj<0xffff;jj++)
	LACK	0
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	SACL	* 
	ZALS	* 
	RSXM
	SUBK	-1
	BGEZ	L38
	MAR	* ,AR1
L37:
	.line	108
;>>>> 	   			SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	107
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L37
L38:
	.line	109
;>>>> 	          	for(jj=0;jj<0xffff;jj++)
	LACK	0
	MAR	* ,AR2
	SACL	* 
	ZALS	* 
	SUBK	-1
	BGEZ	L40
	MAR	* ,AR1
L39:
	.line	110
;>>>> 	          	SysTb(&nTbSysTime,1500);
	LACK	1500
	SACL	*+
	LALK	_nTbSysTime+0
	SACL	*+
	CALL	_SysTb
	SBRK	2
	.line	109
	MAR	* ,AR2
	LARK	AR2,1
	MAR	*0+
	LAC	* 
	ADDK	1
	SACL	* 
	ZALS	* ,AR1
	RSXM
	SUBK	-1
	BLZ	L39
L40:
EPI0_1:
	.line	111
	MAR	* ,AR1
	SBRK	3
	LAR	AR0,*-
	PSHD	*
	RET

	.endfunc	121,000000000H,2

	.sym	_ttt,_ttt,32,2,0
	.globl	_ttt

	.func	123
;>>>> 	void	ttt(void)
;>>>> 		int i;
******************************************************
* FUNCTION DEF : _ttt
******************************************************
_ttt:
	POPD	*+
	SAR	AR0,*+
	SAR	AR1,*
	LARK	AR0,2
	LAR	AR0,*0+

	.sym	_i,1,4,1,16
	.line	5
;>>>> 		VA_wave[0]=100;
	LACK	100
	LDPK	_VA_wave
	SACL	_VA_wave
	.line	6
;>>>> 		VA_wave[1]=100;
	LDPK	_VA_wave+1
	SACL	_VA_wave+1
	.line	7
;>>>> 		VA_wave[2]=3;
	LACK	3
	LDPK	_VA_wave+2
	SACL	_VA_wave+2
	.line	8
;>>>> 		VA_wave[4]=0;
	LACK	0
	LDPK	_VA_wave+4
	SACL	_VA_wave+4
	.line	9
;>>>> 		VA_wave[5]=0;
	LDPK	_VA_wave+5
	SACL	_VA_wave+5
	.line	10
;>>>> 		VA_wave[6]=VA_wave[7]=3;
	LACK	3
	LDPK	_VA_wave+7
	SACL	_VA_wave+7
	LDPK	_VA_wave+6
	SACL	_VA_wave+6
EPI0_2:
	.line	12
	SBRK	3
	LAR	AR0,*-
	PSHD	*
	RET

	.endfunc	134,000000000H,2
*****************************************************
* UNDEFINED REFERENCES                              *
*****************************************************
	.global	_SysTb
	.global	_direct_ratio
	.global	_CT_measure
	.global	_CT_burden
	.global	_PT_burden
	.global	_PT_measure
	.global	_PT_err
	.global	_VA_measure
	.end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -