RLC电阻电容电感测量仪Proteus仿真及源程序

ID:137190 · 发表于 2016-9-25 12:50

下面是RLC电阻电容电感测量仪的仿真原理图：

仿真工程文件及源程序下载：

RLC测量仪.rar (71.66 KB, 下载次数: 717)

这个简单的万用表采用单片机控制，用lcd1602显示屏来显示.下面是部分源程序预览：

#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit RS=P2^6;
sbit RW=P2^5;
sbit E=P2^7;
sbit R=P1^0;
sbit C=P1^1;
sbit L=P1^2;
sbit A1=P1^3;
sbit A0=P1^4;
#define LCD_data P0
uchar code table1[10]={"R= R"};
uchar code table2[10]={"C= pF"};
uchar code table3[10]={"L= mH"};
uchar code f_table[88]={13,14,15,16,17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100};
uchar code f_correct[88]={9,10, 11, 12, 12, 12, 13, 14, 15, 16, 17, 18, 18, 18, 19, 20, 21, 21, 22, 23, 24, 25, 25, 26, 26, 27, 28, 29, 29, 30, 30, 31, 32, 33, 33, 34, 35, 35, 36, 37, 38, 38, 39, 40, 41, 41, 42, 42, 43, 44, 45, 45, 46, 47, 48, 49, 49, 50, 51, 51, 52, 53, 54, 54, 55, 55, 56, 57, 57, 58, 59, 60, 60, 62, 62, 63, 64, 64, 65, 66, 66, 67, 67, 68, 69, 70, 71, 71,};
uchar a6,a5,a4,a3,a2,a1;
uchar flag;
unsigned long cnt,cnt1;
uchar f_cnt;
/********************************/
void delay_us(); //18us
void delay_ms(uint);
void lcd_init();
void lcd_write_com(uchar com);
void lcd_write_dat(uchar dat);
void lcd_init();
void lcd_display(uchar add,uchar dat);
/***********************************/
void delay_us()
{
uchar x;
for(x=0;x<5;x++);
}
void delay_ms(uint z)
{
uint x,y;
for(x=0;x<z;x++)
for(y=0;y<123;y++);
}
void lcd_write_com(uchar com)
{
E=0;
RS=0;
RW=0;
delay_us();
LCD_data=com;
E=1; //高脉冲写入数据
delay_us();
E=0;
}
void lcd_write_dat(uchar dat)
{
E=0;
RS=1;
RW=0;
delay_us();
LCD_data=dat;
E=1; //高脉冲写入数据
delay_us();
E=0;
}
void lcd_init() //lcd初始化
{
delay_ms(15);
lcd_write_com(0x38);
delay_ms(10);
lcd_write_com(0x0c);
lcd_write_com(0x06);
lcd_write_com(0x01);
delay_ms(2);
}
void timer_init(void) //定时器初始化
{
TMOD=0X51;
PT0=1; /*中断优先*/
TH0=0x3c;
TL0=0xb0;
TH1=0;
TL1=0;
ET0=1;
ET1=1;
TR0=1;
TR1=1;
EA=1;
}
void lcd_display(uchar add,uchar dat) //lcd显示（地址，数据）
{
lcd_write_com(add);
lcd_write_dat(dat);
delay_us();
}
void real_display(void)
{
if(!R)
{
// while(!R);
A1=A0=0;
lcd_display(0x80,table1[0]);
lcd_display(0x80+1,table1[1]);
lcd_display(0x80+8,table1[8]);
lcd_display(0x80+9,table1[9]);
}
else if(!C)
{
A0=0;A1=1;
lcd_display(0x80,table2[0]);
lcd_display(0x80+1,table2[1]);
lcd_display(0x80+8,table2[8]);
lcd_display(0x80+9,table2[9]);
}
else if(!L)
{
A0=1;A1=0;
lcd_display(0x80,table3[0]);
lcd_display(0x80+1,table3[1]);
lcd_display(0x80+8,table3[8]);
lcd_display(0x80+9,table3[9]);
}
if(a6)
lcd_display(0x80+2,0x30+a6);
else
lcd_display(0x80+2,' ');
if(a6||a5)
lcd_display(0x80+3,0x30+a5);
else
lcd_display(0x80+3,' ');
if(a6||a5||a4)
lcd_display(0x80+4,0x30+a4);
else
lcd_display(0x80+4,' ');
if(a6||a5||a4||a3)
lcd_display(0x80+5,0x30+a3);
else
lcd_display(0x80+5,' ');
if(a6||a5||a4||a3||a2)
lcd_display(0x80+6,0x30+a2);
else
lcd_display(0x80+6,' ');
lcd_display(0x80+7,0x30+a1);
}
void correct(void) //误差修正函数
{
uchar i,k;
unsigned long wucha;
if(cnt<100000) //100KHz以内的修正
{
if(cnt>980&&cnt<2100) cnt-=1;
if(cnt>=2100&&cnt<3900) cnt-=2;
if(cnt>=3900&&cnt<4800) cnt-=3;
if(cnt>=4800&&cnt<5700) cnt-=4;
if(cnt>=5700&&cnt<8000) cnt-=5;
if(cnt>=8000&&cnt<9100) cnt-=6;
if(cnt>=9100&&cnt<10900) cnt-=7;
if(cnt>=10900&&cnt<11900) cnt-=8;
if(cnt>=11900&&cnt<13000) cnt-=9;
if(cnt>=13000&&cnt<=100000)
{
k=cnt/1000;
for(i=0;i<88;i++)
{
if(k==f_table[i])
{
cnt-=f_correct[i];
}
}
}
}
if(cnt>100000)
{
wucha=(cnt/1000)*73065/100000;
cnt-=wucha;
}
}
void main()
{
timer_init();
lcd_init();
while(1)
{
if(flag==1)
{
real_display();
flag=0;
}
}
}
void timer0() interrupt 1
{
uchar timer0;
TH0=0x3c; //50ms
TL0=0xb0;
timer0++;
if(timer0==20)
{
TR1=0; //关闭的计数器
EA=0;
cnt=TL1+TH1*256+f_cnt*65536;
correct();
//cnt1=(1e+9)/(2*0.693 *cnt)-20000/2;
if(!R)
{
// while(!R);
cnt1=1000000/(0.2*0.693*cnt)-165;
}
else if(!C)
{
cnt1=1000000000/(0.693*3*510*cnt);
}
else if(!L)
{
cnt1=(1e+9)/(4*3.14*3.14*cnt*cnt*0.05);
}
timer0=0;
a6=cnt1%10000000/100000;
a5=cnt1%100000/10000;
a4=cnt1%10000/1000;
a3=cnt1%1000/100;
a2=cnt1%100/10;
a1=cnt1%10;
flag=1;
TH1=0;
TL1=0;
TH0=0x3c;
TL0=0xb0;
cnt=0;
f_cnt=0;
EA=1;
TR1=1; //打开计数器
}
}
void int1() interrupt 3
{
f_cnt++;
}

