vold.asm

给香港公司做的出口欧洲的电子称项目全部源代码 CPU:KS57C2308 RANGE:(0 -150KG)/d = 0.1kg

;MODULE:  VOLD.ASM                     ;
;FUNCTION: CHECK BATTERY VOLTAGE       ;
;***************************************************************************;
;                                  VOL_DETECT                               ;
;***************************************************************************;
;       [VOLD_DLY]                     ;
;       [ABNORMAL_CNT]                 ;
VOL_DETECT:                            ;
        SMB      1                     ;
        INCS     VOLD_DLY              ; VOLD_DLY FULL ?
        JP       SB0_RET               ; NO.
        LD       A,#0                  ; YES.
        LD       VOLD_DLY,A            ;
        SMB      15                    ;
        LDB      C,VOLD_IN             ;
        SMB      1                     ;
        BTST     C                     ; C = H ?
        JPS      VOLD_1                ; NO.  VOLTAGE IS ABNORMAL.
        LD       A,#0                  ; YES. VOLTAGE IS NORMAL
        LD       ABNORMAL_CNT,A        ;
SB0_RET:SMB      0                     ;
        RET                            ;
VOLD_1: INCS     ABNORMAL_CNT          ; FULL ?
        JP       SB0_RET               ; NO.
        LD       EA,#LO                ; YES. DISPLAY "Lo", THEN TURN OFF POWER
        JP       DISP_ERR_COM          ;
;**************************************;