推扬网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
推扬网 门户 你问我答 查看内容

魏子涵:电子秒表设计与制作

2020-8-11 14:09| 发布者: admin| 查看: 45| 评论: 0

摘要: linrong的回答: 这里提供一个电子时钟程序作为参考,按需要修改为合适的程序。 8951与8952及89C2051的程序完全兼容。区别仅是引出脚数(IO数)的不同 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; AT89C2051 ...

linrong的回答:

这里提供一个电子时钟程序作为参考,按需要修改为合适的程序。

8951与8952及89C2051的程序完全兼容。区别仅是引出脚数(IO数)的不同

 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           AT89C2051时钟程序         ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ;  定时器T0、T1溢出周期为50MS,T0为秒计数用, T1为调整时闪烁用, ;   P3.7为调整按钮,P1口 为字符输出口,采用共阳显示管。 ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           中断入口程序              ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;               ORG 0000H        ;程序执行开始地址               LJMP      START  ;跳到标号START执行               ORG 0003H        ;外中断0中断程序入口               RETI             ;外中断0中断返回               ORG 000BH        ;定时器T0中断程序入口            LJMP      INTT0  ;跳至INTTO执行               ORG 0013H        ;外中断1中断程序入口            RETI             ;外中断1中断返回            ORG 001BH        ;定时器T1中断程序入口            LJMP      INTT1  ;跳至INTT1执行            ORG 0023H        ;串行中断程序入口地址               RETI             ;串行中断程序返回 ;  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  ;;           主 程 序                 ;;  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;             START: MOV   R0,#70H           ;清70H-7AH共11个内存单元                    MOV   R7,#0BH           ;        CLEARDISP:  MOV   @R0,#00H           ;                    INC   R0             ;                    DJNZ  R7,CLEARDISP   ;                    MOV   20H,#00H          ;清20H(标志用)                    MOV   7AH,#0AH       ;放入"熄灭符"数据                    MOV       TMOD,#11H      ;设T0、T1为16位定时器                    MOV   TL0,#0B0H        ;50MS定时初值(T0计时用)                    MOV   TH0,#3CH        ;50MS定时初值                    MOV   TL1,#0B0H        ;50MS定时初值(T1闪烁定时用)                    MOV   TH1,#3CH          ;50MS定时初值                    SETB  EA             ;总中断开放                    SETB  ET0            ;允许T0中断                    SETB  TR0            ;开启T0定时器                    MOV   R4,#14H        ;1秒定时用初值(50MS×20)            START1: LCALL DISPLAY        ;调用显示子程序                    JNB       P3.7,SETMM1    ;P3.7口为0时转时间调整程序                    SJMP  START1         ;P3.7口为1时跳回START1             SETMM1:      LJMP SETMM     ;转到时间调整程序SETMM ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           1秒计时程序              ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;T0中断服务程序             INTT0: PUSH  ACC           ;累加器入栈保护                    PUSH  PSW           ;状态字入栈保护                    CLR   ET0           ;关T0中断允许                    CLR   TR0           ;关闭定时器T0                    MOV   A,#0B7H       ;中断响应时间同步修正                    ADD   A,TL0         ;低8位初值修正                    MOV   TL0,A         ;重装初值(低8位修正值)                    MOV   A,#3CH        ;高8位初值修正                    ADDC  A,TH0         ;                    MOV   TH0,A         ;重装初值(高8位修正值)                    SETB  TR0           ;开启定时器T0                    DJNZ  R4, OUTT0         ;20次中断未到中断退出            ADDSS:  MOV       R4,#14H           ;20次中断到(1秒)重赋初值                    MOV       R0,#71H           ;指向秒计时单元(71H-72H)                    ACALL ADD1              ;调用加1程序(加1秒操作)                    MOV   A,R3              ;秒数据放入A(R3为2位十进制数组合)                    CLR       C                 ;清进位标志                   CJNE  A,#60H,ADDMM      ;            ADDMM:  JC         OUTT0             ;小于60秒时中断退出                    ACALL CLR0              ;大于或等于60秒时对秒计时单元清0                    MOV       R0,#77H           ;指向分计时单元(76H-77H)                    ACALL ADD1              ;分计时单元加1分钟                    MOV       A,R3              ;分数据放入A                    CLR   C                 ;清进位标志                    CJNE  A,#60H,ADDHH      ;             ADDHH: JC       OUTT0             ;小于60分时中断退出                    ACALL CLR0              ;大于或等于60分时分计时单元清0                    MOV       R0,#79H           ;指向小时计时单元(78H-79H)                    ACALL ADD1              ;小时计时单元加1小时                    MOV   A,R3              ;时数据放入A                    CLR   C                 ;清进位标志                    CJNE  A,#24H,HOUR       ;              HOUR: JC    OUTT0             ;小于24小时中断退出                    ACALL CLR0              ;大于或等于24小时小时计时单元清0             OUTT0: MOV   72H,76H           ;中断退出时将分、时计时单元数据移                    MOV   73H,77H           ;入对应显示单元                    MOV   74H,78H           ;                    MOV   75H,79H           ;                    POP       PSW               ;恢复状态字(出栈)                    POP   ACC               ;恢复累加器                    SETB  ET0               ;开放T0中断                    RETI                    ;中断返回 ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           闪动调时 程 序            ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;T1中断服务程序,用作时间调整时调整单元闪烁指示 INTT1:          PUSH    ACC                ;中断现场保护                 PUSH    PSW                ;                 MOV     TL1,   #0B0H       ;装定时器T1定时初值                 MOV     TH1,   #3CH              ;                 DJNZ    R2,INTT1OUT              ;0.3秒未到退出中断(50MS中断6次)                 MOV     R2,#06H                  ;重装0.3秒定时用初值                 CPL     02H                      ;0.3秒定时到对闪烁标志取反                 JB      02H,FLASH1                ;02H位为1时显示单元"熄灭"                 MOV     72H,76H       ;02H位为0时正常显示                 MOV     73H,77H       ;                 MOV     74H,78H       ;                 MOV     75H,79H       ; INTT1OUT:       POP     PSW              ;恢复现场                 POP     ACC           ;                 RETI                  ;中断退出 FLASH1:         JB      01H,FLASH2    ;01H位为1时,转小时熄灭控制                 MOV     72H,7AH       ;01H位为0时,"熄灭符"数据放入分                 MOV     73H,7AH       ;显示单元(72H-73H),将不显示分数据                 MOV     74H,78H       ;                 MOV     75H,79H       ;                 AJMP    INTT1OUT      ;转中断退出 FLASH2:         MOV     72H,76H       ;01H位为1时,"熄灭符"数据放入小时                 MOV     73H,77H       ;显示单元(74H-75H),小时数据将不显示                 MOV     74H,7AH       ;                 MOV     75H,7AH       ;                 AJMP    INTT1OUT      ;转中断退出

