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

📄 yz285.asm

📁 除湿机的说明程序文件 已经生产几十W台 出口机形 分时操作
💻 ASM
📖 第 1 页 / 共 5 页
字号:
        CALL    FDS
        TEST    (DSCD0).2                   ; judge if off or on
        JR      F,ALANON
        CALL    PSTFGJ
        JP      MAIN
;
ALANON:
        JP      FORMOD
;
ALNRCV:

        TEST    (P0).1                   ; CHECK FOR KEY
        JR      T,ALNKEY
        CALL    DLY100U
        TEST    (P0).1
        JR      T,ALNKEY
        TEST    (FLAG1).KEYBUF
        JR      T,FRCFCL
        CLR     (FLAG1).KEYBUF

        SET     (FLAG3).BUZZEN

ALTOMN:
        CALL    PSTFGJ
        JP      MAIN
;
ALNKEY:
        SET     (FLAG1).KEYBUF

FRCFCL:

        TEST    (FLAG5).XTWRN
        JR      F,ALTOMN

        TEST    (DSCD0).4               ; TEST DSK
        JR      T,ALIFDSG

        TEST    (DSCD0).3               ; TEST DSG
        JR      T,ALDSK
        LD      A,(STRTIM)
        CMP     A,(STPTIM)
        JR      GT,ALIFDSG
        CMP     A,(STPTIM)
        JR      CS,ALDSK
        JP      ALNDSG                  ; IF STRTIM = STPTIM THEN NO EFFECT
;
ALDSK:
        CMP     (STRTIM),0
        JR      NE,ALTOMN

ALIFDSG:

        TEST    (DSCD0).3                ; TEST DSG
        JR      T,ALNDSG
        CMP     (STPTIM),0
        JR      EQ,ALNDSG
        TEST    (FLAG1).RMWRN
        JR      F,ALRMWRN
        CLR     (P0).4                    ; LIGHT THE DS LED

ALRMWRN:
        LD      A,(MINS10)
        CMP     A,(STPTIM)
        JR      CS,ALHVDSG

        CLR     (DSCD0).3
        JR      ALTOMN
;
ALNDSG:
        TEST    (FLAG1).RMWRN
        JR      F,ALHVDSG
        SET     (P0).4                     ; CLEAR THE DS LED

ALHVDSG:

        LD      A,(VANFAN)                ; TEST THE SLEEP
        AND     A,0X7
        CMP     A,0X1
        JR      NE,ALNSLP

        TEST    (FLAG1).RMPWRN
        JR      F,ALJGMD
        CLR     (P0).5                     ; LIGHT THE SLEEP LED
        JR      ALJGMD
;
ALNSLP:
        TEST    (FLAG1).RMPWRN
        JR      F,ALJGMD
        SET     (P0).5                     ; CLEAR SLEEP LED

ALJGMD:
        LD      A,(SWNMOD)
        AND     A,0XF
        CMP     A,1
        JR      EQ,HTMDZZ
        CMP     A,2
        JR      EQ,CSMDZZ
        CMP     A,3
        JR      EQ,CLMDZZ
        JP      SFMD
;

CLMDZZ:
        JP      COOLMD
;
CSMDZZ:
        JP      CHSHMD
;
HTMDZZ:
        JP      HEATMD
;
;
;******************** FOR AD WRONG *********************

FADWRN:

        NOP
        TEST    (FLAG5).XTWRN
        JR      T,IFRMW

        CMP     (MMS),0X3E
        JR      CC,XTWFL1
        CLR     (P0).6
        JR      IFRMW
;
XTWFL1:
        SET     (P0).6

IFRMW:
        TEST    (FLAG1).RMWRN
        JR      T,IFRMPW
        CMP     (MMS),0X3E
        JR      CC,RMWFL1
        CLR     (P0).4
        JR      IFRMPW
;
RMWFL1:
        SET     (P0).4

IFRMPW:
        TEST    (FLAG1).RMPWRN
        JR      F,ISRMPW
        RET
