您现在所在的是:

单片机论坛

回帖:2个,阅读:1778 [上一页] [1] [下一页]
10454
xlian
文章数:3232
年度积分:94
历史总积分:10454
注册时间:2002/5/7
发站内信
2018论坛热心网友
西门子PLC体验(二)
发表于:2004/9/2 14:38:00
#0楼
初学单片机,请各位指点我的第一个程序:
#include <pic.h>
union adres
{
int y1;
unsigned char adre;
}adresult;//定义一个联合类型adres类adresult变量,包含一个基本型y1元素和一个无符号字符变量adre元素
unsigned char k ;
double q ;
int u;//定义一个整型变量
TRISA=0x08;//设置RA3为输入方式,RA0,RA1为输出方式
TRISB=0x00;
const ahar tab[10]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xd8,0x80,0x90};//不带小数点显示段码表
//AD初始化子程序
void adinitial()
{ADCON0=0xc5;//选择通道为RA3,打开AD转换器,AD转换时钟为内部RC
ADCON1=0x04;//把RA3设置为模拟输入通道
ADIE=1;//AD转换允许中断
PEIE=1;//外围中断允许
}
//AD采集中断子程序
void initial adint(void)
ADIF=0;//清除中断标志
adresult.adre=ADRES;//读取并存储AD转换结果
u=adresult.y1;
}
main ()
{
adinitial();//AD转换初始化
ei();//开中断
ADGO=1;//AD转换开始
di()
q=(duble)u;//把转换结果变成浮点数
q=q-51
q=q*50;
q=q/204;
k=(int)q;//输入1-5V,显示为0-50
void div()
{
 int i;
 i=k%10;
 RB=TAB[i];
 RA1=1;
 RA0=0;
 i=k%10;
 RB=TAB[i];
 RA0=1;
 RA1=0;
}
}
957
pic16
文章数:24
年度积分:50
历史总积分:957
注册时间:2004/7/19
发站内信
发表于:2004/9/5 17:29:00
#1楼
到PIC单片机学习网去看看吧,上面很多实例的. http://www.pic16.com/cuxue/cuxue.htm
欢迎大家光临 PIC单片机学习网
网站地址:http://www.pic16.com   http://pic16.com/pic16
单片机交流论坛:http://pic16.com/bbs
911
sxshuai
文章数:4
年度积分:50
历史总积分:911
注册时间:2004/9/9
发站内信
发表于:2004/9/10 8:13:00
#2楼
饮水思源   谢谢2楼的老师

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 工控网 Copyright©2024 Gkong.com, All Rights Reserved

46.8003