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

📄 gfunction.a51

📁 电能表源码
💻 A51
字号:
; .\Gfunction.SRC generated from: bottom\Gfunction.c
; COMPILER INVOKED BY:
;        C:\Keil\C51\BIN\C51.EXE bottom\Gfunction.c LARGE BROWSE NOAREGS MODDP2 INCDIR(E:\work\测试文件\程序\测试程序\var\;G:\测试文件\程序\测试程序\var\) DEBUG OBJECTEXTEND PRINT(.\Gfunction.lst) SRC(.\Gfunction.SRC)

$NOMOD51

NAME	GFUNCTION

P0	DATA	080H
P1	DATA	090H
P2	DATA	0A0H
P3	DATA	0B0H
T0	BIT	0B0H.4
AC	BIT	0D0H.6
T1	BIT	0B0H.5
T2	BIT	090H.0
EA	BIT	0A8H.7
debug	DATA	0FFH
DPH1	DATA	085H
IE	DATA	0A8H
DPL1	DATA	084H
EXF2	BIT	0C8H.6
RD	BIT	0B0H.7
ES	BIT	0A8H.4
IP	DATA	0B8H
RI	BIT	098H.0
INT0	BIT	0B0H.2
CY	BIT	0D0H.7
TI	BIT	098H.1
INT1	BIT	0B0H.3
RCAP2H	DATA	0CBH
PS	BIT	0B8H.4
SP	DATA	081H
T2EX	BIT	090H.1
OV	BIT	0D0H.2
RCAP2L	DATA	0CAH
C_T2	BIT	0C8H.1
WR	BIT	0B0H.6
EXIF	DATA	091H
RCLK	BIT	0C8H.5
TCLK	BIT	0C8H.4
SPC_FUN	DATA	08FH
SBUF	DATA	099H
PCON	DATA	087H
SCON	DATA	098H
TMOD	DATA	089H
TCON	DATA	088H
isfr	DATA	0F1H
IE0	BIT	088H.1
IE1	BIT	088H.3
B	DATA	0F0H
CP_RL2	BIT	0C8H.0
ACC	DATA	0E0H
ET0	BIT	0A8H.1
ET1	BIT	0A8H.3
TF0	BIT	088H.5
ET2	BIT	0A8H.5
TF1	BIT	088H.7
TF2	BIT	0C8H.7
RB8	BIT	098H.2
TH0	DATA	08CH
EX0	BIT	0A8H.0
IT0	BIT	088H.0
TH1	DATA	08DH
TB8	BIT	098H.3
EX1	BIT	0A8H.2
IT1	BIT	088H.2
TH2	DATA	0CDH
P	BIT	0D0H.0
SM0	BIT	098H.7
TL0	DATA	08AH
SM1	BIT	098H.6
TL1	DATA	08BH
SM2	BIT	098H.5
TL2	DATA	0CCH
EIE	DATA	0E8H
PT0	BIT	0B8H.1
PT1	BIT	0B8H.3
RS0	BIT	0D0H.3
PT2	BIT	0B8H.5
TR0	BIT	088H.4
RS1	BIT	0D0H.4
TR1	BIT	088H.6
TR2	BIT	0C8H.2
PX0	BIT	0B8H.0
PX1	BIT	0B8H.2
DPH	DATA	083H
EIP	DATA	0F8H
DPL	DATA	082H
SBUF1	DATA	0C1H
EXEN2	BIT	0C8H.3
SCON1	DATA	0C0H
REN	BIT	098H.4
T2CON	DATA	0C8H
RXD	BIT	0B0H.0
EICON	DATA	0D8H
CKCON	DATA	08EH
TXD	BIT	0B0H.1
F0	BIT	0D0H.5
PSW	DATA	0D0H
?PR?delay_1ms?GFUNCTION                  SEGMENT CODE 
?PR?delay_10ms?GFUNCTION                 SEGMENT CODE 
?PR?_checkone_bcd?GFUNCTION              SEGMENT CODE 
?PR?_one_from_three?GFUNCTION            SEGMENT CODE 
?XD?_one_from_three?GFUNCTION            SEGMENT XDATA OVERLAYABLE 
?PR?_long_to_4bcd?GFUNCTION              SEGMENT CODE 
?XD?_long_to_4bcd?GFUNCTION              SEGMENT XDATA OVERLAYABLE 
?PR?_value_hex_from_bcd?GFUNCTION        SEGMENT CODE 
?PR?_value_hex_from_2bcd?GFUNCTION       SEGMENT CODE 
?XD?_value_hex_from_2bcd?GFUNCTION       SEGMENT XDATA OVERLAYABLE 
?PR?_value_hex_from_4bcd?GFUNCTION       SEGMENT CODE 
?XD?_value_hex_from_4bcd?GFUNCTION       SEGMENT XDATA OVERLAYABLE 
?PR?_byte_1_bcd_addone?GFUNCTION         SEGMENT CODE 
?PR?_byte_x_bcd_addone?GFUNCTION         SEGMENT CODE 
?XD?_byte_x_bcd_addone?GFUNCTION         SEGMENT XDATA OVERLAYABLE 
?PR?_check_bitnum?GFUNCTION              SEGMENT CODE 
?PR?_swap_higtlow?GFUNCTION              SEGMENT CODE 
?XD?_swap_higtlow?GFUNCTION              SEGMENT XDATA OVERLAYABLE 
	EXTRN	CODE (?C?LLDOPTR)
	EXTRN	CODE (?C?LLDPTR0)
	EXTRN	CODE (?C?ULCMP)
	EXTRN	CODE (?C?LLDOPTR0)
	EXTRN	CODE (?C?LSTPTR)
	EXTRN	CODE (?C?LSTXDATA)
	EXTRN	CODE (?C?ULDIV)
	EXTRN	CODE (?C?LMUL)
	EXTRN	CODE (?C?CLDPTR)
	EXTRN	CODE (?C?CLDOPTR)
	EXTRN	CODE (?C?LSTKXDATA)
	EXTRN	CODE (?C?CSTPTR)
	EXTRN	CODE (?C?CILDPTR)
	EXTRN	CODE (?C?CSTOPTR)
	PUBLIC	_swap_higtlow
	PUBLIC	_check_bitnum
	PUBLIC	_byte_x_bcd_addone
	PUBLIC	_byte_1_bcd_addone
	PUBLIC	_value_hex_from_4bcd
	PUBLIC	_value_hex_from_2bcd
	PUBLIC	_value_hex_from_bcd
	PUBLIC	_long_to_4bcd
	PUBLIC	_one_from_three
	PUBLIC	_checkone_bcd
	PUBLIC	delay_10ms
	PUBLIC	delay_1ms

	RSEG  ?XD?_swap_higtlow?GFUNCTION