;
ISRMPW:
        CMP     (MMS),0X3E
        JR      CC,RMPWFL1

        CLR     (P0).5
        RET
;
RMPWFL1:
        SET     (P0).5
        RET
;
;
;******************************************************
;
;           FOR      HEAT   MODE
;
;******************** HEAT  MOD **************************

HEATMD:
        NOP

        TEST    (FLAG2).ISHTFLG
        JR      F,HTFLW1
        CALL    CMPCLS

        CALL    STFKJFL
        CLR     (CSTIMS)
        CALL    FANCLR
;
HTFLW1:
        SET     (FLAG2).ISHTFLG
        CLR     (CYRSEC)

        CLR     (FLAG3).GJFLG

        CLR     (FLAG4).ISCHSH


        CLR     (FLAG3).CHSFLG
        CLR     (FLAG3).ISCOOL
        CLR     (FLAG3).FLDFLG
        CLR     (FLAG4).FLD2FLG
        CLR     (FLD2SEC)
        CLR     (FLD0SEC)

;******************* FOR DIAN JIA RE *********************

        TEST    (P7).7
        JR      F,HTIFDJR
        TEST    (P7).6
        JR      F,HTIFDJR
        TEST    (P7).5
        JR      F,HTIFDJR
        JR      CLRDJR
;
HTIFDJR:

        CMP     (CMPMIN),0X3              ; IF CMP RUN 3MINS
        JR      CS,CLRDJR

        TEST    (FLAG3).HTFCHS            ; IF HEATMD CS
        JR      F,CLRDJR

        TEST    (FLAG1).RMWRN
        JR      F,CLRDJR                   ; IF RMTMP WRN 

        TEST    (FLAG1).RMPWRN
        JR      F,CLRDJR

        CMP     (RMTMP),0X17               ; CMP WITH 23C
        JR      GT,NTFRPRS
        CMP     (RMPTMP),0X34              ; CMP WITH 52C
        JR      CC,NTFRPRS

        CALL    FPRTMP
        LD      A,(PRSTMP)
        SUB     A,(RMTMP)
        JR      CS,CLRDJR                  ; IF Tset-Troom > 3c
        CMP     A,0X3
        JR      GT,SETDJR
        CMP     A,0X1
        JR      CS,CLRDJR                  ; Tset - Troom < 1C
        JR      FDJRFF
;
NTFRPRS:

        CMP     (RMTMP),0X19               ; IF >=25C
        JR      CC,CLRDJR

        CMP     (RMPTMP),0X3C              ; IF>=60C
        JR      CC,CLRDJR

        CALL    FPRTMP
        LD      A,(PRSTMP)
        SUB     A,(RMTMP)
        JR      CS,CLRDJR                 ; IF Tset-Troom < 1C
        CMP     A,0X1
        JR      CS,CLRDJR
        JR      FDJRFF
;
CLRDJR:
        CALL    DJRCLR
        JR      FDJRFF
;
SETDJR:
        SET     (P7).3                    ; SET THE DIANJIA RE
        CLR     (DJRSEC)
FDJRFF:

        CMP     (HTWMIN),0X14             ; CMP WITH 20 MINS
        JR      CS,HTNXTW
        SET     (FLAG5).XTWRN
 
HTNXTW:

        TEST    (FLAG3).HTFCHS
        JR      F,CHSSTR
        TEST    (FLAG2).CSISEND
        JR      F,CHSSTR

        TEST    (P7).0                     ; TEST THE OUT FAN
        JR      F,CSNGYBH
        TEST    (P7).4                     ; TEST THE CMP
        JR      T,CSNGYBH
        CMP     (HTCMIN),0X5A              ; GYBH FOR 90MINS
        JR      CS,EXCSZ
        CLR     (FLAG1).CS10MIN
        JR      CSBGN                      ;  b)
