下载此文档

t1638测试程序.doc


文档分类:行业资料 | 页数:约7页 举报非法文档有奖
1/7
下载提示
  • 1.该资料是网友上传的,本站提供全文预览,预览什么样,下载就什么样。
  • 2.下载该文档所得收入归上传者、原创者。
  • 3.下载的文档,不会出现我们的网址水印。
1/7 下载此文档
文档列表 文档介绍
再来一个按键测试的程序:这个是另外的,与上面的无关;#ifndef _TM1638_H#define _TM1638_H#include <>#define MAND 0X40#define MAND 0x80#define MAND 0XC0//引脚定义sbit DIO=P1^0;sbit CLK=P1^1;sbit STB=P1^2;unsignedcharcodetab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71,0x40};voidTM1638_Write(unsignedchar DATA) //写数据函数{ unsignedchari; for(i=0;i<8;i++) { CLK=0; if(DATA&0X01) DIO=1; else DIO=0; DATA>>=1; CLK=1; }}unsignedcharTM1638_Read(void) //读数据函数{ unsignedchari; unsignedchartemp=0; DIO=1; //设置为输入 for(i=0;i<8;i++) { temp>>=1; CLK=0; if(DIO) temp|=0x80; CLK=1; } returntemp;}(unsignedcharcmd) //发送命令字{ STB=0; TM1638_Write(cmd); STB=1;}unsignedcharRead_key(void){ unsignedcharc[4],i,key_value=0; STB=0; TM1638_Write(0x42); for(i=0;i<4;i++) c[i]=TM1638_Read(); STB=1; //4个字节数据合成一个字节 for(i=0;i<4;i++) key_value|=c[i]; for(i=0;i<4;i++) if(c[i]==key_value) break; return(i*8+key_value);}voidWrite_DATA(unsignedcharadd,unsignedcharDATA) //指定地址写入数据{ (0x44); STB=0; TM1638_Write(0xc0|add); TM1638_Write(DATA); STB=1;}/*voidWrite_oneLED(unsignedcharnum,unsignedcharflag) //单独控制一个LED函数,num为需要控制的led序号,flag为0时熄灭,不为0时点亮{ if(flag) Write_DATA(2*num+1,1); else Write_DATA(2*num+1,0);} voidWrite_allLED(unsignedcharLED_flag) //控制全部LED函数,LED_flag表示各个LED状态{ unsignedchari; for(i=0;i<8;i++) { if(LED_flag&(1<<i)) Write_DATA(2*i+1,3); else Write_DATA(2*i+1,0); }} */voidinit_TM1638(void){ unsignedchari;

t1638测试程序 来自淘豆网www.taodocs.com转载请标明出处.

相关文档 更多>>
非法内容举报中心
文档信息
  • 页数7
  • 收藏数0 收藏
  • 顶次数0
  • 上传人gdntv68
  • 文件大小43 KB
  • 时间2020-06-29