⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 a16.c

📁 单片机实验程序-13种-17.4M-pdf.zip
💻 C
字号:
// ;	“验证式”	实验十六  A/D转换实验

#define LEDLen 6
#define MODE 0x03
xdata unsigned char CS0809 _at_ 0xA000;
xdata unsigned char CAddr  _at_ 0xe100;   // 命令控制口
xdata unsigned char OUTBIT _at_ 0xe101;   // 位控制口
xdata unsigned char CLK164 _at_ 0xe102;   // 段控制口(接164时钟位)
xdata unsigned char DAT164 _at_ 0xe102;   // 段控制口(接164数据位)
xdata unsigned char IN     _at_ 0xe103;   // 键盘读入口

unsigned char LEDBuf[LEDLen];  // 显示缓冲
code unsigned char LEDMAP[] = {  // 八段管显示码
  0x3f, 0x06, 0x5b, 0x4f, 0x66, 0x6d, 0x7d, 0x07,
  0x7f, 0x6f, 0x77, 0x7c, 0x39, 0x5e, 0x79, 0x71
};

void Delay(unsigned char CNT)
{
  unsigned char i;

  while (CNT-- !=0)
    for (i=100; i !=0; i--);
}

void DisplayLED()
{
  unsigned char i, j;
  unsigned char Pos;
  unsigned char LED;
  
  Pos = 0x20;  // 从左边开始显示
  for (i = 0; i < LEDLen; i++) {
    OUTBIT = 0;     // 关所有八段管
    LED = LEDBuf[i];
    for (j = 0; j < 8; j++) {   // 送164
     if (LED & 0x80) DAT164 = 1 ; else DAT164 = 0 ;
      CLK164 = CLK164| 0X02;
      CLK164 = CLK164& 0Xfd;
      LED <<= 1;
    }
    OUTBIT = Pos;  // 显示一位八段管
    Delay(1);
    Pos >>= 1;     // 显示下一位
  }
  OUTBIT = 0;     // 关所有八段管
}
unsigned char Read0809()
{
  unsigned char i;

  CS0809 = 0;                // 起动 A/D
  for (i=0; i<0x20; i++) ;   // 延时 > 100us
  return(CS0809);            // 读入结果
}

void main()
{
  
   unsigned char j;
    unsigned char b;
   CAddr= MODE;
   while(1) {
     LEDBuf[0] = 0X3F;
     LEDBuf[1] = 0X7F;
     LEDBuf[2] = 0X3F;
     LEDBuf[3] = 0X6F;
     LEDBuf[4] = 0X00;
     LEDBuf[5] = 0X00;
    
     //b = Read0809();

     LEDBuf[5] = LEDMAP[Read0809() & 0x0f] ;
     LEDBuf[4] = LEDMAP[Read0809()>>4 & 0x0f] ;
     for(j=0; j<5; j++)
       DisplayLED();   // 延时
   }
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -