標(biāo)題: TLC0838 8路AD 51單片機程序分享 [打印本頁]
作者: 51黑bug    時間: 2016-6-23 21:58
標(biāo)題: TLC0838 8路AD 51單片機程序分享
8路8位串行AD TLC0838與51系列單片機的接口程序，可多片并聯(lián)，共用時鐘線與數(shù)據(jù)線適用于多路采集，本程序中使用兩片可采集16路


完整代碼下載： 0838.rar (722 Bytes, 下載次數(shù): 33)




  3. void main(void)
  4. {
  5. Byte data1;
  6. data1=AD_0838(0,2);
  7. while(1);
  8. }

  10. /**********************************************************
  11. 目的：運用TLC0838，輸入通道值，讀取AD轉(zhuǎn)換值
  12. 輸入?yún)?shù)：1、通道值TDZ
  13. 輸出參數(shù)：1、AD轉(zhuǎn)換結(jié)果AD_JG
  14. 相關(guān)管腳：1、ADCS1=P1^3  第一個0838-AD片選   2、ADCS2=P1^0    第二個0838-AD片選
  15.           3、ADCLK=P1^1  0832-AD時鐘         4 、ADIO=P1^4    0832-AD數(shù)據(jù)
  16. */
  17. Byte AD_0838(Byte TDZ,Byte Number)
  18. {
  19.         Byte Bit[8];
  20.         Byte TDZ_MID;
  21.         Byte i;
  22.         Byte AD_JG=0x00;
  23.         Bit[0]=0x01;
  24.         Bit[1]=0x02;
  25.         Bit[2]=0x04;
  26.         Bit[3]=0x08;
  27.         Bit[4]=0x10;
  28.         Bit[5]=0x20;
  29.         Bit[6]=0x40;
  30.         Bit[7]=0x80;
  31.         switch(TDZ)
  32.         {
  33.                 case 0   :TDZ_MID=0x18;break;
  34.                         case 1   :TDZ_MID=0x1c;break;
  35.                                 case 2   :TDZ_MID=0x19;break;
  36.                                         case 3   :TDZ_MID=0x1d;break;
  37.                                                 case 4   :TDZ_MID=0x1a;break;
  38.                                                         case 5   :TDZ_MID=0x1e;break;
  39.                                                                 case 6   :TDZ_MID=0x1b;break;
  40.                                                                         case 7   :TDZ_MID=0x1f;break;
  41.         }
  42.         switch(Number)
  43.         {
  44.         case 1:ADCS1=1;break;
  45.         case 2:ADCS2=1;break;
  46.         }
  47.         RS_ADIO=0;
  48.         CM8880CLK_ADCLK=0;
  49.         switch(Number)
  50.         {
  51.         case 1:ADCS1=0;break;
  52.         case 2:ADCS2=0;break;
  53.         }
  54.         for(i=5;i>0;i--)
  55.         {
  56.                 RS_ADIO=TDZ_MID&Bit[i-1];
  57.                 AD_0838_Pulse();
  58.         }
  59.         CM8880CLK_ADCLK=1;
  60.         for(i=8;i>0;i--)
  61.         {
  62.                 AD_0838_Pulse();
  63.                 if(RS_ADIO)AD_JG|=Bit[i-1];
  64.         }
  65.         switch(Number)
  66.         {
  67.         case 1:ADCS1=1;break;
  68.         case 2:ADCS2=1;break;
  69.         }
  70.         return AD_JG;
  71. }

  73. void AD_0838_Pulse(void)
  74. {
  75.         Byte i;
  76.         CM8880CLK_ADCLK=1;       //get a pulse about 52 us
  77.         for(i=0;i<4;i++)
  78.         {
  79.         _nop_();
  80.         }
  81.         CM8880CLK_ADCLK=0;
  82.         for(i=0;i<4;i++)
  83.         {
  84.         _nop_();
  85.         }
  86. }
復(fù)制代碼










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