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

📄 hhh.asm

📁 基于51单片机Atmel89C554开发的染色机源程序
💻 ASM
📖 第 1 页 / 共 5 页
字号:
        MOV     A,@R1
        SWAP    A
        MOV     B,A
        INC     R1
        MOV     A,@R1
        ORL     A,B
        MOV     5DH,A
        MOV     30H,#00H
        INC     R1
        MOV     A,@R1
        MOV     31H,A
        INC     R1
        MOV     A,@R1
        MOV     32H,A
        INC     R1
        MOV     A,@R1
        MOV     33H,A
        LCALL   IDTB
        MOV     A,R3
        MOV     R2,A
        MOV     A,R4
        MOV     R3,A
        MOV     R1,#37H
        LCALL   INTF
        MOV     R1,#0D6H
        MOV     30H,#00H
        MOV     31H,#00H
        MOV     A,@R1
        MOV     32H,A
        INC     R1
        MOV     A,@R1
        MOV     33H,A
        LCALL   IDTB
        MOV     A,R3
        MOV     R2,A
        MOV     A,R4
        MOV     R3,A
        MOV     R1,#3AH
        LCALL   INTF
        LCALL   PWM2
BWRUN8: JB      40H,BWRUN9
        LCALL   RWDJS
        LCALL   BWDIS
        LCALL   BWMB
        LCALL   SJDISA
        SETB    40H
        CLR     41H
        AJMP    BWRUN9
BWRUNA: SETB    44H
        JNB     79H,BWRUN8
BWRUN9: LCALL   MJSQ
        JC      BWRUN5
        CLR     A
        MOV     40H,A
        LCALL   FZJSQ1
BWRUN5: LCALL   SJDISA
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        LCALL   RWDJS
        JNB     70H,BBB1
        LCALL   OUT0
        JB      70H,BWRUNA
BBB1:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        SETB    1DH
        SETB    35H
        MOV     R0,#0DAH
        MOV     R1,#37H
        LCALL   FSUB
        MOV     R1,#0C7H
        LCALL   FSTR
        MOV     A,R4
        JB      ACC.7,BWRUN2
        MOV     R0,#82H
        CLR     A
        MOV     @R0,A
        MOV     R2,#00H
        MOV     R3,#02H
        CLR     3CH
        MOV     R1,#0CDH
        LCALL   INTF
        MOV     R0,#0C7H
        LCALL   FSUB
        MOV     A,R4
        JB      ACC.7,WCXY2C
        MOV     R0,#83H
        MOV     A,@R0
        CJNE    A,#0FFH,BWRUNB
        SETB    22H             ;报警
        SETB    31H
        CLR     1FH
        CLR     2FH
        LCALL   L595W
        LJMP    BWRUN4
BWRUNB: INC     A
        MOV     @R0,A
        LJMP    BWRUN4
WCXY2C: MOV     R0,#83H
        CLR     A
        MOV     @R0,A
        CLR     22H             ;报警
        CLR     31H
        CLR     1FH
        CLR     2FH
        CLR     18H
        CLR     2EH
        LCALL   L595W
        LJMP    BWRUN4
BWRUN2: MOV     R0,#83H
        CLR     A
        MOV     @R0,A
        MOV     R0,#82H
        MOV     A,@R0
        CJNE    A,#0FFH,BWRUN3
        CLR     18H
        CLR     2EH
        SETB    1FH
        SETB    2FH
        CLR     22H             ;报警
        CLR     31H
        LCALL   L595W
        LJMP    BWRUN4
BWRUN3: INC     A
        MOV     @R0,A
BWRUN4: CLR     C
        MOV     A,5FH
        SUBB    A,5DH
        JC      BWRUN7
        MOV     3DH,37H
        MOV     3EH,38H
        MOV     3FH,39H
BWEND:  INC     0CH
        CLR     22H             ;报警
        CLR     31H
        CLR     1FH
        CLR     2FH
        CLR     18H
        CLR     2EH
        CLR     40H
        CLR     44H
        CLR     A
        MOV     40H,A
        MOV     41H,A
        MOV     42H,A
        MOV     43H,A
        MOV     44H,A
        MOV     5EH,A
        MOV     5FH,A
        MOV     R0,#82H
        CLR     A
        MOV     @R0,A
        INC     R0
        MOV     @R0,A
        LCALL   L595W
        LJMP    GYRUN1
