STM32 驱动TM1650 程序源码

时间: 2023-10-24 16:04:32 浏览: 83
以下是STM32驱动TM1650的程序源码,仅供参考: ``` #include "stm32f10x.h" #include "stdio.h" #define SDA_OUT() GPIOB->CRL &= 0XFF0FFFFF; GPIOB->CRL |= 0X00300000 #define SDA_IN() GPIOB->CRL &= 0XFF0FFFFF; GPIOB->CRL |= 0X00800000 #define TM1650_SCL_H() GPIOB->BSRR = GPIO_Pin_12 #define TM1650_SCL_L() GPIOB->BRR = GPIO_Pin_12 #define TM1650_SDA_H() GPIOB->BSRR = GPIO_Pin_13 #define TM1650_SDA_L() GPIOB->BRR = GPIO_Pin_13 u8 TM1650_Table[] = {0x3F, 0x06, 0x5B, 0x4F, 0x66, 0x6D, 0x7D, 0x07, 0x7F, 0x6F, 0x77, 0x7C, 0x39, 0x5E, 0x79, 0x71}; void TM1650_Start(void) { SDA_OUT(); TM1650_SDA_H(); TM1650_SCL_H(); delay_us(2); TM1650_SDA_L(); delay_us(2); TM1650_SCL_L(); delay_us(2); } void TM1650_Stop(void) { SDA_OUT(); TM1650_SCL_L(); TM1650_SDA_L(); delay_us(2); TM1650_SCL_H(); TM1650_SDA_H(); delay_us(2); } void TM1650_WriteByte(u8 dat) { u8 i; SDA_OUT(); for(i=0; i<8; i++) { if((dat<<i)&0x80) TM1650_SDA_H(); else TM1650_SDA_L(); delay_us(2); TM1650_SCL_H(); delay_us(2); TM1650_SCL_L(); delay_us(2); } } void TM1650_Display(u8 *buf) { u8 i; TM1650_Start(); TM1650_WriteByte(0x44); TM1650_Stop(); TM1650_Start(); TM1650_WriteByte(0x40); for(i=0; i<4; i++) { TM1650_WriteByte(TM1650_Table[buf[i]]); } TM1650_Stop(); TM1650_Start(); TM1650_WriteByte(0x8f); TM1650_Stop(); } int main(void) { u8 buf[4] = {0, 1, 2, 3}; GPIO_InitTypeDef GPIO_InitStructure; RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE); GPIO_InitStructure.GPIO_Pin = GPIO_Pin_12 | GPIO_Pin_13; GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz; GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; GPIO_Init(GPIOB, &GPIO_InitStructure); while(1) { buf[0]++; if(buf[0] > 9) { buf[0] = 0; buf[1]++; } if(buf[1] > 9) { buf[1] = 0; buf[2]++; } if(buf[2] > 9) { buf[2] = 0; buf[3]++; } if(buf[3] > 9) { buf[3] = 0; } TM1650_Display(buf); delay_ms(500); } } ``` 注:上述代码仅供参考,具体实现方式可能因不同的STM32型号和开发板而有所不同。

相关推荐

最新推荐

recommend-type

关于STM32驱动TM1812的一些经验

这段时间一直在用STM32驱动TM1812,期间遇到了不少的问题,网上搜贴却很难找到解决方法,所以笔者将这段时间来遇到的问题逐一简述,希望对用到TM1812的朋友有所帮助。
recommend-type

STM32单片机驱动LCD1602液晶程序

最近看到网上很多人都在找STM32单片机驱动LCD1602液晶程序,有的人写的比较复杂刚好自己最近也在搞STM32单片机。就花了点时间写出一份仅供参考和学习。单片机IO驱动能力弱这里用的是10K上拉电阻,也可以采用74HC245...
recommend-type

基于STM32的事件驱动框架的应用

传统嵌入式单片机开发中...将量子框架中的 QF 框架充当软件总线,利用事件分发机制和活动对象划分在异步事件处理上的优势,从而得出基于STM32 的事件驱动框架可以扩展嵌入式单片机的灵活性,丰富嵌入式系统功能开发的结论
recommend-type

STM32 按键检测程序

PA13 PA15 是JTAG的引脚。 所以JTAG 插上 模拟时候,不准去的。 只有调到SWD 模式 PA15 才能用。 PA13是SWDIO PA14 SWCLK 复用时候一定要注意。实验结果: DS0 交替闪烁 当按下KEY1 时候 DS1亮。...
recommend-type

基于STM32单片机流水灯仿真与程序设计

STM32单片机流水灯仿真与程序设计 摘要 本次程序设计和仿真是基于Proteus和keil的环境对STM32F103系列单片机进行流水灯设计,通过配置STM32的GPIO工作模式,实现LED的点亮和熄灭;通过配置8位流水灯程序设计,实现灯...
recommend-type

zigbee-cluster-library-specification

最新的zigbee-cluster-library-specification说明文档。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

实现实时数据湖架构:Kafka与Hive集成

![实现实时数据湖架构:Kafka与Hive集成](https://img-blog.csdnimg.cn/img_convert/10eb2e6972b3b6086286fc64c0b3ee41.jpeg) # 1. 实时数据湖架构概述** 实时数据湖是一种现代数据管理架构,它允许企业以低延迟的方式收集、存储和处理大量数据。与传统数据仓库不同,实时数据湖不依赖于预先定义的模式,而是采用灵活的架构,可以处理各种数据类型和格式。这种架构为企业提供了以下优势: - **实时洞察:**实时数据湖允许企业访问最新的数据,从而做出更明智的决策。 - **数据民主化:**实时数据湖使各种利益相关者都可
recommend-type

SQL怎么实现 数据透视表

SQL可以通过使用聚合函数和GROUP BY子句来实现数据透视表。 例如,假设有一个销售记录表,其中包含产品名称、销售日期、销售数量和销售额等信息。要创建一个按照产品名称、销售日期和销售额进行汇总的数据透视表,可以使用以下SQL语句: ``` SELECT ProductName, SaleDate, SUM(SaleQuantity) AS TotalQuantity, SUM(SaleAmount) AS TotalAmount FROM Sales GROUP BY ProductName, SaleDate; ``` 该语句将Sales表按照ProductName和SaleDat
recommend-type

JSBSim Reference Manual

JSBSim参考手册,其中包含JSBSim简介,JSBSim配置文件xml的编写语法,编程手册以及一些应用实例等。其中有部分内容还没有写完,估计有生之年很难看到完整版了,但是内容还是很有参考价值的。