找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2429|回复: 0
打印 上一主题 下一主题
收起左侧

单片机心率计数码管共阴极显示 protues+程序

[复制链接]
跳转到指定楼层
楼主
经过几天的调试,终于成功了,自己做个心率计,你也来试试吧。看不懂得有视频讲解哈


单片机源程序如下:
数码管一部分显示心跳次数,一部分显示时间,够60秒停止计数
心率传感器电路模拟用的是时钟信号,设个合适的频率
程序部分
XINLVGEWEI EQU 35H ;给内存RAM空间中的31H单元起名XINLVGEWEI
XINLVSHIWEI EQU 36H ;给内存RAM空间中的32H单元起名XINLVSHIWEI
XINLVBAIWEI   EQU 33H ;给内存RAM空间中的33H单元起名XINLVBAIWEI
MIAO EQU 34H ; 给内存RAM空间中的34H单元起名MIAO
MIAOGEWEI EQU 31H ;给内存RAM空间中的35H单元起名MIAOGEWEI
MIAOSHIWEI EQU 32H ;给内存RAM空间中的36H单元起名MIAOSHIWEI
XINLVSHU EQU 37H ;给37H单元起名XINLVSHU(存储心跳次数)
ORG 0000H ;复位时程序从此开始
SJMP START ;跳到START进行初始化
ORG 0003H ;外部引脚P3.2中断入口
AJMP INT0 ;跳转到标号INT0处(外部中断服务子程序)
ORG 000BH ;定时器T0中断入口
AJMP TIMER0 ;跳转到标号TIMER0处(定时器中断服务子程序)
ORG 0030H ;初始化程序从30H开始
;-----------------------------初始化-------------------------
START:MOV SP, #60H ;给堆栈指针赋值60H
MOV P0, #0FFH ;让P0口输出高电平,小灯熄灭
MOV DPTR,#TAB ;把显示段码数据表头地址赋给DPTR
MOV 30H,#0 ;给30H赋值0,(30H单元存放定时50ms的次数)
MOV XINLVSHU,#0 ;给XINLVSHU赋值0
MOV MIAO,#0 ;给秒赋初始值0
MOV TMOD ,#00000001B;T0工作在定时方式,模式1
MOV TH0,#3CH ;给TH0赋值3CH
MOV TL0,#0B0H ;给TL0赋值B0H
SETB TR0 ;启动定时器T0开始工作
SETB ET0 ;开定时器T0中断允许
SETB EX0 ;开外部P3.2引脚中断
SETB IT0 ;P3.2引脚下降沿产生中断信号
SETB EA ;开总中断允许
;------------------------------主程序----------------------
MAIN:CALL CHUFA ;调处理子程序完成除法任务
CALL DISPLAY ;调显示子程序
SJMP MAIN ;程序跳转到MAIN处
;-------------------------CHUFA子程序---------------
CHUFA:MOV A, XINLVSHU ;XINLVSHU中的数据拷贝给A
MOV B, #100 ;给寄存器B赋值100
DIV AB ;用A除以B,结果在A中(百位),余数在B中
MOV XINLVBAIWEI, A ;百位的结果放在XINLVBAIWEI中
MOV A , B ;把B中的余数拷贝给A
MOV B, #10 ;给B中赋值10
DIV AB ;用A除以B,结果在A中(十位),余数在B中(个位)
MOV XINLVSHIWEI, A ;A中的数拷贝给XINLVSHIWEI
MOV XINLVGEWEI ,B ;B中的数据拷贝给XINLVGEWEI
MOV A, MIAO ;把秒拷贝个A
MOV B, #10 ;给B中赋值10
DIV AB ;用A除以B,结果在A中(十位),余数在B中(个位)
MOV MIAOSHIWEI, A ;把A(秒的十位)拷贝给MIAOSHIWEI
MOV MIAOGEWEI, B ;把B(秒个位)拷贝给MIAOGEWEI
RET ;子程序返回

全部资料51hei下载地址:
阴极心率计通过.rar (69.79 KB, 下载次数: 20)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表