久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 6739|回復: 12
打印 上一主題 下一主題
收起左側

tm1638單片機程序+仿真模塊 TM1638.DLL

  [復制鏈接]
跳轉到指定樓層
樓主
ID:137643 發表于 2020-7-23 14:13 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
tm1638仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機源程序如下:
  1. #ifndef        _TM1638_H
  2. #define        _TM1638_H

  4. #include        <REGX51.H>

  6. #define        DATA_COMMAND        0X40
  7. #define        DISP_COMMAND        0x80
  8. #define        ADDR_COMMAND        0XC0

  10. //TM1638模塊引腳定義
  11. sbit        DIO=P1^0;
  12. sbit        CLK=P1^1;
  13. sbit        STB=P1^2;

  15. //共陰數碼管顯示代碼
  16. unsigned char code tab[]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,
  17.                            0x7F,0x6F,0x77,0x7C,0x39,0x5E,0x79,0x71};


  20. void TM1638_Write(unsigned char        DATA)                        //寫數據函數
  21. {
  22.         unsigned char i;
  23.         for(i=0;i<8;i++)
  24.         {
  25.                 CLK=0;
  26.                 if(DATA&0X01)
  27.                         DIO=1;
  28.                 else
  29.                         DIO=0;
  30.                 DATA>>=1;
  31.                 CLK=1;
  32.         }
  33. }
  34. unsigned char TM1638_Read(void)                                        //讀數據函數
  35. {
  36.         unsigned char i;
  37.         unsigned char temp=0;
  38.         DIO=1;        //設置為輸入
  39.         for(i=0;i<8;i++)
  40.         {
  41.                 temp>>=1;
  42.                 CLK=0;
  43.                 if(DIO)
  44.                         temp|=0x80;
  45.                 CLK=1;
  46.         }
  47.         return temp;
  48. }
  49. void Write_COM(unsigned char cmd)                //發送命令字
  50. {
  51.         STB=0;
  52.         TM1638_Write(cmd);
  53.         STB=1;
  54. }
  55. unsigned char Read_key(void)
  56. {
  57.         unsigned char c[4],i,key_value=0;
  58.         STB=0;
  59.         TM1638_Write(0x42);                           //讀鍵掃數據 命令
  60.         for(i=0;i<4;i++)               
  61.                 c[i]=TM1638_Read();
  62.         STB=1;                                                   //4個字節數據合成一個字節
  63.         for(i=0;i<4;i++)
  64.                 key_value|=c[i]<<i;
  65.         for(i=0;i<8;i++)
  66.                 if((0x01<<i)==key_value)
  67.                         break;
  68.         return i;
  69. }
  70. void Write_DATA(unsigned char add,unsigned char DATA)                //指定地址寫入數據
  71. {
  72.         Write_COM(0x44);
  73.         STB=0;
  74.         TM1638_Write(0xc0|add);
  75.         TM1638_Write(DATA);
  76.         STB=1;
  77. }
  78. /*
  79. void Write_oneLED(unsigned char num,unsigned char flag)        //單獨控制一個LED函數，num為需要控制的led序號，flag為0時熄滅，不為0時點亮
  80. {
  81.         if(flag)
  82.                 Write_DATA(2*num+1,1);
  83.         else
  84.                 Write_DATA(2*num+1,0);
  85. }          */
  86. void Write_allLED(unsigned char LED_flag)                                        //控制全部LED函數，LED_flag表示各個LED狀態
  87. {
  88.         unsigned char i;
  89.         for(i=0;i<8;i++)
  90.                 {
  91.                         if(LED_flag&(1<<i))
  92.                                 //Write_DATA(2*i+1,3);
  93.                                 Write_DATA(2*i+1,1);
  94.                         else
  95.                                 Write_DATA(2*i+1,0);
  96.                 }
  97. }

  99. //TM1638初始化函數
  100. void init_TM1638(void)
  101. {
  102.         unsigned char i;
  103.         Write_COM(0x8b);       //亮度 (0x88-0x8f)8級亮度可調
  104.         Write_COM(0x40);       //采用地址自動加1
  105.         STB=0;                           //
  106.         TM1638_Write(0xc0);    //設置起始地址

  108.         for(i=0;i<16;i++)           //傳送16個字節的數據
  109.                 TM1638_Write(0x00);
  110.         STB=1;
  111. }
  112. #endif
