1947|1

410

帖子

3

TA的资源

纯净的硅(高级)

楼主
 

【BL606P-DVK开发板】驱动LED数码管 [复制链接]

  本帖最后由 TL-LED 于 2022-12-31 14:09 编辑

测试下LED数据管模块TM1638驱动。

 

一、硬件连接

使用开发板的GPIO3,GPIO4,GPIO5连接TM1638模块的STB,CLK和DIO。

 

二、程序

2.1、tm1638.c

#include <aos/aos.h>
#include <stdio.h>
#include <sys_clk.h>
#include "app_main.h"
#include <drv/gpio.h>

#include <aos/hal/gpio.h>
#include <drv/pin.h>
#include "tm1638.h"

gpio_dev_t gpio_stb = { GPIO_PIN_3, OUTPUT_PUSH_PULL, NULL };
gpio_dev_t gpio_clk= { GPIO_PIN_4, OUTPUT_PUSH_PULL, NULL };
gpio_dev_t gpio_dio = { GPIO_PIN_5, OUTPUT_PUSH_PULL, NULL };

uint8_t const tab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71};
uint8_t ds_log[8]={0x40,0x7c,0x38,0x7d,0x3f,0x7d,0x73,0x40};
							
void tm1638_WriteDat(uint8_t dat)                        
{
	uint8_t i;
	for(i=0;i<8;i++)
	{
		clk_l();
		if(dat&0X01)
		{
			dio_h();
		}        
		else
		{
			dio_l();
		}
		dat>>=1;
		clk_h();
        }
}

void tm1638_WriteCmd(uint8_t cmd)                 
{
	stb_l();
	tm1638_WriteDat(cmd);
	stb_h();
}

void tm1638_Write_Addr(uint8_t addr,uint8_t dat)                 
{
	tm1638_WriteCmd(0x44);
	stb_l();
	tm1638_WriteDat(0xc0|addr);
	tm1638_WriteDat(dat);
	stb_h();
}

void tm1638_Write_LED(uint8_t LED_flag)                                         
{
	uint8_t i;
	for(i=0;i<8;i++)
	{
		if(LED_flag&(1<<i))
		{
			tm1638_Write_Addr(2*i+1,1);
		}
		else
		{
			tm1638_Write_Addr(2*i+1,0);
		}
	}
}

void init_tm1638(void)
{
	uint8_t i;
	csi_pin_set_mux( GPIO_PIN_3, PIN_FUNC_GPIO);
	csi_pin_set_mux( GPIO_PIN_4, PIN_FUNC_GPIO);
	csi_pin_set_mux( GPIO_PIN_5, PIN_FUNC_GPIO);
	hal_gpio_init(&gpio_stb);
	hal_gpio_init(&gpio_clk);
	hal_gpio_init(&gpio_dio);
	
	hal_gpio_output_low(&gpio_stb);
	hal_gpio_output_low(&gpio_clk);
	hal_gpio_output_low(&gpio_dio);
        

	tm1638_WriteCmd(0x8b);
	tm1638_WriteCmd(0x40);
	stb_l();
	tm1638_WriteDat(0xc0);   
	for(i=0;i<16;i++)           
	{
		tm1638_WriteDat(0x00);
	}
	stb_h();
	for(i=0;i<8;i++)
	{
        tm1638_Write_Addr(i<<1,tab[0]);                       
	}
}

 void disp_led(uint8_t *dat)
 {
	uint8_t i;
	for(i=0;i<8;i++)
	{
		tm1638_Write_Addr(i<<1,tab[dat]);                        
	} 
 }

 void disp_log(void)
 {
	uint8_t i;
	for(i=0;i<8;i++)
	{
		tm1638_Write_Addr(i<<1,ds_log);                        
	} 
 }

 

2.2、tm1638.h


#ifndef TM1638_H_
#define TM1638_H_

#define dio_l()         hal_gpio_output_low(&gpio_dio)
#define dio_h()        hal_gpio_output_high(&gpio_dio)

#define clk_l()         hal_gpio_output_low(&gpio_clk)
#define clk_h()        hal_gpio_output_high(&gpio_clk)

#define stb_l()         hal_gpio_output_low(&gpio_stb)
#define stb_h()        hal_gpio_output_high(&gpio_stb)

void init_tm1638(void);

void disp_led(uint8_t *dat);
void disp_log(void);

#endif

 

2.3、main.c


/*
 * Copyright (C) 2015-2020 Alibaba Group Holding Limited
 */

#include <aos/aos.h>
#include <stdio.h>
#include <sys_clk.h>
#include "app_main.h"
#include <drv/gpio.h>
#include "led.h"
#include "tm1638.h"

int main(int argc, char *argv[])
{
	int i=0;
	uint8_t dispbuf[8];
	uint32_t cnt=0;
	
    board_yoc_init();
	init_led();
	init_tm1638();
    
    printf("\r\napp start core clock %d........\r\n", soc_get_cur_cpu_freq());
	
	disp_log();
	aos_msleep(2000);
    
    //codec_output_init();
    //codec_input_init();
    //codec_loop_init();
	for(i=0;i<8;i++)
	{
		dispbuf=0;
	}
	while(1)
	{
		i++;
		printf("zhanghui %d\r\n",i);
		
		set_ledr();
		clr_ledg();
		clr_ledb();
		aos_msleep(100);
		
		clr_ledr();
		set_ledg();
		clr_ledb();
		aos_msleep(100);
		
		clr_ledr();
		clr_ledg();
		set_ledb();
		aos_msleep(100);
		
		clr_ledr();
		clr_ledg();
		clr_ledb();
		aos_msleep(100);
		
		if(cnt>999)
		{
				cnt=0;
		}
		cnt++;
		dispbuf[4]=cnt/1000;
		dispbuf[5]=(cnt%1000)/100;
		dispbuf[6]=((cnt%1000)%100)/10;
		dispbuf[7]=((cnt%1000)%100)%10;
		disp_led(dispbuf);
	}
    return 0;
}

 

三、程序运行

 

20221230235628

 

最新回复

效果视频看TM1638驱动没问题   详情 回复 发表于 2022-12-31 18:16
点赞 关注
 
 

回复
举报

6587

帖子

0

TA的资源

五彩晶圆(高级)

沙发
 

效果视频看TM1638驱动没问题

 
 
 

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

随便看看
查找数据手册?

EEWorld Datasheet 技术支持

相关文章 更多>>
关闭
站长推荐上一条 1/10 下一条

 
EEWorld订阅号

 
EEWorld服务号

 
汽车开发圈

About Us 关于我们 客户服务 联系方式 器件索引 网站地图 最新更新 手机版

站点相关: 国产芯 安防电子 汽车电子 手机便携 工业控制 家用电子 医疗电子 测试测量 网络通信 物联网

北京市海淀区中关村大街18号B座15层1530室 电话:(010)82350740 邮编:100190

电子工程世界版权所有 京B2-20211791 京ICP备10001474号-1 电信业务审批[2006]字第258号函 京公网安备 11010802033920号 Copyright © 2005-2024 EEWORLD.com.cn, Inc. All rights reserved
快速回复 返回顶部 返回列表