复制代码

ID:72624 · 发表于 2016-12-1 19:25

支持一下,希望做出成品.大家分享

ID:152315 · 发表于 2016-12-5 15:55

做得很好，支持一下

ID:151171 · 发表于 2016-12-9 17:52

楼主您这个测量仪那个测量端口是哪两个。

ID:167545 · 发表于 2017-3-1 22:24

楼主的代码写的很好看

ID:373 · 发表于 2017-3-7 09:47

学习下，不知道精度如何？

ID:130231 · 发表于 2017-3-18 13:07

不错！感谢分享，我有时间也做下。

ID:153960 · 发表于 2017-3-21 21:31

学习中

ID:164346 · 发表于 2017-4-10 15:58

楼主，你的测量电感的电路里面有一个电容是0.1F，实际电容没有这么大的呀

ID:151422 · 发表于 2017-4-22 18:09

支持一下，学习学习

ID:194615 · 发表于 2017-4-28 18:20

回复收藏一拨

ID:137736 · 发表于 2017-4-28 21:32

dradolee 发表于 2017-4-10 15:58
楼主，你的测量电感的电路里面有一个电容是0.1F，实际电容没有这么大的呀

应该是微法

ID:200011 · 发表于 2017-5-18 22:33

为啥我调试着电感误差非常大……

ID:202611 · 发表于 2017-5-19 17:49

楼主有没有详细的介绍说明啊

ID:196056 · 发表于 2017-5-29 21:10

怎么测量啊？看不懂，求大神告知，毕业论文要用。

ID:210674 · 发表于 2017-6-13 09:10

支持一下，学习学习

ID:187115 · 发表于 2017-6-13 11:27

这代码很感人

ID:210742 · 发表于 2017-6-13 12:07

了解。。。。。。。。。。。

ID:236382 · 发表于 2017-9-28 17:00

看不懂啊，大神可以详细点嘛

ID:236382 · 发表于 2017-10-1 10:54

大神，请问你这个施密特触发器74132只是单纯的起切换的作用吗？那我可以取消这个吗

ID:254819 · 发表于 2017-12-1 19:38

原理能说下吗

ID:239427 · 发表于 2017-12-29 11:30

不错的

ID:102963 · 发表于 2017-12-29 21:47

100mH的测出来是84mH，这个误差可以？？

ID:338735 · 发表于 2018-5-30 19:44

中间那个真的是74LS132吗？怎么看着不像呢

ID:373459 · 发表于 2018-11-30 16:59

学习中谢谢楼主分享

ID:441881 · 发表于 2018-12-9 13:20

电感误差巨大

ID:501295 · 发表于 2019-3-30 17:09

楼主的代码写的很好看

ID:429748 · 发表于 2019-5-3 11:04

下载。。。看看

ID:522603 · 发表于 2019-5-9 13:21

厉害的楼主，GOOD！！

ID:531686 · 发表于 2019-5-9 18:58

求详细功能介绍

ID:582456 · 发表于 2019-7-12 15:11

厉害，加油啊

ID:462433 · 发表于 2019-7-30 21:23

非常的不错

ID:586583 · 发表于 2019-8-7 08:43

感谢楼主

ID:654692 · 发表于 2019-12-3 18:05

用的什么元件可以告诉一下么。

ID:655334 · 发表于 2019-12-3 18:19

感谢楼主

ID:646125 · 发表于 2019-12-6 20:49

电感误差太大了

ID:655334 · 发表于 2019-12-9 21:01

楼主有没有只测电感的代码

ID:631951 · 发表于 2019-12-10 09:44

有实物图吗？我想看看电路怎么焊接的？

ID:660548 · 发表于 2019-12-10 14:50

对我帮助很大，谢谢。

ID:196787 · 发表于 2020-3-4 21:06

学习中谢谢楼主分享

帐号		自动登录	找回密码
密码			立即注册

RLC电阻电容电感测量仪Proteus仿真及源程序

评分

相关帖子