找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 1621|回復(fù): 1
收起左側(cè)

串行DA TLC5615的單片機(jī)驅(qū)動(dòng)源程序

[復(fù)制鏈接]
ID:773431 發(fā)表于 2020-6-8 23:21 | 顯示全部樓層 |閱讀模式
#include<reg51.h>
#include<intrins.h>
#define uchar unsigned char
#define  uint unsigned int
sbit                 SCL =         P1^1;               
sbit                 CS  =         P1^2;
sbit                 SDA =         P1^0;
uchar bdata dat_in_h;
uchar bdata dat_in_l;
sbit h_7 = dat_in_h^7;
sbit l_7 = dat_in_l^7;
void delayms(uint j)
{
uchar i=250;
for(;j>0;j--)
         {while(--i);
         i=249;
         while(--i);
         i=250;
        }
}
/*******************************************************************************
*** 函 數(shù) 名: void Write_12Bits()
*** 功能描述: 一次向TLC中寫(xiě)入12bit數(shù)據(jù);
/******************************************************************************/
void Write_12Bits(void)
{
        uchar i;
        SCL = 0;                                //置零SCL,為寫(xiě)bit做準(zhǔn)備;
        CS = 0;
        for(i=0;i<2;i++)//循2次,發(fā)送高兩位;
        {
                if(h_7)                                //高位先發(fā);
                        {
                                SDA = 1;        //將數(shù)據(jù)送出;
                                SCL = 1;        //提升時(shí)鐘,寫(xiě)操作在時(shí)鐘上升沿觸發(fā);
                                SCL = 0;        //結(jié)束該位傳送,為下次寫(xiě)作準(zhǔn)備;
                                }
                else
                        {
                                SDA = 0;
                                SCL = 1;
                                SCL = 0;
                                }
                dat_in_h <<= 1;
                }
        
        for(i=0;i<8;i++)//循環(huán)八次,發(fā)送低八位;
        {
                if(l_7)
                        {
                                SDA = 1;        //將數(shù)據(jù)送出;
                                SCL = 1;        //提升時(shí)鐘,寫(xiě)操作在時(shí)鐘上升沿觸發(fā);                                                                        
                                SCL = 0;        //結(jié)束該位傳送,為下次寫(xiě)作準(zhǔn)備;
                                }
                else
                        {
                                SDA = 0;
                                SCL = 1;
                                SCL = 0;
                                }
                dat_in_l <<= 1;
                }
        for(i=0;i<2;i++)//循環(huán)2次,發(fā)送兩個(gè)虛擬位;
        {
                SDA = 0;
                SCL = 1;
                SCL = 0;
                }
        CS = 1;
        SCL = 0;
        }
/*******************************************************************************
*** 函 數(shù) 名: void TLC5615_Start(uint dat_in)
*** 功能描述: 啟動(dòng)DAC轉(zhuǎn)換;
/******************************************************************************/
void TLC5615_Start(uint dat_in)
{
        dat_in %= 1024;
        dat_in_h = dat_in/256;
        dat_in_l = dat_in%256;
        dat_in_h <<= 6;        
        Write_12Bits();
}

void main()
{
        while(1)
        {        
         TLC5615_Start(0xffff);  
         delayms(1);
        }

}


回復(fù)

使用道具 舉報(bào)

ID:1 發(fā)表于 2020-6-9 16:26 | 顯示全部樓層
本帖需要重新編輯補(bǔ)全電路原理圖,源碼,詳細(xì)說(shuō)明與圖片即可獲得100+黑幣(帖子下方有編輯按鈕)
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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