#define CS    P1_4
#define DI_DO P1_3
#define CLK   P1_2
#define INPUT P1_1

//**************************************************************************************************
//函數名稱：模數轉換控制函數
//局部變量:
//全局變量：
//IO端口：
//函數調用：
//功能描述：本函數控制的是ADC0838
//原理描述：
unsigned char AD(unsigned char addr)
{
 unsigned char ke,num=0x10,MUX=0x18,count,dat; 

 switch (addr)
  { 
    case 0:{MUX=0X18;break;}
    case 1:{MUX=0x1c;break;}
    case 2:{MUX=0X19;break;}
    case 3:{MUX=0x1d;break;}
    case 4:{MUX=0X1a;break;}
    case 5:{MUX=0x1e;break;}
    case 6:{MUX=0x1b;break;}
    case 7:{MUX=0x1f;break;}  
  }

 CS=0;
 DI_DO=0;
 for(count=0;count<5;count++)
  {
    CLK=0;
    ke=num>>count;
    if(ke&MUX)
      {DI_DO=1;}
    else
      {DI_DO=0;}
    CLK=1; 
   _nop_();
  }   
   CLK=0;
   _nop_();
   CLK=1;
   _nop_();
 for(count=0;count<8;count++)
  { 
     CLK=0; 
     _nop_();
     if(INPUT) 
      { dat=((dat<<1)|0x01);}
     else
      { dat=(dat<<1);}
     CLK=1;  
     _nop_();
  }
 CS=1;
 _nop_();
 return dat;
}