minute_ds.asm

基于PL3000芯片的单相复费率多功能电表的应用程序。

;************************************************************
;文档类型: 原代码 
;项目编号: 
;文档编号: 
;修订版本: v1.0
;生成日期: 2004.12.3
;作    者： LI
;审    核: 
;************************************************************
;相关文档: 
;文档编号      说明 
;************************************************************
;修订版本:
;修订版本: 
;************************************************************
$INCLUDE	(RAML128.INC)
$INCLUDE	(RAMH128.INC)
$INCLUDE	(PL3200.INC)
$INCLUDE	(24ADDR.INC)
$INCLUDE	(IO.INC) 
$INCLUDE	(RAM.INC)

CODE_REG	SEGMENT	CODE
RSEG		CODE_REG
PUBLIC          MINUTE_DS
PUBLIC          DPTR_TO_RD4
PUBLIC          DPTR_TO_RD3
;*******************************;调用子程序情况:
;EXTRN   CODE(XL_PROG)
;EXTRN   CODE(RD_JL_NOW_W)
;EXTRN   CODE(RD_JL_NOW_ZDL)
;EXTRN   CODE(RD_JL_NOW_FL_DL)
;******************************************************
;判定1分钟时间到,为上月冻结,费率时段判别提供时间
;判定时间(分)变化后,再读日,时,分
;******************************************************
MINUTE_DS1:;     JNC     MINUTE_DS2 		
	;	JMP     MINUTE_DS_LCD

MINUTE_DS:;	MOV     R0,#TMR_MINUTE
           ;     MOV     A,@R0
	;	CJNE	A,#60,MINUTE_DS1
		
	;	CALL    RAM_CLR
				
MINUTE_DS2: ;    MOV     R0,#TMR_MINUTE
            ;    MOV     @R0,#0
             ;   CALL    PWER_LCD_DATA   ;一分钟刷新停电显示 05-12-07LIHENG
          ;      CALL    XL_PROG
MINUTE_DS_LCD: 
                JNB     READ_OPEN_BIT,MINUTE_DS_RET   
                MOV     R0,#LCD_MINUTE
                MOV     A,@R0
		CJNE	A,#60,MINUTE_DS_C1
MINUTE_DS_LCD1: CLR     READ_BIT
                MOV     R0,#DIS_SEC_VALUE
                MOV     @R0,#1 
                MOV     R0,#DIS_CODE
                MOV     @R0,#2
                CLR     READ_OPEN_BIT                                                              
MINUTE_DS_RET: 	NOP
                NOP
                NOP
                RET


MINUTE_DS_C1:   JNC     MINUTE_DS_LCD1 		
		JMP     MINUTE_DS_RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;RAM_CLR:        ;清除外部RAM系数校验5-10-9               
;               MOV   DPH,#02H
;               MOV   DPL,#KUA_3
;               MOVX  A,@DPTR
;               CPL   A
;               MOVX  @DPTR,A
               
;               MOV   DPL,#KIA_3
;               MOVX  A,@DPTR
;               CPL   A
;               MOVX  @DPTR,A
               
;               RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;每一分钟刷新一次停电显示内容  2005-12-1 LIHENG
;

;PWER_LCD_DATA:  MOV   FL_NUM_BAK,#2
;                CALL  RD_JL_NOW_ZDL             
;                MOV   DPH,#02H
;                MOV   DPL,#PWER_LCD_Z0
;                CALL  CAL_TO_DPTR4
               
;               	MOV   FL_NUM_BAK,#2
;                CALL  RD_JL_NOW_FL_DL             
;                MOV   DPH,#02H
;                MOV   DPL,#PWER_LCD_F0
;                CALL  CAL_TO_DPTR4
;                
;                MOV   FL_NUM_BAK,#4
;                CALL  RD_JL_NOW_FL_DL             
;                MOV   DPH,#02H
;                MOV   DPL,#PWER_LCD_G0
;                CALL  CAL_TO_DPTR4
                
;                CALL  RD_JL_NOW_W             
;                MOV   DPH,#02H
;                MOV   DPL,#PWER_LCD_W0
;                CALL  CAL_TO_DPTR4
;                RET
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; 
;CAL_TO_DPTR4:   MOV   A,CAL_BUF0
;                MOVX  @DPTR,A
                
;                INC   DPTR
;                MOV   A,CAL_BUF1
 ;               MOVX  @DPTR,A
                
;                INC   DPTR
;                MOV   A,CAL_BUF2
;                MOVX  @DPTR,A
                
;                INC   DPTR
;                MOV   A,CAL_BUF3
 ;               MOVX  @DPTR,A
;                RET 
                
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
DPTR_TO_RD4:    MOVX    A,@DPTR
                MOV     RD_BUF0,A
                
                INC     DPTR
DPTR_TO_RD3:    MOVX    A,@DPTR
                MOV     RD_BUF1,A
                
                INC     DPTR
                MOVX    A,@DPTR
                MOV     RD_BUF2,A
                
                INC     DPTR
                MOVX    A,@DPTR
                MOV     RD_BUF3,A               
                RET
                
                             	
		END