BWRUN7: LJMP    BWRUNA
MDM1:   LJMP    MDRUNM
MDM2:   LJMP    MDRUNO
MDM3:   LJMP    MDRUNR
MDM4:   LJMP    MDRUNU
MDRUN1: JB      71H,MDM1
        JB      72H,MDM2
        JB      73H,MDM3
        JB      74H,MDM4
        MOV     R1,#0D1H
        MOV     A,@R1
        MOV     34H,A
        INC     R1
        MOV     A,@R1
        MOV     B,#0AH
        MUL     AB
        MOV     B,A
        INC     R1
        MOV     A,@R1
        ADD     A,B
        MOV     35H,A
        INC     R1
        MOV     A,@R1
        MOV     36H,A
        INC     R1
        MOV     A,@R1
        MOV     37H,A
        MOV     38H,A
        MOV     30H,#00H
        MOV     31H,#00H
        INC     R1
        MOV     A,@R1
        MOV     32H,A
        INC     R1
        MOV     A,@R1
        MOV     33H,A
        LCALL   IDTB
        MOV     A,R3
        MOV     R2,A
        MOV     A,R4
        MOV     R3,A
        MOV     R1,#3AH
        LCALL   INTF
        LCALL   PWM2
        CLR     A
        MOV     40H,A
        MOV     5FH,A
        MOV     5EH,A
MDRUNM: JB      40H,MDRUNN
        LCALL   MDDIS
        MOV     R6,#02H
        MOV     R7,#00H
        MOV     DPTR,#LCD46
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#01H
        MOV     DPTR,#LCD48
        LCALL   DISHZ
        SETB    40H
        CLR     41H
        LJMP    MDRUNN
MDRUN2: JNB     79H,MDRUNM
MDRUNN: LCALL   MSJDIS
        LCALL   RWDJS
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        JNB     70H,MMMA
        LCALL   OUT0
        JB      70H,MDRUN2
MMMA:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        SETB    71H
        SETB    1AH         ;FORWARD
        SETB    36H
        SETB    1DH
        SETB    35H
        LCALL   L595W
        LCALL   MJSQ
        JC      MDRUN3
        CLR     A
        MOV     40H,A
        MOV     A,5FH
        ADD     A,#01H
        DA      A
        MOV     5FH,A
        MOV     AUXR,#00H
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
MDRUN3: MOV     A,5FH
        CLR     C
        SUBB    A,34H
        JC      MDRUN2
        CLR     71H
        MOV     40H,#00H
        MOV     AUXR,#00H
        CLR     A
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
        MOV     5FH,A
        CLR     40H
MDRUNO: JB      40H,MDRUNP
        LCALL   MDDIS
        MOV     R6,#02H
        MOV     R7,#00H
        MOV     DPTR,#LCD44
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#01H
        MOV     DPTR,#LCD50
        LCALL   DISHZ
        SETB    40H
        CLR     41H
        AJMP    MDRUNP
MDRUN4: JNB     79H,MDRUNO
MDRUNP: SETB    72H
        LCALL   MSJDIS2
        LCALL   RWDJS
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        JNB     70H,MMMB
        LCALL   OUT0
        JB      70H,MDRUN4
MMMB:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     A,40H
        MOV     AUXR,#00H
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
MMDRUN: CLR     1AH      ;FORWARD
        CLR     36H
        SETB    1DH
        SETB    35H
        LCALL   L595W
        CLR     C
        MOV     A,40H
        SUBB    A,35H
        JC      MDRUN4
        CLR     72H
        CLR     40H
        MOV     5FH,#00H
        MOV     40H,#00H
        MOV     A,37H
        CLR     C
        SUBB    A,#02H
        JC      MDRUNY
        MOV     37H,A
        LJMP    MDRUN2
MDRUNY: MOV     40H,#00H
        MOV     5FH,#00H
        CLR     40H
MDRUNR: JB      40H,MDRUNS
        LCALL   MDDIS
        MOV     R6,#02H
        MOV     R7,#00H
        MOV     DPTR,#LCD47
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#01H
        MOV     DPTR,#LCD48
        LCALL   DISHZ
        SETB    40H
        CLR     41H
        AJMP    MDRUNS
MDRUN5: JNB     79H,MDRUNR
MDRUNS: SETB    73H
        LCALL   MSJDIS
        LCALL   RWDJS
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        JNB     70H,MMMC
        LCALL   OUT0
        JB      70H,MDRUN5
MMMC:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        SETB    1BH
        SETB    37H
        SETB    1DH
        SETB    35H
        LCALL   L595W    ;REVERSE
        LCALL   MJSQ
        JC      MDRUN6
        CLR     A
        MOV     40H,A
        MOV     A,5FH
        ADD     A,#01H
        DA      A
        MOV     5FH,A
        MOV     AUXR,#00H
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
MDRUN6: MOV     A,5FH
        CLR     C
        SUBB    A,36H
        JC      MDRUN5
        CLR     73H
        CLR     40H
        MOV     40H,#00H
        MOV     AUXR,#00H
        CLR     A
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
        MOV     5FH,A
MDRUNU: JB      40H,MDRUNV
        LCALL   MDDIS
        MOV     R6,#02H
        MOV     R7,#00H
        MOV     DPTR,#LCD44
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#01H
        MOV     DPTR,#LCD50
        LCALL   DISHZ
        SETB    40H
        CLR     41H
        AJMP    MDRUNV
MDRUN7: JNB     79H,MDRUNU
MDRUNV: SETB    74H
        LCALL   MSJDIS2
        LCALL   RWDJS
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        JNB     70H,MMMD
        LCALL   OUT0
        JB      70H,MDRUN7
MMMD:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     A,40H
        MOV     AUXR,#00H
        MOV     DPTR,#15DH
        MOVX    @DPTR,A
MNDRUN: CLR     1BH      ;REVERSE
        CLR     37H
        SETB    1DH
        SETB    35H
        LCALL   L595W
        CLR     C
        MOV     A,40H
        SUBB    A,35H
        JC      MDRUN7
        CLR     74H
        MOV     40H,#00H
        MOV     5FH,#00H
        CLR     40H
        MOV     A,38H
        CLR     C
        SUBB    A,#02H
        JC      MDDD1
        MOV     38H,A
        LJMP    MDRUN5
MDDD1:  CLR     A
        MOV     40H,A
        MOV     41H,A
        MOV     42H,A
        MOV     43H,A
        MOV     44H,A
        MOV     5EH,A
        MOV     5FH,A
        MOV     R0,#82H
        CLR     A
        MOV     @R0,A
        INC     R0
        MOV     @R0,A
        CLR     40H
        INC     0CH
        LJMP    GYRUN1
MSJDIS: JB      79H,MSJDIS1
        MOV     A,5FH
        MOV     16H,A
        ANL     A,#0F0H
        SWAP    A
        LCALL   DISA
        MOV     R6,#03H
        MOV     R7,#0BH
        LCALL   LCPZF
        MOV     A,16H
        ANL     A,#0FH
        LCALL   DISA
        INC     R7
        LCALL   LCPZF
MSJDIS1:RET
MSJDIS2:JB      79H,MSJDIS3
        MOV     A,40H
        MOV     B,#0AH
        DIV     AB
        MOV     16H,B
        LCALL   DISA
        MOV     R6,#03H
        MOV     R7,#0BH
        LCALL   LCPZF
        MOV     A,16H
        LCALL   DISA
        INC     R7
        LCALL   LCPZF
MSJDIS3:RET
QXRUNQ: JB      44H,QXRUN2
        MOV     R1,#0D4H
        MOV     A,@R1
        SWAP    A
        MOV     B,A
        INC     R1
        MOV     A,@R1
        ORL     A,B
        MOV     5DH,A
        MOV     30H,#00H
        MOV     31H,#00H
        INC     R1
        MOV     A,@R1
        MOV     32H,A
        INC     R1
        MOV     A,@R1
        MOV     33H,A
        LCALL   IDTB
        MOV     A,R3
        MOV     R2,A
        MOV     A,R4
        MOV     R3,A
        MOV     R1,#3AH
        LCALL   INTF
        LCALL   PWM2
QXRUN5: JB      40H,QXRUN6
        LCALL   QXDIS
        LCALL   MSJDIS
        LCALL   RWDJS
        SETB    40H
        CLR     41H
        AJMP    QXRUN6
QXRUN2: SETB    44H
        JNB     79H,QXRUN5
QXRUN6: LCALL   MSJDIS
        LCALL   RWDJS
        LCALL   KAY
        LCALL   RDFSZ
        LCALL   AIBIN
        JNB     70H,QQQ2
        LCALL   OUT0
        JB      70H,QXRUN2
QQQ2:   MOV     R6,#02H
        MOV     R7,#06H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        MOV     R6,#02H
        MOV     R7,#07H
        MOV     DPTR,#LCD99
        LCALL   DISHZ
        SETB    1EH     ;进水
        SETB    2CH
        SETB    27H     ;溢流
        SETB    2BH
        SETB    1DH
        SETB    35H
        LCALL   L595W
        LCALL   MJSQ
        JC      QXRUN3
        CLR     A
        MOV     40H,A
        MOV     A,5FH
        ADD     A,#01H
        DA      A
        MOV     5FH,A
        MOV     AUXR,#00H
        MOV     DPTR,#15DH

⌨️ 快捷键说明

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