找回密码
 立即注册

QQ登录

只需一步,快速开始

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

TM1651单片机驱动代码分享给大家

[复制链接]
跳转到指定楼层
楼主
为了能让没有黑币的也可以使用,我就直接贴代码,有问题可以相互学习,一同进步QQ:2074561566


#include "reg52.h"
#include "intrins.h"//包含_nop_()指令头文件
//引脚定义
sbit CLK=P1^0; //定义CLK
sbit DIO=P1^1; //定义DIO


#define nop _nop_();_nop_();_nop_();_nop_();_nop_();//宏定义
/********************定义数据*************************/
unsigned char code CODE[10]= {0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F,}; //共阳数码管0~9字型码
unsigned char code TAB[10]= {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,}; //数码管不显示
/********************延时函数,延时nms******************/
void delay_nms(unsigned int n) {
    unsigned int i;
    while(n--)
        for(i=0; i<550; i++);
}
/********************Start函数*************************/
void I2CStart() {
    DIO=1;
    CLK=1;
    nop;
    DIO=1;
    nop;
    DIO=0;
    nop;
    CLK=0;
}
/********************Stop函数*************************/
void I2CStop() {
    CLK=0;
    nop;
    nop;
    DIO=0;
    nop;
    nop;
    CLK=1;
    nop;
    nop;
    nop;
    DIO=1;
    nop;
    CLK=0;
    DIO=0;
}
/***************发送8bit数据,从低位开始**************/
void I2CWritebyte(unsigned char oneByte) {
    unsigned char i;
    for(i=0; i<8; i++) {
        CLK=0;
        if(oneByte&0x01) {
            DIO=1;
        } else {
            DIO=0;
        }
        nop;
        CLK=1;
        oneByte=oneByte>>1;
    }
//8位数据传送完
    CLK=0;//判断芯片发过来的ACK应答信号
    nop;
    while(DIO==1);
    nop;
    CLK=1;
    nop;
}
/************显示函数,地址自加一************/
void disp0(unsigned char *p) {
    unsigned char i;
    I2CStart();
    I2CWritebyte(0x40);  //数据命令设置:地址自动加1,写数据到显示寄存器
    I2CStop();
    I2CStart();
    I2CWritebyte(0xc0);  //地址命令设置:初始地址为00H
    for(i=0; i<4; i++) { //发送4字节数据到显存
        I2CWritebyte(*p);
        p++;
    }
    I2CStop();
    I2CStart();
    I2CWritebyte(0x8C); //显示控制命令:开显示,脉冲宽度为11/16.
    I2CStop();
}
/************显示函数,固定地址写数据************/
void Seg_Shows(unsigned char add, unsigned char value) {
    I2CStart();
    I2CWritebyte(0x44); //数据命令设置:固定地址,写数据到显示寄存器
    I2CStop();
    I2CStart();
    I2CWritebyte(add);//地址命令设置:写入add对应地址
    I2CWritebyte(CODE[value]);//给add地址写数据
    I2CStop();
    I2CStart();
    I2CWritebyte(0x8C);//显示控制命令:开显示,脉冲宽度为11/16.
    I2CStop();
}

//主函数代码
void main(void){

while(1){

Seg_Shows(0xc0,1);
Seg_Shows(0xc1,2);
Seg_Shows(0xc2,3);
Seg_Shows(0xc3,4);

  }
}

数码管接线图
www点titanmec点com/index.php/product/view/id/300.html
数据线时钟线接P1^1 P1^0
本程序在89C52/12C5AXXX单片机上测试通过


评分

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

查看全部评分

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

使用道具 举报

沙发
ID:878399 发表于 2022-7-25 17:53 | 只看该作者
请问楼主,tm1651的dip16的引脚图与贴片式的引脚图一致吗,那边是第一引脚啊
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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