linrong的回答:

这里提供一个电子时钟程序作为参考,按需要修改为合适的程序。

8951与8952及89C2051的程序完全兼容。区别仅是引出脚数(IO数)的不同

 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           AT89C2051时钟程序         ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ;  定时器T0、T1溢出周期为50MS,T0为秒计数用, T1为调整时闪烁用, ;   P3.7为调整按钮,P1口 为字符输出口,采用共阳显示管。 ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           中断入口程序              ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;               ORG 0000H        ;程序执行开始地址               LJMP      START  ;跳到标号START执行               ORG 0003H        ;外中断0中断程序入口               RETI             ;外中断0中断返回               ORG 000BH        ;定时器T0中断程序入口            LJMP      INTT0  ;跳至INTTO执行               ORG 0013H        ;外中断1中断程序入口            RETI             ;外中断1中断返回            ORG 001BH        ;定时器T1中断程序入口            LJMP      INTT1  ;跳至INTT1执行            ORG 0023H        ;串行中断程序入口地址               RETI             ;串行中断程序返回 ;  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  ;;           主 程 序                 ;;  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;             START: MOV   R0,#70H           ;清70H-7AH共11个内存单元                    MOV   R7,#0BH           ;        CLEARDISP:  MOV   @R0,#00H           ;                    INC   R0             ;                    DJNZ  R7,CLEARDISP   ;                    MOV   20H,#00H          ;清20H(标志用)                    MOV   7AH,#0AH       ;放入"熄灭符"数据                    MOV       TMOD,#11H      ;设T0、T1为16位定时器                    MOV   TL0,#0B0H        ;50MS定时初值(T0计时用)                    MOV   TH0,#3CH        ;50MS定时初值                    MOV   TL1,#0B0H        ;50MS定时初值(T1闪烁定时用)                    MOV   TH1,#3CH          ;50MS定时初值                    SETB  EA             ;总中断开放                    SETB  ET0            ;允许T0中断                    SETB  TR0            ;开启T0定时器                    MOV   R4,#14H        ;1秒定时用初值(50MS×20)            START1: LCALL DISPLAY        ;调用显示子程序                    JNB       P3.7,SETMM1    ;P3.7口为0时转时间调整程序                    SJMP  START1         ;P3.7口为1时跳回START1             SETMM1:      LJMP SETMM     ;转到时间调整程序SETMM ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           1秒计时程序              ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;T0中断服务程序             INTT0: PUSH  ACC           ;累加器入栈保护                    PUSH  PSW           ;状态字入栈保护                    CLR   ET0           ;关T0中断允许                    CLR   TR0           ;关闭定时器T0                    MOV   A,#0B7H       ;中断响应时间同步修正                    ADD   A,TL0         ;低8位初值修正                    MOV   TL0,A         ;重装初值(低8位修正值)                    MOV   A,#3CH        ;高8位初值修正                    ADDC  A,TH0         ;                    MOV   TH0,A         ;重装初值(高8位修正值)                    SETB  TR0           ;开启定时器T0                    DJNZ  R4, OUTT0         ;20次中断未到中断退出            ADDSS:  MOV       R4,#14H           ;20次中断到(1秒)重赋初值                    MOV       R0,#71H           ;指向秒计时单元(71H-72H)                    ACALL ADD1              ;调用加1程序(加1秒操作)                    MOV   A,R3              ;秒数据放入A(R3为2位十进制数组合)                    CLR       C                 ;清进位标志                   CJNE  A,#60H,ADDMM      ;            ADDMM:  JC         OUTT0             ;小于60秒时中断退出                    ACALL CLR0              ;大于或等于60秒时对秒计时单元清0                    MOV       R0,#77H           ;指向分计时单元(76H-77H)                    ACALL ADD1              ;分计时单元加1分钟                    MOV       A,R3              ;分数据放入A                    CLR   C                 ;清进位标志                    CJNE  A,#60H,ADDHH      ;             ADDHH: JC       OUTT0             ;小于60分时中断退出                    ACALL CLR0              ;大于或等于60分时分计时单元清0                    MOV       R0,#79H           ;指向小时计时单元(78H-79H)                    ACALL ADD1              ;小时计时单元加1小时                    MOV   A,R3              ;时数据放入A                    CLR   C                 ;清进位标志                    CJNE  A,#24H,HOUR       ;              HOUR: JC    OUTT0             ;小于24小时中断退出                    ACALL CLR0              ;大于或等于24小时小时计时单元清0             OUTT0: MOV   72H,76H           ;中断退出时将分、时计时单元数据移                    MOV   73H,77H           ;入对应显示单元                    MOV   74H,78H           ;                    MOV   75H,79H           ;                    POP       PSW               ;恢复状态字(出栈)                    POP   ACC               ;恢复累加器                    SETB  ET0               ;开放T0中断                    RETI                    ;中断返回 ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;           闪动调时 程 序            ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;T1中断服务程序,用作时间调整时调整单元闪烁指示 INTT1:          PUSH    ACC                ;中断现场保护                 PUSH    PSW                ;                 MOV     TL1,   #0B0H       ;装定时器T1定时初值                 MOV     TH1,   #3CH              ;                 DJNZ    R2,INTT1OUT              ;0.3秒未到退出中断(50MS中断6次)                 MOV     R2,#06H                  ;重装0.3秒定时用初值                 CPL     02H                      ;0.3秒定时到对闪烁标志取反                 JB      02H,FLASH1                ;02H位为1时显示单元"熄灭"                 MOV     72H,76H       ;02H位为0时正常显示                 MOV     73H,77H       ;                 MOV     74H,78H       ;                 MOV     75H,79H       ; INTT1OUT:       POP     PSW              ;恢复现场                 POP     ACC           ;                 RETI                  ;中断退出 FLASH1:         JB      01H,FLASH2    ;01H位为1时,转小时熄灭控制                 MOV     72H,7AH       ;01H位为0时,"熄灭符"数据放入分                 MOV     73H,7AH       ;显示单元(72H-73H),将不显示分数据                 MOV     74H,78H       ;                 MOV     75H,79H       ;                 AJMP    INTT1OUT      ;转中断退出 FLASH2:         MOV     72H,76H       ;01H位为1时,"熄灭符"数据放入小时                 MOV     73H,77H       ;显示单元(74H-75H),小时数据将不显示                 MOV     74H,7AH       ;                 MOV     75H,7AH       ;                 AJMP    INTT1OUT      ;转中断退出


鲜花

握手

雷人

路过

鸡蛋

最新评论

热门推荐
最新资讯

广告服务|投稿要求|禁言标准|版权说明|免责声明|手机版|小黑屋|推扬网 ( 粤ICP备18134897号 )|网站地图 | 邮箱:vayae@hotmail.com

GMT+8, 2025-6-15 12:52 , Processed in 0.070971 second(s), 29 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

返回顶部