//TI TLC1543 10位AD驅動程序 [龍嘯九天] [953次] 01-3-24 下午 07:50:17
/*————————————————————
〖說明〗TI TLC1543 10位AD驅動程序，51晶振是11.0592MHz的。
〖文件〗TLC1543.c  ﹫2001/03/23
〖作者〗龍嘯九天 c51@yeah.net <a href=http://mcs51.yeah.net target=_blank>http://mcs51.yeah.net</a>
〖修改〗修改建議請到論壇公布 <a href=http://c51bbs.yeah.net target=_blank>http://c51bbs.yeah.net</a>
〖版本〗V2.00A Build 0323
—————————————————————*/


/*------------------------------------------------------------------------------
--
調用方式：uint read1543(uchar port)
函數說明：read1543()返回10位AD芯片TLC1543的port通道采樣值。
--------------------------------------------------------------------------------
-*/
#define CLOCK P1_3
#define D_IN  P1_4
#define D_OUT P1_5
#define _CS   P1_7

uint read1543(uchar port) //從TLC1543讀取采樣值,形參port是采樣的通道號
{
uint data ad;uint data i;
uchar data al=0,ah=0;

CLOCK=0;
_CS=0;
port<<=4;
for (i=0;i<4;i++) //把通道號打入1543
{
D_IN=(bit)(port&0x80);CLOCK=1;CLOCK=0;
port<<=1;
}

for (i=0;i<6;i++) //填充6個CLOCK
{
CLOCK=1;CLOCK=0;
}

_CS=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();
_CS=0; //等待AD轉換

_nop_();_nop_();_nop_();

for (i=0;i<2;i++) //取D9,D8
{
D_OUT=1;
CLOCK=1;
ah<<=1;
if (D_OUT) ah|=0x01;
CLOCK=0;
} 

for (i=0;i<8;i++) //取D7--D0
{
D_OUT=1;
CLOCK=1;
al<<=1;
if (D_OUT) al|=0x01;
CLOCK=0;
} 

_CS=1;
ad=(uint)ah;ad<<=8;ad|=(uint)al; //得到AD值
return (ad);
}