找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 15803|回復(fù): 16
打印 上一主題 下一主題
收起左側(cè)

自制模塊，徹底理解單片機(jī)TM1621D段碼液晶并點亮 附程序

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:137736 發(fā)表于 2020-2-18 10:43 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
手頭有壞電子秤的段碼液晶，從網(wǎng)上買的段碼液晶屏帶有TM1621D。TM1621D與HT1621結(jié)構(gòu)相同，只是引腳少，段碼少但容易業(yè)余制作。正好利用這兩種材料，自制段碼液晶模塊，并用普中開發(fā)板調(diào)試通過。

程序來自網(wǎng)上修改，權(quán)力歸原創(chuàng)作者所有。


連接TM1621D模塊，
程序編譯后HEX文件下載到單片機(jī)
關(guān)掉下載程序，打開串口調(diào)試助手，設(shè)置4800波特率，
數(shù)據(jù)位8停止位1，無校驗無流控制，
勾選HEX發(fā)送，輸入80-8F之間的數(shù)據(jù)，顯示地址0-F。
輸入數(shù)據(jù)0d-16，1602顯示SEG數(shù)字，TM1621
對應(yīng)段點亮。
注意5v電壓下程序BASE選1/2.選1/3全亮。
3v選1/3BASE
COM誤接成SEG，開機(jī)初始化即顯示88。
背光限流電阻1K，白天亮度略低。
VLCD電阻選10k.
段碼每位由兩個地址構(gòu)成，每個地址4位數(shù)據(jù)（4段）
用串口調(diào)試助手發(fā)送必須輸成兩位
80（數(shù)據(jù)）0b-16(可串發(fā))選定時發(fā)送10ms/次
清零：800b0c0d0e0f10111213141516
先81，再輸入0b-16中的任意數(shù)字，顯示對應(yīng)段。
82
84
88
測試段
全顯示：8f0b0c0d0e0f10111213141516

