標題: 單片機TM1650驅(qū)動+紅外遙控解碼源程序 [打印本頁]
作者: liuhailan5757    時間: 2021-3-6 13:20
標題: 單片機TM1650驅(qū)動+紅外遙控解碼源程序
N年前在網(wǎng)上買了一個TM1650的測試版，今天突然看到了，倒騰了一下。寫了個程序。希望對大家有用，不喜勿噴。


單片機源程序如下:
  1. /*程序功能：TM1650驅(qū)動程序加紅外遙控解碼程序 。遙控解碼后顯示在數(shù)碼管上
  2.   IO  分配：查看位定義
  3.   時鐘頻率：11.0592MHz
  4.   版    本：VER0
  5.   作    者：劉海蘭
  6.   日    期：2021.03.06
  7.   備    注：如果要在程序中使用此代碼,請在程序中注明使用了51黑單片機liuhailan5757博主的程序
  8.             但是由此造成的后果與本博主無關(guān)，  
  9. */
  10. #include<stc15.h>
  11. sbit scl = P3^3; //TM1650時鐘通訊IO
  12. sbit sda = P3^2;//TM1650數(shù)據(jù)通訊IO
  13. sbit ir  = P3^4;//紅外輸入口
  14. sbit led = P3^5;//測試用指示燈，在調(diào)試紅外遙控時可用
  15. unsigned char ir_time = 0;        //紅外信號的時間，這個寄存器是為了在解碼0/1（數(shù)據(jù)）的時候，用來計低電平的時間
  16. bit ir_d = 0;//紅外信號的高低標志位，
  17. bit ir_ok = 0;//解碼OK
  18. unsigned char shuwei = 0;//解碼的長度
  19. unsigned char shuwei1 = 0;//解碼的長度
  20. unsigned char buzhou = 0;//解碼的步驟
  21. unsigned char ir_dat = 0;//紅外的8位數(shù)據(jù)
  22. unsigned char num[]={0,0,0,0};//紅外的4組8位的數(shù)據(jù)，就是用戶碼，用戶碼反碼，數(shù)據(jù)碼，數(shù)據(jù)碼反碼
  23. code unsigned char shuma[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71}; //子模0-9，A,B,C,D,E,F
  24. unsigned char reg1 = 0;        //通用寄存器1
  25. unsigned char reg2 = 0;        //通用寄存器2  這兩個寄存器在轉(zhuǎn)換成可顯示的數(shù)據(jù)要用到
  26. void delay(unsigned int time)
  27. {
  28. while(time--);
  29. }
  30. void tm1650_start(); //TM1650通訊的開始信號
  31. void tm1650_end();//TM1650通訊的結(jié)束信號
  32. void tm1650_ack();//TM1650通訊的應(yīng)答信號
  33. void write_1();//TM1650數(shù)據(jù)通訊 寫1
  34. void write_0();//TM1650數(shù)據(jù)通訊 寫0
  35. void write_byte(unsigned char tem);//寫一個字節(jié)
  36. void TM0_Isr() interrupt 1 //紅外解碼，定時器的時基是50us中斷一次
  37. {
  38.   INT_CLKO &= 0xef;        //關(guān)閉外部中斷
  39.   if(buzhou==0)                  //步驟0，判斷9ms的低電平
  40.   {
  41.    if(!ir)
  42.    {
  43.     ir_time++;
  44.         if(ir_time>185)                 //低電平超時，每一次因為錯誤退出解碼時，一點要清掉用到的那些寄存器�。。。。。∵@里一點要注意，下面的退出里面也是要清掉
  45.         {
  46.          ir_d = 0;
  47.          ir_time = 0;
  48.          buzhou = 0;
  49.      TR0 = 0;
  50.          INT_CLKO |= 0x10;
  51.     }
  52.    }
  53.    else
  54.    {
  55.     if((ir_time>175)&&(ir_time<185)) //低電平OK，是正確的9ms ，就跳到步驟1    （9mS除以50uS=180,所以這里的值就設(shè)為175和185之間，因為要考慮到一點的誤差）
  56.     {
  57.          ir_time = 0;
  58.      //led ^= 1;
  59.          buzhou = 1;
  60.     }
  61.     else                 //不是正確的9ms
  62.     {
  63.          buzhou = 0;
  64.      TR0 = 0;
  65.          INT_CLKO |= 0x10;
  66.     }
  67.    }
  68.   }
  69.   if(buzhou==1)                 //步驟1，判斷4.5ms的高電平
  70.   {
  71.    if(ir)
  72.    {
  73.     ir_time++;
  74.         if(ir_time>95)           //高電平超時
  75.         {
  76.          ir_d = 0;
  77.          ir_time = 0;
  78.          buzhou = 0;
  79.      TR0 = 0;
  80.          INT_CLKO |= 0x10;
  81.     }
  82.    }
  83.    else
  84.    {
  85.     if((ir_time>85)&&(ir_time<95))         //4.5ms高電平OK，就跳到步驟2  這里還可以添加判斷連碼的程序，如果這里的時間是2mS 那就是連碼
  86.         {
  87.          ir_time = 0;
  88. //     led ^= 1;
  89.          buzhou = 2;
  90.          ir_d = 0;
  91.         }
  92.         else                          //不OK
  93.         {
  94.          buzhou = 0;
  95.      TR0 = 0;
  96.          INT_CLKO |= 0x10;
  97.         }
  98.    }
  99.   }
  100.   if(buzhou==2)           //步驟2開始解碼數(shù)據(jù)
  101.   {
  102.    if(!ir_d)         //如果低電平標志為0時，這里是用來判斷低電平的時間
  103.    {
  104.     if(!ir)           //如果紅外端口為低
  105.     {
  106.      ir_time++;                //計低電平的時間
  107.          if(ir_time>13)        //低電平時間超時，就退出解碼
  108.          {
  109.           ir_d = 0;
  110.           ir_time = 0;
  111.           buzhou = 0;
  112.       TR0 = 0;
  113.           INT_CLKO |= 0x10;
  114.           shuwei = 0;
  115.           shuwei1 = 0;
  116.          }
  117.     }
  118.     else           //如果轉(zhuǎn)為高電平了，
  119.     {
  120.          ir_d = 1;        //低電平標志位置一，要去判斷高電平的時間了
  121.          ir_time = 0;//時間清零
  122.     }
  123.    }
  124.    else           //如果低電平標志位為1，就是進入判斷IR高電平的時間了，這個高電平的時間就是判斷數(shù)據(jù)是0還是1
  125.    {
  126.     if(ir) //如果IR為高
  127.         {
  128.          ir_time++;//計高電平的是按
  129.          if(ir_time>34)         //超時了就退出解碼
  130.          {
  131.           ir_d = 0;
  132.           ir_time = 0;
  133.           buzhou = 0;
  134.       TR0 = 0;
  135.           INT_CLKO |= 0x10;
  136.           shuwei = 0;
  137.           shuwei1 = 0;
  138.          }
  139.         }
  140.         else         //如果IR為低了，就可以判斷高電頻的時間了
  141.         {
  142.          if(ir_time>16)                 //時間大于16*50us  就是數(shù)據(jù)1
  143.           ir_dat |= 0x80;
  144.          else                                 //否則就是數(shù)據(jù)0
  145.           ir_dat &= 0x7f;
  146.         shuwei++;
  147.         if(shuwei==8)           //8bit 組成1byte
  148.         {
  149.          num[shuwei1]=ir_dat;
  150.          shuwei = 0;
  151.          shuwei1++;                 //總共4byte
  152.          if(shuwei1==4)         //4組數(shù)據(jù)接收完了就接收解碼
  153.          {
  154. //          if(num[2]==0x45)
  155. //           led = 0;
  156. //          else
  157. //           led = 1;
  158.       ir_ok = 1;        //解碼成功標志位置一
  159.           buzhou = 0;
  160.       TR0 = 0;
  161.           INT_CLKO |= 0x10;
  162.           shuwei1 = 0;
  163.          }
  164.         }
  165.         ir_dat>>=1;
  166.         ir_time = 0;
  167.         ir_d = 0;
  168.         }
  169.    }
  170.   }
  171. }
  172. void INT2_Isr() interrupt 10   //IR為低 就進入此中斷，開啟解碼，解碼中這個中斷是關(guān)閉的，只有退出了解碼，才會進入這個中斷
  173. {
  174.   if(!ir)
  175.   {
  176.    buzhou = 0;
  177.    ir_d = 0;
  178.    shuwei = 0;
  179.    shuwei1 = 0;
  180.    ir_time = 0;
  181.    TR0 = 1;
  182.   }
  183. }

  185. void main()
  186. {
  187. P3M0 = 0x00;
  188. P3M1 = 0x00;
  189. P3 = 0xff;
  190. AUXR |= 0x80;                //定時器時鐘1T模式
  191. TMOD = 0x00;                                //模式0
  192. TL0 = 0xD7;                //設(shè)置定時初值
  193. TH0 = 0xFD;       //定時器0設(shè)為50us中斷一次
  194. TR0 = 0;                                    //啟動定時器
  195. ET0 = 1;                                    //使能定時器中斷
  196. INT_CLKO |= 0x10;               //(EX2 = 1)使能INT2中斷
  197. EA = 1;
  198. while(1)
  199. {
  200.   tm1650_start();
  201.   write_byte(0x48);        //數(shù)碼顯示模式
  202.   tm1650_ack();
  203.   write_byte(0x11);        //1級亮度，開顯示。這里的指令數(shù)據(jù) 詳情參閱TM1650的datasheet
  204.   tm1650_ack();
  205.   tm1650_end();

  207.   tm1650_start();
  208.   write_byte(0x68);
  209.   tm1650_ack();
  210.   write_byte(shuma[reg1]);
  211.   tm1650_ack();
  212.   tm1650_end();

  214.   tm1650_start();
  215.   write_byte(0x6a);
  216.   tm1650_ack();
  217.   write_byte(shuma[reg2]);
  218.   tm1650_ack();
  219.   tm1650_end();

  221.   tm1650_start();
  222.   write_byte(0x6c);
  223.   tm1650_ack();
  224.   write_byte(0x5b);//固定顯示2
  225.   tm1650_ack();
  226.   tm1650_end();

  228.   tm1650_start();
  229.   write_byte(0x6e);
  230.   tm1650_ack();
  231.   write_byte(0x3f);         //固定顯示0，這里固定顯示02，是因為我們解碼的數(shù)據(jù)是第2組數(shù)據(jù)，也就是數(shù)據(jù)碼（第0組數(shù)據(jù)是用戶碼，1是用戶碼反碼，2是數(shù)據(jù)碼，3是數(shù)據(jù)碼反碼）
  232.   tm1650_ack();
  233.   tm1650_end();
  234.   if(ir_ok)
  235.   {
  236.    ir_ok = 0; //清掉解碼標志位
  237.    reg1 = (num[2]&0x0f);  //  數(shù)據(jù)低4位送顯示              把數(shù)據(jù)轉(zhuǎn)為0-F
  238.    reg2 = (num[2]&0xf0);//數(shù)據(jù)的高四位送顯示
  239.    reg2>>=4;
  240.   }
  241. }
  242. }
  243. void tm1650_start()
  244. {
  245. sda = 1;
  246. scl = 1;
  247. delay(10);
  248. sda = 0;
  249. delay(5);
  250. }
  251. void tm1650_end()
  252. {
  253. sda = 0;
  254. scl = 1;
  255. delay(6);
  256. sda = 1;
  257. delay(2);
  258. }
  259. void tm1650_ack()
  260. {
  261. while(sda);
  262. delay(5);
  263. scl = 1;
  264. delay(5);
  265. scl = 0;
  266. delay(5);
  267. }
  268. void write_1()
  269. {
  270. sda = 1;
  271. scl = 0;
  272. delay(5);
  273. scl = 1;
  274. delay(10);
  275. scl = 0;
  276. delay(5);
  277. sda = 0;
  278. }
  279. void write_0()
  280. {
  281. sda = 0;
  282. scl = 0;
  283. delay(5);
  284. scl = 1;
  285. delay(10);
  286. scl = 0;
  287. }
  288. void write_byte(unsigned char tem)
  289. {
  290. unsigned char i;
  291. for(i=8;i>0;i--)
  292. {
  293.   if(tem&0x80)
  294.    write_1();
  295.   else
  296.    write_0();
  297.   tem<<=1;
  298. }
  299. }
復(fù)制代碼

以上程序下載:
TM1650+紅外解碼.zip (150.58 KB, 下載次數(shù): 93)


作者: ssk7793    時間: 2021-7-15 16:42
單片機用的是什么型號的
作者: liuhailan5757    時間: 2021-8-14 15:02
STC15W104，，STC的單片機都可以，IO口對應(yīng)好就行，看宏定義。



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1