?_swap_higtlow?BYTE:
     point?1164:   DS   3
       num?1165:   DS   1
	ORG  4
         i?1166:   DS   1
      temp?1167:   DS   1

	RSEG  ?XD?_long_to_4bcd?GFUNCTION
?_long_to_4bcd?BYTE:
      value?445:   DS   4
	ORG  4
   temp_bcd?446:   DS   4
          i?447:   DS   1
  temp_data?448:   DS   1

	RSEG  ?XD?_one_from_three?GFUNCTION
?_one_from_three?BYTE:
      point?344:   DS   3

	RSEG  ?XD?_byte_x_bcd_addone?GFUNCTION
?_byte_x_bcd_addone?BYTE:
      point?957:   DS   3
        num?958:   DS   1
	ORG  4
          i?959:   DS   1

	RSEG  ?XD?_value_hex_from_2bcd?GFUNCTION
?_value_hex_from_2bcd?BYTE:
          l?652:   DS   2

	RSEG  ?XD?_value_hex_from_4bcd?GFUNCTION
?_value_hex_from_4bcd?BYTE:
      point?753:   DS   3
	ORG  3
          l?754:   DS   4
          k?755:   DS   4
; /*************************************************************************************
; 
; 	文件类型:通用函数库
; 	文件作用:
; 	修改权限:底层驱动维护人员
; 	文件相关:
; 	
; 	创 建 人:chenbo
; 	创建日期:2007.06.01
; 	当前版本:Ver0.1
; 	
; 	版本信息:Ver0.1					GeminiKQ
; 
; **************************************************************************************/
; 
; #include "tiger.h"
; 
; /*************************************************8
; 延时1ms
; *************************************************/
; void delay_1ms(void)

	RSEG  ?PR?delay_1ms?GFUNCTION