;
CSNGYBH:

        CMP     (CMPMIN),0X5               ;
        JR      CS,CSF8MIN

        TEST    (FLAG1).RMWRN
        JR      F,FWRNCS

        TEST    (FLAG1).RMPWRN
        JR      F,FWRNCS

        CMP     (RMPTMP),0X25              ; CMP 37C
        JR      CC,CSF8MIN
        LD      A,(RMPTMP)
        SUB     A,(RMTMP)
        JR      CS,CSF8MIN
        CMP     A,0X12                     ; CMP WITH 18DU
        JR      CC,CSF8MIN

        CMP     (HTCMIN),0X28              ; RUN 40 MINUTES
        JR      CC,CSBGN

        SET     (FLAG1).CS10MIN
        JR      EXCSZ
;
FWRNCS:
        CMP     (HTCMIN),0X32              ; WRN RUN 50MINS
        JR      CS,EXCSZ
        SET     (FLAG1).CS10MIN
        JR      CSBGN
;
CSF8MIN:
        CLR     (FLAG1).CS10MIN 

EXCSZ:
        JP      EXCS
;
CSBGN:

        SET     (FLAG3).HTFCHS

        CMP     (CSTIMS),0X3               ; IF 3 TIMES CS 8 MINS
        JR      CS,CSBFLW

        SET     (FLAG1).CS10MIN

CSBFLW:
        CLR     (FLAG2).CSISEND
        CLR     (OFFSEC)
        CLR     (OFFMIN)

        CLR     (P7).4                    ; CLOSE THE COMPRESSOR
        SET     (FLAG1).DLY3M
        SET     (FLAG3).VDLY

        CALL    DLY05S

        CLR     (P7).0                    ; CLR THE OUT FAN

        CALL    DLY05S

        NOP

CHSSTR:

        TEST    (FLAG2).CSISEND
        JR      F,CHSEND
        TEST    (P7).4
        JR      F,CSFLW1

        CMP     (OFFMIN),0X1
        JR      CC,CSSTCMP

        CMP     (OFFSEC),0X1E             ; AFTER 30S SECONDS
        JR      CS,CSFLW2

        CLR     (P7).1                    ; CLR THE VALVE

        JR      CSFLW2
;
CSSTCMP:
        SET     (P7).4                    ; SET THE CMP
        CLR     (CMPSEC)
        CLR     (CMPMIN)
        JR      CSFLW2
;
CSFLW1:
        TEST    (FLAG1).CS10MIN
        JR      F,CSTMIS10
        CMP     (CMPMIN),0X6              ; IF CHSHUANG > 6 MINUTES
        JR      CS,CSFLW2
        JR      CHSEND
;
CSTMIS10:
        CMP     (CMPMIN),0X8
        JR      CS,CSFLW2

CHSEND:
        CLR     (P7).4                    ; CLOSE THE CMP
        SET     (FLAG3).VDLY

        SET     (FLAG2).CSISEND

        CMP     (OFFMIN),0X1
        JR      CC,CSEDSTC

        CMP     (OFFSEC),0X1E             ; CHSH END AFTER 30S
        JR      CS,HTMZ88

        SET     (P7).1                    ; SET THE VALVE
        JR      HTMZ88
;
CSEDSTC:

        CLR     (FLAG2).CSISEND
        CLR     (FLAG3).HTFCHS

        CLR     (HTCMSEC)
        CLR     (HTCMIN)

        TEST    (FLAG1).CS10MIN
        JR      F,HSHV10
        INC     (CSTIMS)

        JR      EXCS
;
HSHV10:
        CLR     (CSTIMS)
        JR      EXCS
;
CSFLW2:

        NOP

HTMZ88:
        CMP     (DJRSEC),1                 ; IF DJR OFF 15SEC
        JR      CC,HHSNCFN
        CALL    FANCLR
        JR      HSTOALL
;
HHSNCFN:
        CALL    LOWFAN

HSTOALL:
        CLR     (P0).6                      ; LIGHT THE CHS LED
        JP      ALLMOD
