[AVR问答]

Atmega16 的数控稳压源

2012-9-8 11:23:36 6560 数控稳压 AVR

本帖最后由 zhengbingyan 于 2012-12-4 12:42 编辑

/*****       简易数控稳压源          ******/
/*主要功能：由4x4矩阵键盘，可以直接输入预设电压，得出电压；
                  并可以通过按键显示实际测量电压，可步进0.1V。*/
//项目：郑炳炎；广东松山职业技术学院电气工程系 2011级自动化专业 (1班)
#include
#define uchar unsigned char
#define uint  unsigned int
uint NUM,CNT;
uchar q,b,Q,B,k,d,enter;
uchar table[]={0XC0,0XF9,0XA4,0XB0,0X99,0X92,0X82,0XF8,0X80,0X90};
void delay(uchar t);//延时函数
void show_LED(void);//数码管函数
void anjian(void);//按键函数
void show_NUM(void);//键值函数
void A_D_A(void);//电压测量函数
void show_V(void);//预设电压函数
void main(void)
{DDRC=0X0F; //按键接口
PORTC|=0XF0;
SFIOR&=0XFB;

DDRA=0XC0;  //数码管接口
PORTA|=0X03; //A/D接口

DDRB=0XFF;
DDRD=0XFF;
PORTD=0XFF;

ADCSRA|=1< ADCSRA|=1<
while(1)
{
A_D_A();
anjian();
show_V();
show_LED();
show_NUM();
  }
}
/*电压测量函数*/
void A_D_A(void)
{
ADCSRA|=1< while(!ADCSRA&(1< CNT=ADC&0X03FF;
CNT=2*((CNT*50)/1023);

if(q<=5)//弥补误差
  CNT-=2;

Q=CNT/10;//显示电压的 BCD 转换
B=CNT%10;
  }

/* 预设电压函数 */
void show_V(void)
{
if(q>5)
  {NUM=q*10;
NUM+=b;
NUM-=1;}
if(q<=5)
  {NUM=q*10;
NUM+=b;
NUM-=3;}
if(enter!=1) //初始电压 5V
  PORTD=117;

if(enter==1) //按键设置电压
  PORTD=NUM*255/100;
}
/*  键值函数 */
void show_NUM(void)
{
switch(k)
{
  case 0X00:if(d==0)q=7;if(d==1)b=7;break;
  case 0X01:if(d==0)q=8;if(d==1)b=8; break;
  case 0X02:if(d==0)q=9;if(d==1)b=9; break;

  case 0x03:delay(500);b+=1;break; //增加 0.1

  case 0X04:if(d==0)q=4;if(d==1)b=4; break;
  case 0X05:if(d==0)q=5;if(d==1)b=5; break;
  case 0X06:if(d==0)q=6;if(d==1)b=6; break;

  case 0x07:delay(500);b-=1;break; //减少 0.1

  case 0X08:if(d==0)q=1;if(d==1)b=1; break;
  case 0X09:if(d==0)q=2;if(d==1)b=2; break;
  case 0X0A:if(d==0)q=3;if(d==1)b=3; break;

  case 0X0C:q=0,b=0,d=0,enter=2; break;//取消
  case 0X0D:if(d==0)q=0;if(d==1)b=0; break;
  case 0X0E:d=1;break;// 小数点
  case 0X0F:enter=1; break;//确认
  }
}

/* 数码管函数 */
void show_LED(void)
{
PORTA=0X83;
if((PINA&0X02)==0)
  {PORTB=table[Q];
PORTB&=~0X80;}
else
  PORTB=table[q];
if(d==1)
  PORTB&=~0X80;
  delay(10);

  PORTA=0X43;
if((PINA&0X02)==0)
  PORTB=table[B];
else
  PORTB=table;
delay(10);
}

/*  矩阵4*4函数  */
void anjian(void)
{
uchar i,j;
uchar hang[]={0XFE,0XFD,0XFB,0XF7};
uchar lie[]={0XE0,0XD0,0XB0,0X70};
  for(i=0;i<4;i++)
  {PORTC=hang;
k=PINC&0XF0;
  for(j=0;j<4;j++)
{if(k==lie[j])
   {k=4*i+j;
i=0X05;
break;}}
}
  }

/* 延时函数  */
void delay(uchar t)
{
uint i;
for(;t>0;t--)
for(i=1141;i>0;i--);
  }

QQ截图20120908112129.png (35.81 KB, 下载次数: 25)

简易数控稳压源.zip

467.48 KB , 下载次数: 168

简易数控稳压源

评分

参与人数 1	积分 +2	收起理由
张三	+ 2	您的付出是论坛的动力,感谢您一直支持!.

查看全部评分

2012-9-8 11:23:36　　评论 淘帖0 举报

相关推荐

32 个讨论

0

2012-9-20 13:58:24 评论举报 1^# 1653281587.026900

0 分享一下，谢了

2012-9-20 17:42:38 评论举报 2^# 682634

0 能否打包上传。

2012-11-26 22:08:29 评论举报 3^# 谢强

0 talentfish 发表于 2012-11-26 22:08 能否打包上传。可以啊。

2012-12-4 12:40:48 评论举报 4^# zhengbingyan

0 bu cuo

2012-12-4 14:16:55 评论举报 5^# mengshilin0110

0 看一下

2012-12-8 23:27:25 评论举报 6^# 尹建生

0

2012-12-9 15:29:28 评论举报 7^# 111111

0

2013-1-11 18:04:20 评论举报 8^# 周程

0 谢谢

2013-1-12 11:41:37 评论举报 9^# 李铖

0 谢谢分享

2013-1-22 19:29:25 评论举报 10^# 张言涛

0 感谢楼主的分享哦！

2013-4-20 19:47:38 评论举报 11^# 沥川先森

0 赞一个收藏了哈哈哈

2013-4-23 20:05:35 评论举报 12^# Need_U_now

0 学习一下。

2013-4-23 22:41:33 评论举报 13^# 张林

0 感谢楼主的分享哦！

2013-5-4 21:02:17 评论举报 14^# roadgo

0 谢谢分享哦。。

2013-5-18 23:46:29 评论举报 15^# 、花开半夏

0 {:1:}

2013-5-19 00:20:40 评论举报 16^# 王旭

0 还不错哦

2013-6-5 09:10:19 评论举报 17^# 陈飞

0 谢谢楼主分享!

2013-6-5 16:49:32 评论举报 18^# 艾晓峰

0 {:20:}

2013-10-23 11:06:11 评论举报 19^# hua2002

只有小组成员才能发言，加入小组>>

12 / 2 页下一页

AVR技术论坛

858个成员聚集在这个小组

加入小组

精选推荐

AVR Atmega16 Bootloader程序与上位机LabView程序

5114 浏览 6 评论
#include <ioavr.h>这个头文件我应该下什么编译器

7762 浏览 0 评论
Atmega1280的bootloader搬家无效？？？

3019 浏览 2 评论
ATMEGA162两串口通信乱码

3100 浏览 1 评论
装了最新版的avrstudio7，但是麻烦好多。

10049 浏览 1 评论

创建小组步骤

创建小组创建自己的地盘
个性设置精心打造小组空间
邀请好友邀请好友加入我的小组
小组升级小组积分升级赢得社区推荐

创建属于自己的小组

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

关注微信公众号

电子发烧友网

电子发烧友论坛

社区合作: 刘勇; 联系电话：15994832713; 邮箱地址：liuyong@huaqiu.com

社区管理: elecfans短短; 微信：elecfans_666; 邮箱：users@huaqiu.com

返回 AVR技术论坛

12 / 2 页下一页

搜索历史

Atmega16 的数控稳压源

评分

相关推荐

精选推荐

最新话题

热门话题

创建小组步骤

站长推荐 /7