單片機(jī)源程序如下:
  1. /*-****************************************
  2. 名稱：TM1621
  3. ******************************************/
  4. #include "TM1621.h"
  5. #include<reg52.h>
  6. #include "intrins.h"                                         //包含nop指令頭文件
  7. #define uchar unsigned char                                 //數(shù)據(jù)類型宏定義
  8. #define uint unsigned int                                 //數(shù)據(jù)類型宏定義
  9. #define nop _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //宏定義
  10. /******************以下TM1621模塊命令定義*********************/
  11. #define SYSDIS   0x00         //關(guān)系統(tǒng)振蕩器和LCD偏壓發(fā)生器
  12. #define SYSEN    0x02    //打開系統(tǒng)振蕩器

  14. #define LCDOFF   0x04     //關(guān)LCD偏壓
  15. #define LCDON    0x06     //開LCD偏壓

  17. #define TONEON   0x12     //打開聲音輸出
  18. #define TONEOFF  0x10     //關(guān)閉聲音輸出

  20. #define XTAL     0x28     //外部接晶振
  21. #define RC       0x30     //內(nèi)部RC振蕩

  23. #define BIAS     0x52     //1/3偏壓 4公共口,0X52=1/2偏壓

  25. #define WDTDIS   0x0a     //禁止看門狗
  26. #define WDTEN    0x0e     //開啟看門狗

  28. /********************定義控制端口**********************/
  29. sbit CS=P2^2;
  30. sbit READ=P2^0;//無用
  31. sbit WRITE=P2^1;
  32. sbit DATA=P2^0;


  35. /********************延時函數(shù)*************************/
  36. void delay_nms(uint n)
  37. {
  38.         uint i;
  39.         while (n--)
  40.                 for (i=0;i<500;i++);
  41. }

  43. /********************從高位寫入數(shù)據(jù)*************************/
  44. void Write_Data_H(uchar Data, uchar Cnt)           //Data的高cnt位寫入TM1621，高位在前
  45. {
  46.         uchar i;
  47.         for (i=0;i<Cnt;i++)
  48.         {
  49.                 WRITE=0;
  50.                 if (Data&0x80)                                 //從最高位發(fā)送
  51.                         DATA=1;
  52.                 else
  53.                         DATA=0;
  54.                 nop;
  55.                 nop;
  56.                 WRITE=1;
  57.                 Data<<=1;
  58.         }
  59.         WRITE=0;
  60.         DATA=0;
  61. }

  63. /********************從低位寫入數(shù)據(jù)*************************/
  64. void Write_Data_L(uchar Data,uchar Cnt)        //Data 的低cnt位寫入TM1621，低位在前
  65. {
  66.         unsigned char i;
  67.         for (i=0;i<Cnt;i++)
  68.         {
  69.                 WRITE=0;
  70.                 if (Data&0x01)                               //從低位發(fā)送
  71.                         DATA=1;
  72.                 else
  73.                         DATA=0;
  74.                 nop;
  75.                 nop;
  76.                 WRITE=1;
  77.                 Data>>=1;
  78.         }
  79.         WRITE=0;
  80.         DATA=0;
  81. }

  83. /********************寫入控制命令*************************/
  84. void WriteCmd(uchar Cmd)
  85. {
  86.         CS=0;
  87.         nop;
  88.         Write_Data_H(0x80,4);     //寫入命令標(biāo)志100
  89.         Write_Data_H(Cmd,8);      //寫入命令數(shù)據(jù)
  90.         CS=1;
  91.         nop;
  92. }

  94. /*********指定地址寫入數(shù)據(jù)，實際寫入后4位************/
  95. void WriteOneData(uchar Addr, uchar Data)
  96. {
  97.         CS=0;
  98.         Write_Data_H(0xa0,3);     //寫入數(shù)據(jù)標(biāo)志101
  99.         Write_Data_H(Addr<<2,6);  //寫入地址數(shù)據(jù)(A5-A4-A3-A2-A1-A0)從高位開始寫數(shù)據(jù)
  100.         Write_Data_L(Data,4);     //寫入數(shù)據(jù)
  101.         CS=1;
  102.         nop;
  103. }

  105. /*********連續(xù)寫入方式，每次數(shù)據(jù)為8位，寫入數(shù)據(jù)************
  106. void WriteAllData(uchar Addr,uchar *p,uchar cnt)
  107. {
  108. uchar i;
  109. CS=0;
  110. Write_Data_H(0xa0,3);      //寫入數(shù)據(jù)標(biāo)志101
  111. Write_Data_H(Addr<<2,6);   //寫入地址數(shù)據(jù)
  112. for(i=0;i<cnt;i++)            //寫入數(shù)據(jù)
  113. {
  114.    Write_Data_L(*p,8);
  115.    p++;
  116. }
  117. CS=1;
  118. nop;
  119. }
  120. ***************這個子程序暫時沒用，注釋掉******************/


  123. /*******************TM1621初始化**********************/
  124. void TM1621_init()
  125. {
  126.         CS=1;
  127.         WRITE=1;
  128.         DATA=1;       
  129.         nop;
  130.         delay_nms(1);
  131.         WriteCmd(BIAS);                 //1/3偏壓 4公共口
  132.         WriteCmd(RC);                         //內(nèi)部RC振蕩
  133.         WriteCmd(SYSDIS);                 //關(guān)系統(tǒng)振蕩器和LCD偏壓發(fā)生器
  134.         WriteCmd(WDTDIS);                 //禁止看門狗
  135.         WriteCmd(SYSEN);                 //打開系統(tǒng)振蕩器
  136.         WriteCmd(LCDON);                 //開LCD偏壓
  137.        
  138. }
  139. /*************TM1621清屏函數(shù)*****************/
  140. void Clear1621()
  141. {
  142. uchar i;
  143. for(i=9;i<22;i++)
  144. {
  145. WriteOneData(i, 0x00);
  146. }
  147. }
  148. /*******************************************************************************
  149. * 函數(shù)名稱                   ：1621顯示函數(shù)顯示
  150. * 函數(shù)功能                   :
  151. * 輸    入         : 無
  152. * 輸    出         : 無
  153. *******************************************************************************/
  154. void Disp1621(uchar Addr, uchar Data)
  155. {
  156. WriteOneData(Addr, Data);
  157. }