;
EXCS:
        SET     (P7).1                      ; SET THE VALVE

        TEST    (FLAG1).RMWRN               ; IF RMTMP WRN
        JR      F,HTCMPON

        CALL    FPRTMP
        LD      W,(PRSTMP)
        ADD     W,0X2                      ; CMP WITH Tprset + 2C
        LD      A,(RMTMP)
        CMP     A,W
        JR      CC,HTPRTC
        JR      HTFON
;
HTPRTC:
        CALL    CMPCLS                     ; Troom > Tpreset + 2C

        JR      HTFLW2
;
HTFON:

        CALL    FPRTMP
        LD      A,(RMTMP)
        CMP     A,(PRSTMP)
        JR      GT,HTONOFF              ; IF PRSTMP < RMTMP =<  PRSTMP+2

HTCMPON:

        TEST    (FLAG1).RMPWRN          ; IF RMPTMP WRN
        JR      F,HTNOMAL

        CMP     (RMPTMP),0X34           ; CMP WITH 52C
        JR      CC,HTOTOF

        CMP     (RMPTMP),0X30           ; CMP WITH 48C
        JR      CS,HTNOMAL

        JR      HTOTOFF
;
HTOTOF:
        SET     (FLAG3).HI52D
        CLR     (P7).0                  ; CLR THE OUTFAN

        CMP     (RMPTMP),0X3C           ; CMP WITH 60C
        JR      CS,HTOTOFF

        JR      HTPRTC
;
HTNOMAL:

        CLR     (FLAG3).HI52D

        TEST    (P7).4                      ; THE CMP
        JR      T,HTOTOFF
        SET     (P7).0                      ; OUT FAN

HTOTOFF:

        CMP     (VALMMS),0XFA              ; IF VAL RUN 2S
        JR      CS,HTFLW2
        CALL    FCMPON
        JR      HTFLW2
;
HTONOFF:
        TEST    (P7).4                      ; THE CMP
        JR      F,HTCMPON
        NOP

HTFLW2:
        NOP
        TEST    (P7).4                     ; TEST THE CMP
        JR      F,HTCMION
        TEST    (FLAG5).CMPBF
        JR      T,HTIFRPW
        CLR     (FLAG5).CMPBF
        SET     (FLAG5).RPWCYR
        JR      HTIFRPW
;
HTCMION:
        SET     (FLAG5).CMPBF

HTIFRPW:

        TEST    (FLAG1).RMPWRN
        JR      T,HTRMPOK

        CMP     (CMPMIN),0X3               ; IF CMP RUN 3MINS
        JR      CC,HTL46CZ

        CMP     (CMPMIN),0X1
        JR      CC,HTLWFN
        CMP     (CMPSEC),0X1E
        JR      CC,HTLWFN

        TEST    (FLAG5).RPWCYR
        JR      T,HTISFLF 

        CMP     (OFFMIN),0X1
        JR      CC,HTCLRFN
        CMP     (OFFSEC),0X1E            ; OFF 30 SECONDS RUN LOWFAN
        JR      CC,HTCLRFN
        JR      HTLWFN
;
HTL46CZ:
        JR      HTL46C
;
HTRMPOK:

        CMP     (CMPMIN),0X2
        JR      CC,RMPH25

        CMP     (RMPTMP),0X19               ; IF < 25C
        JR      CC,RMPH25

HTISFLF:
        CMP     (DJRSEC),0X1              ; IF DJR OFF
        JR      CC,HTFLW3
  
        TEST    (P7).4                    ; TEST THE CMP
        JR      T,HTFLFN

        CLR     (P0).6                    ; LIGH THE RED LED
        JR      HTCLRFN
;
HTFLFN:
        SET     (P0).6                      ; CLEAR THE CHS LED

HTCLRFN:
        CALL    FANCLR
        JR      HTFLW3
;
RMPH25:
        CMP     (RMPTMP),0X1E             ; IF < 30C
        JR      CC,HTH30C

        CMP     (CMPMIN),0X2
        JR      CC,HTLWFN

        TEST    (P7).7

⌨️ 快捷键说明

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