delay_1ms:
	USING	0
			; SOURCE LINE # 21
; {unsigned char i;
			; SOURCE LINE # 22
;  for(i=0;i<100;i++)
			; SOURCE LINE # 23
;---- Variable 'i?040' assigned to Register 'R7' ----
	CLR  	A
	MOV  	R7,A
?C0001:
;      {
			; SOURCE LINE # 24
;        nop();
			; SOURCE LINE # 25
	NOP  	
;      }
			; SOURCE LINE # 26
	INC  	R7
	MOV  	A,R7
	CJNE 	A,#064H,?C0001
; }
			; SOURCE LINE # 27
?C0004:
	RET  	
; END OF delay_1ms

; 
; //延时10ms
; void delay_10ms(void)

	RSEG  ?PR?delay_10ms?GFUNCTION
delay_10ms:
	USING	0
			; SOURCE LINE # 30
; {unsigned char i;
			; SOURCE LINE # 31
;  for(i=0;i<10;i++)
			; SOURCE LINE # 32
;---- Variable 'i?141' assigned to Register 'R6' ----
	CLR  	A
	MOV  	R6,A
?C0005:
;     delay_1ms();
			; SOURCE LINE # 33
	LCALL	delay_1ms
	INC  	R6
	MOV  	A,R6
	CJNE 	A,#0AH,?C0005
; }
			; SOURCE LINE # 34
?C0008:
	RET  	
; END OF delay_10ms

; 
; 
; //=====================================================
; //函数功能:检查该字节是否为BCD码
; //函数入口参数:被检测字节
; //函数出口参数:返回1表示为BCD码,返回0表示不是BCD码
; //===================================================
; unsigned char checkone_bcd(unsigned char value)

	RSEG  ?PR?_checkone_bcd?GFUNCTION
_checkone_bcd:
	USING	0
			; SOURCE LINE # 42
;---- Variable 'i?243' assigned to Register 'R6' ----
;---- Variable 'value?242' assigned to Register 'R7' ----
;  { unsigned char i;
			; SOURCE LINE # 43
;    if(((value&0x0f)<=9)&&((value>>4)<=9))
			; SOURCE LINE # 44
	MOV  	A,R7
	ANL  	A,#0FH
	SETB 	C
	SUBB 	A,#09H
	JNC  	?C0009
	MOV  	A,R7
	SWAP 	A
	ANL  	A,#0FH
	SUBB 	A,#09H
	JNC  	?C0009
;      i=1;
			; SOURCE LINE # 45
	MOV  	R6,#01H
	SJMP 	?C0010
?C0009:
;    else
;      i=0;
			; SOURCE LINE # 47
	CLR  	A
	MOV  	R6,A
?C0010:
;    return i;
			; SOURCE LINE # 48
	XCH  	A,R7
	MOV  	A,R6
	XCH  	A,R7
;  }
			; SOURCE LINE # 49
?C0011:
	RET  	
; END OF _checkone_bcd

; 
; 
; //=====================================================
; //函数功能

⌨️ 快捷键说明

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