找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 5655|回复: 5
收起左侧

51单片机ADC分压键盘源程序

[复制链接]
ID:217558 发表于 2017-7-6 10:19 | 显示全部楼层 |阅读模式
设计程序,实现当按下ADC分压键盘时,将相应的键号(01-16)通过两片具有SPI接口的74HC595芯片驱动最右端两个7段数码管显示,其余6个数码管关闭
将adc分压按键按下时的模拟输入电压值送数码管显示,比如4.995v时,显示4.995

单片机源程序如下:
  1. #include "reg51.h"
  2. #define TIMS 65500
  3. #define TIMS1 3036
  4. #define SSIG      1
  5. #define SPEN      1
  6. #define DORD      0
  7. #define MSTR      1
  8. #define CPOL      1
  9. #define CPHA      1
  10. #define SPR1      0
  11. #define SPR0      0
  12. #define SPEED_4   0
  13. #define SPEED_16  1
  14. #define SPEED_64  2
  15. #define SPEED_128 3

  16. #define SPIF      0x80
  17. #define WCOL      0x40

  18. sfr SPSTAT =0xCD;
  19. sfr SPCTL  =0xCE;
  20. sfr SPDAT  =0xCF;

  21. sfr AUXR   =0x8E;
  22. sfr AUXR1  =0XA2;
  23. sfr CLK_DIV=0x97;
  24. sfr P5=0xC8;

  25. sbit HC595_RCLK=P5^4;
  26. sbit EADC=IE^5;

  27. #define ADC_POWER     0x80
  28. #define ADC_FLAG      0x10
  29. #define ADC_START     0x08
  30. #define ADC_SPEEDLL   0x00
  31. #define ADC_SPEEDL    0x20
  32. #define ADC_SPEEDH    0x40
  33. #define ADC_SPEEDHH   0x60

  34. sfr ADC_CONTR =0xBC;
  35. sfr ADC_RES   =0xBD;
  36. sfr ADC_RESL  =0xBE;
  37. sfr P1ASF     =0x9D;


  38. unsigned char ch=4;

  39. unsigned int  a, b, c, d, e;
  40. float voltage=0;
  41. unsigned char tstr=0;
  42. unsigned char code t_display[16]={0x3F,0x06,0x5B,0x4F,
  43.                                       0x66,0x6D,0x7D,0x07,
  44.                                       0x7F,0x6F,0x77,0x7C,
  45.                                       0x39,0x5E,0x79,0x71
  46. };
  47. unsigned char code T_COM[8]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
  48. unsigned char code Mant[6]={0xbf,0x86,0xdb,0xcf,0xe6,0xed};

  49. bit flag=0;
  50. unsigned m=0;

  51. void SPI_SendByte(unsigned char dat)
  52. {
  53.         SPSTAT=SPIF+WCOL;
  54.         SPDAT=dat;
  55.         while((SPSTAT & SPIF)==0);
  56.         SPSTAT=SPIF+WCOL;
  57. }

  58. void seg7scan(unsigned char index1,unsigned char index2)
  59. {
  60.         SPI_SendByte(~T_COM[index1]);
  61.         SPI_SendByte(t_display[index2]);
  62.         HC595_RCLK=1;
  63.         HC595_RCLK=0;
  64. }

  65. void Mscan(unsigned char index1,unsigned char index2)
  66. {
  67.         SPI_SendByte(~T_COM[index1]);
  68.         SPI_SendByte(Mant[index2]);
  69.         HC595_RCLK=1;
  70.         HC595_RCLK=0;
  71. }
  72. void timer_0() interrupt 1
  73. {
  74.         flag=1;        
  75. }

  76. void adc_int() interrupt 5
  77. {
  78.         unsigned char i=0;
  79.         ADC_CONTR &=!ADC_FLAG;
  80.         
  81.         voltage=((ADC_RES*4+ADC_RESL)*5.0)/1024;
  82.         e=voltage*1000;
  83.         a=e/1000;
  84.         
  85.         b=(e%1000)/100;
  86.                 c=e%100/10;
  87.         d=e%10;
  88.         ADC_CONTR=ADC_POWER |ADC_SPEEDLL | ADC_START | ch;
  89. }

  90. void main()
  91. {
  92.         unsigned char i;
  93.         unsigned int j=0;
  94.         SPCTL=(SSIG<<7)+(SPEN<<6)+(DORD<<5)+(MSTR<<4)
  95.              +(CPOL<<3)+(CPHA<<2)+SPEED_4;
  96.   CLK_DIV=0x00;
  97.         TL0=TIMS;
  98.         TH0=TIMS>>8;
  99.   AUXR&=0x3F;
  100.         AUXR1=0X08;
  101.         TMOD=0x00;
  102.         TR0=1;
  103.         ET0=1;
  104.         P1ASF=0x10;
  105.         ADC_RES=0;
  106.         ADC_CONTR=ADC_POWER|ADC_SPEEDLL | ADC_START | ch;
  107.         for(j=0;j<10000;j++);
  108.         EADC=1;
  109.         EA=1;
  110.         while(1)
  111.         {
  112.                 if(flag==1)
  113.                 {
  114.                   flag=0;

  115. ……………………

  116. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
新建文件夹.rar (29.92 KB, 下载次数: 44)

评分

参与人数 3黑币 +109 收起 理由
MJ2233 + 4 赞一个!
mervinol + 5 共享资料的黑币奖励!
admin + 100 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

ID:1 发表于 2017-7-7 04:56 | 显示全部楼层
好资料,51hei有你更精彩
回复

使用道具 举报

ID:88606 发表于 2017-7-7 08:44 | 显示全部楼层
看看是不是STC的
回复

使用道具 举报

ID:362846 发表于 2018-7-2 09:36 | 显示全部楼层
很棒很棒
回复

使用道具 举报

ID:362846 发表于 2018-7-2 09:43 | 显示全部楼层
特别棒的!
回复

使用道具 举报

ID:362846 发表于 2018-7-2 09:47 | 显示全部楼层
给力 很给力
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表