红外遥控LED电子钟的制作

SET1:  SETB    0CH
        SETB    0EH
        CLR    0DH
        CLR    0FH
        CLR    10H
        CLR    11H
        RET

RED  CJNE    A,#MUTEM,REDO1  ;不是设置键的处理REDO1,2,3,4...
        LJMP    MUTE            ;MUTE?
REDO1:  CJNE    A,#D_OFF,DO_SET2
        LJMP    DIS_OFF        ;关闭显示
DO_SET2:JB      0CH,SET2        ;时间设置的处理
        RET

SET2:  CJNE    A,#UPU,SET2A
        LJMP    INC1            ;+加(^)
SET2A:  CJNE    A,#DOWND,SET2B
        LJMP    DEC2            ;- 减
SET2B:  CJNE    A,#RIGHTR,SET2C
        LJMP    RIGHT          ;RIGHT右移(>)
SET2C:  CJNE    A,#LEFTL,SET2D
        LJMP    LEFT            ;LEFT左移(<)
SET2D:  CJNE    A,#RECALL,SET2EXT ;DS1302初始化
        LJMP    SET1302
SET2EXT:RET
;--------------------------------INC------------------------
INC1:  JB      0EH,INCH
        JB      0FH,INCM
        JB      10H,INC_H
        JB      11H,INC_M
        RET

INC_H:  INC    6BH              ;闹钟小时增加
        MOV    A,6BH
        CJNE    A,#24D,INCH3
        MOV    6BH,#0
INCH3:  MOV    R1,#0C2H
        MOV    R0,6BH
        ACALL  SETONE            ;写入DS1302
        RET

INC_M:  INC    6AH              ;闹钟分增加
        MOV    A,6AH
        CJNE    A,#60D,INCH4
        MOV    6AH,#0
INCH4:  MOV    R1,#0C0H
        MOV    R0,6AH
        ACALL  SETONE            ;
        RET

INCH:  ;INC    62H              ;
        MOV    6FH,62H
        ACALL  BCD_HEX
        INC    A
        CJNE    A,#24D,INCH1
        MOV    A,#0
INCH1:  MOV    6FH,A
        ACALL  HEX_BCD
        MOV    62H,A
        MOV    R1,#84H
        MOV    R0,62H
        ACALL  SETONE            ;
        RET

INCM:  ;INC    61H              ;
        MOV    6FH,61H
        ACALL  BCD_HEX
        INC    A
        CJNE    A,#60D,INCH2
        MOV    A,#0
INCH2:  MOV    6FH,A
        ACALL  HEX_BCD
        MOV    61H,A
        MOV    R1,#82H
        MOV    R0,61H
        ACALL    SETONE            ;
        RET

;----------------------------------DEC----------------------
DEC2:  JB      0EH,DECH
        JB      0FH,DECM
        JB      10H,DEC_H
        JB      11H,DEC_M
        RET
DECH:  MOV    6FH,62H
        ACALL  BCD_HEX
        DEC    A
        CJNE    A,#0FFH,DECH1
        MOV    A,#23
DECH1:  MOV    6FH,A
        ACALL  HEX_BCD
        MOV    62H,A
        MOV    R1,#84H
        MOV    R0,62H
        ACALL  SETONE
        RET

DECM:  MOV    6FH,61H
        ACALL  BCD_HEX
        DEC    A
        CJNE    A,#0FFH,DECM1
        MOV    A,#59
DECM1:  MOV    6FH,A
        ACALL  HEX_BCD
        MOV    61H,A
        MOV    R1,#82H
        MOV    R0,61H
        ACALL  SETONE
        RET

DEC_H:  DEC    6BH
        MOV    A,6BH
        CJNE    A,#0FFH,DECH3
        MOV    6BH,#23D
DECH3:  MOV    R1,#0C2H
        MOV    R0,6BH
        ACALL  SETONE
        RET

DEC_M:  DEC    6AH
        MOV    A,6AH
        CJNE    A,#0FFH,DECH4
        MOV    6AH,#59D
DECH4:  MOV    R1,#0C0H
        MOV    R0,6AH
        ACALL  SETONE
        RET
;--------------------------------RIGHT----------------------
RIGHT:  JB      0EH,RIGHT1
        JB      0FH,RIGHT2
        JB      10H,RIGHT3
        JB      11H,RIGHT4
        RET                      ;右移
RIGHT1: CLR    0EH
        SETB    0FH
        RET
RIGHT2: CLR    0FH
        SETB    10H
        RET

上一页  [1] [2] [3] [4] [5] [6]  下一页

本文关键字：制作  电子钟  时钟-定时电路，电子制作 - 时钟-定时电路