復制代碼

TM1638.DLL文件要放到MODELS目錄里面才能仿真,還有LIBRARY目錄的文件也要放進去,要用Proteus7.8版本:
TM1638C51仿真和程序.zip (86.13 KB, 下載次數: 216)


評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏4 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

來自 2#
ID:262 發表于 2022-1-7 23:33 | 只看該作者
wwh2382 發表于 2020-8-3 21:03
將tm1638.dll放到models文件夾，運行仿真文件還是報錯，請問該怎么辦？

需要用Proteus7.5版本才行,我測試了

51hei.gif (40.84 KB, 下載次數: 191)

51hei.gif

51hei.png (30.97 KB, 下載次數: 193)

51hei.png
回復

使用道具 舉報

板凳
ID:748788 發表于 2020-8-3 21:03 | 只看該作者
將tm1638.dll放到models文件夾，運行仿真文件還是報錯，請問該怎么辦？

回復

使用道具 舉報

地板
ID:5501 發表于 2021-4-8 23:03 | 只看該作者
樓主好 最近在學習這個1638芯片，我的按鍵數碼管是 接的GRID5 GRID8 4個數碼管，這個程序該修改哪里呢
回復

使用道具 舉報

5#
ID:795427 發表于 2021-12-14 17:24 | 只看該作者
這仿真電路，明顯看到短路了。
回復

使用道具 舉報

6#
ID:1000645 發表于 2022-1-7 23:12 | 只看該作者
非常不錯
回復

使用道具 舉報

7#
ID:1004029 發表于 2022-2-3 20:55 | 只看該作者
將tm1638.dll放到models文件夾，運行仿真文件還是報錯，請問該怎么辦？
回復

使用道具 舉報

8#
ID:262 發表于 2022-2-4 06:11 | 只看該作者
mengfanhua2022 發表于 2022-2-3 20:55
將tm1638.dll放到models文件夾，運行仿真文件還是報錯，請問該怎么辦？

需要用Proteus7.5這個版本 其他都不行  你看我在樓上發的動圖
回復

使用道具 舉報

9#
ID:967056 發表于 2022-12-4 10:12 | 只看該作者
唉，沒首先自己實踐一遍，看了大家的加復就安裝了個7.5版本，后來事實證明8.13版本是可以仿真的！不知道那些說只有7.5能仿真的人是咋操作的
回復

使用道具 舉報

10#
ID:14806 發表于 2023-2-2 14:52 | 只看該作者
不知道能不能仿真成功？
回復

使用道具 舉報

11#
ID:981841 發表于 2023-4-19 16:44 | 只看該作者
仿真出錯誤是為什么
回復

使用道具 舉報

12#
ID:13282 發表于 2024-3-22 22:24 | 只看該作者
8.7 SP3 仿真成功!
回復

使用道具 舉報

13#
ID:1112584 發表于 2024-4-19 16:43 | 只看該作者
tm1638.dll是怎么做出來的？
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 日韩一区二区三区在线观看 | 亚洲精品永久免费 | 精品久久久久久18免费网站 | 午夜免费观看网站 | 亚洲高清电影 | 九九精品在线 | 在线观看中文字幕 | 久久婷婷香蕉热狠狠综合 | 欧美偷偷| 亚洲永久入口 | 日韩av啪啪网站大全免费观看 | 久久大陆 | 欧美在线视频网 | 九九伦理电影 | 中文日韩字幕 | 久久久久国产一级毛片 | 中文在线视频 | 日韩毛片网| 99国内精品久久久久久久 | 亚洲成网站| 亚洲一区二区三区四区五区中文 | 国产小视频在线观看 | 国产精品色 | 国产精品一区一区 | 亚洲精品久久久 | 亚洲欧洲精品一区 | 日韩一区二区三区在线观看 | 日韩av一区二区在线 | 亚洲欧美网站 | 中文字幕亚洲一区二区va在线 | 欧美精品电影一区 | 国产最新网址 | 丝袜美腿av | 伊人二区 | 久久网一区二区 | 亚洲国产第一页 | 日本免费视频 | 国产精品久久久久aaaa九色 | 国产精品久久久久久久久久久久久 | 成年免费大片黄在线观看岛国 | 国产精品国色综合久久 |