復(fù)制代碼
全部資料51hei下載地址：
完全調(diào)試通過的1602和TM1621程序.rar (1.91 MB, 下載次數(shù): 483)

評分

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

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏16 分享淘帖 頂頂1 踩踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:328014 發(fā)表于 2020-2-20 15:42 | 只看該作者
好資料，51黑有你更精彩!!!
回復(fù)

使用道具 舉報

板凳
ID:149451 發(fā)表于 2020-3-3 16:30 | 只看該作者
好資料！我最近也在玩pt1621b,米字管的，用最笨的方法繪的真值表。
回復(fù)

使用道具 舉報

地板
ID:149451 發(fā)表于 2020-3-3 16:45 | 只看該作者
LZ，你的資料打不開呀。重新傳一下吧。謝謝
回復(fù)

使用道具 舉報

5#
ID:137736 發(fā)表于 2020-3-9 20:45 | 只看該作者
w1179benp 發(fā)表于 2020-3-3 16:45
LZ，你的資料打不開呀。重新傳一下吧。謝謝

我下了，能夠正常打開。這個壓縮的winRAR版本高。你裝個高版本的RAR吧。我以前也遇到過類似問題。
回復(fù)

使用道具 舉報

6#
ID:350320 發(fā)表于 2020-5-12 13:45 | 只看該作者
謝謝分享�。。。。。。。。。。。。�！
回復(fù)

使用道具 舉報

7#
ID:767356 發(fā)表于 2020-6-2 14:16 | 只看該作者
WRITE=1;
Data<<=1;     請問這里為什么要移位呢？
回復(fù)

使用道具 舉報

8#
ID:767571 發(fā)表于 2020-6-2 15:49 | 只看該作者
謝謝分享�。。。。。。�！
回復(fù)

使用道具 舉報

9#
ID:137736 發(fā)表于 2022-1-14 21:59 來自手機(jī) | 只看該作者
491612982 發(fā)表于 2020-6-2 14:16
WRITE=1;
Data

發(fā)送完了，要左移一位再發(fā)送。在一個循環(huán)內(nèi)。
回復(fù)

使用道具 舉報

10#
ID:412814 發(fā)表于 2022-9-27 19:59 | 只看該作者
感謝樓主分享，剛開始學(xué)這部分，希望能學(xué)會。
回復(fù)

使用道具 舉報

11#
ID:1045132 發(fā)表于 2023-2-2 08:14 | 只看該作者

直接左移0x01
代碼看起來更簡潔
回復(fù)

使用道具 舉報

12#
ID:14806 發(fā)表于 2023-2-2 14:53 | 只看該作者

感謝樓主分享，剛開始學(xué)這部分，希望能學(xué)會
回復(fù)

使用道具 舉報

13#
ID:929051 發(fā)表于 2023-4-10 21:33 | 只看該作者

感謝樓主分享，剛開始學(xué)這部分，希望能學(xué)會。
回復(fù)

使用道具 舉報

14#
ID:1064915 發(fā)表于 2023-4-11 08:38 | 只看該作者
有HT1621，與51開發(fā)板如何連接
回復(fù)

使用道具 舉報

15#
ID:921750 發(fā)表于 2023-10-6 20:19 | 只看該作者
感謝樓主分享，摸了好久的程序一直卡在這部分，下載試試先。
回復(fù)

使用道具 舉報

16#
ID:137736 發(fā)表于 2023-10-15 11:41 | 只看該作者
joyb 發(fā)表于 2023-4-11 08:38
有HT1621，與51開發(fā)板如何連接

看代碼定義控制口段的定義。
回復(fù)

使用道具 舉報

17#
ID:673671 發(fā)表于 2024-7-13 16:31 | 只看該作者
大神，太強(qiáng)了，666

回復(fù)

使用道具 舉報

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

本版積分規(guī)則

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

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表