ltc1860 ad程序

12位串行ad，12位串行ad，12位串行ad，12位串行ad，12位串行ad，

#include
#define uchar unsigned char
#define uint unsigned int

sbit DATA=P2^0;
sbit SCK=P2^1;
sbit CONV=P2^2;
sbit P2_4=P2^4;
sbit P2_5=P2^5;
sbit P2_6=P2^6;
sbit P2_7=P2^7;

uchar V[4];
uchar code dig_num[10]={0x3f0x060x5b0x4f0x660x6d0x7d0x070x7f0x6f};  /*共阴级数码管的段选码*/
uchar select[]={0x7f0xbf0xdf0xef};

void delay（uint z）			 //延时函数
{
    uint xy;
	for（x=z;x>0;x--）
	   for（y=113;y>0;y--）;
}

uint ult1860（）				//AD转换部分
{
    uchar i;
	uint output=0;
	CONV=1;
	CONV=0;
    for（i=12;i>0;i--）
	{
		SCK=0;
	    SCK=1;
	    output|=DATA;
		output<<=1;
		
    }
	CONV=1;
	return （output）;


}

void changeV（uint Vol）
{
   uchar i;
  for（i=4;i>0;i--）					  //转换为四位十进制
  {  
   V[i-1]=Vol/1638;
   Vol=Vol%1638*10;
   }
  for（i=4;i>0;i--）					  //数码管输出
  {
	P3=dig_num[V[i-1]];
	if（i==4）
       P3|=0x80;                     //显示小数点
	P2=（P2|0xf0）&select[i-1];
	delay（1）;
	P2|=0xf0;
  }	
  
   



}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      85293  2008-11-09 17:33  ltc1860仿真\Last Loaded ltc1860.DBK

     文件       3731  2008-11-09 17:32  ltc1860仿真\ltc1860

     文件       1017  2008-11-09 16:45  ltc1860仿真\ltc1860.c

     文件      85284  2008-11-09 17:34  ltc1860仿真\ltc1860.DSN

     文件       1368  2008-11-09 17:32  ltc1860仿真\ltc1860.hex

     文件         43  2008-11-09 17:32  ltc1860仿真\ltc1860.lnp

     文件       5898  2008-11-09 17:32  ltc1860仿真\ltc1860.M51

     文件        831  2008-11-09 17:34  ltc1860仿真\ltc1860.Opt

     文件        638  2008-11-09 17:32  ltc1860仿真\ltc1860.plg

     文件        742  2008-11-09 17:34  ltc1860仿真\ltc1860.PWI

     文件       2108  2008-11-09 16:45  ltc1860仿真\ltc1860.Uv2

     文件         96  2008-11-09 14:24  ltc1860仿真\main.c

     文件        988  2008-11-09 17:32  ltc1860仿真\main.LST

     文件       3912  2008-11-09 17:32  ltc1860仿真\main.OBJ

     目录          0  2008-11-09 17:34  ltc1860仿真

----------- ---------  ---------- -----  ----

               191949                    15