577 lines
19 KiB
C
577 lines
19 KiB
C
/*************************************
|
||
LCR表驱动程序 V1.0
|
||
xjw01 于莆田 2011.10
|
||
**************************************/
|
||
//====================================
|
||
#define uchar unsigned char
|
||
#define uint unsigned int
|
||
#define ulong unsigned long
|
||
#include <reg52.h>
|
||
#include <math.h>
|
||
|
||
void delay(uint loop) { uint i; for(i=0;i<loop;i++); } //延时函数
|
||
void delay2(uint k){ for(;k>0;k--) delay(10000); } //长延时,k=100大约对应1秒
|
||
|
||
//========================AD转换=============================
|
||
sfr P1ASF = 0x9D; //将P1置为模拟口寄存器(使能),各位中为1的有效
|
||
sfr ADC_CONTR = 0xBC; //A/D转换控制寄存器
|
||
sfr ADC_res = 0xBD; //A/D转换结果寄存器
|
||
sfr ADC_resl = 0xBE; //A/D转换结果寄存器
|
||
|
||
void set_channel(char channel){
|
||
P1ASF = 1<<channel;
|
||
ADC_CONTR = channel+128; //最高位是电源开关,低3位通道选择
|
||
delay(1); //首次打开电源应延迟,使输入稳定
|
||
}
|
||
uint getAD2(){
|
||
ADC_CONTR |= 0x08; //00001000,置ADC_START=1启动A/D 转换
|
||
while ( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
|
||
ADC_CONTR &= 0xE7; //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
|
||
return ADC_res*4 + ADC_resl;
|
||
}
|
||
/*
|
||
uchar get_AD(){
|
||
ADC_CONTR |= 0x08; //00001000,置ADC_START=1启动A/D 转换
|
||
while( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
|
||
ADC_CONTR &= 0xE7; //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
|
||
return ADC_res;
|
||
}
|
||
*/
|
||
uint getAD10() reentrant { //10次采样
|
||
char i;
|
||
uint c = 0;
|
||
for(i=0;i<10;i++) c += getAD2();
|
||
return c;
|
||
}
|
||
|
||
|
||
//============================EEPROW偏程=========================
|
||
sfr IAP_data = 0xC2;
|
||
sfr IAP_addrH = 0xC3;
|
||
sfr IAP_addrL = 0xC4;
|
||
sfr IAP_cmd = 0xC5;
|
||
sfr IAP_trig = 0xC6;
|
||
sfr IAP_contr = 0xC7;
|
||
/********************
|
||
写字节时,可以将原有数据中的1改为0,无法将0改为1,只能使用擦除命令将0改为1
|
||
应注意,擦除命令会将整个扇区擦除
|
||
*********************/
|
||
void saEEP(){ //EEP保护
|
||
IAP_cmd = 0; //关闭令,保护
|
||
IAP_contr = 0; //关EEPROM,保护
|
||
IAP_trig = 0;
|
||
IAP_addrL = 255; //设置读取地址的低字节,地址改变才需要设置
|
||
IAP_addrH = 255; //设置读取地址的高字节,地址改变才需要设置
|
||
}
|
||
uchar readEEP(uint k){ //读取
|
||
IAP_addrL = k; //设置读取地址的低字节,地址改变才需要设置
|
||
IAP_addrH = k>>8; //设置读取地址的高字节,地址改变才需要设置
|
||
IAP_contr = 0x81; //设置等待时间,1MHz以下取7,2M以下取6,3M取5,6M取4,12M取3,20M取2,24M取1,30M取0,前导1表示许档IAP
|
||
IAP_cmd = 1; //读取值1,写取2,擦除取3,擦除时按所在字节整个扇区撺除
|
||
IAP_trig = 0x5A; //先送5A
|
||
IAP_trig = 0xA5; //先送5A再送A5立即触发
|
||
saEEP(); //保护
|
||
return IAP_data;
|
||
}
|
||
void writeEEP(uint k, uchar da){ //写入
|
||
IAP_data = da; //传入数据
|
||
IAP_addrL = k; //设置读取地址的低字节,地址改变才需要设置
|
||
IAP_addrH = k>>8; //设置读取地址的高字节,地址改变才需要设置
|
||
IAP_contr = 0x81; //设置等待时间,1MHz以下取7,2M以下取6,3M取5,6M取4,12M取3,20M取2,24M取1,30M取0,前导1表示许档IAP
|
||
IAP_cmd = 2; //读取值1,写取2,擦除取3,擦除时按所在字节整个扇区撺除
|
||
IAP_trig = 0x5A; //先送5A
|
||
IAP_trig = 0xA5; //先送5A再送A5立即触发
|
||
saEEP(); //保护
|
||
}
|
||
void eraseEEP(uint k){ //擦除
|
||
IAP_addrL = k; //设置读取地址的低字节,地址改变才需要设置
|
||
IAP_addrH = k>>8; //设置读取地址的高字节,地址改变才需要设置
|
||
IAP_contr = 0x81; //设置等待时间,1MHz以下取7,2M以下取6,3M取5,6M取4,12M取3,20M取2,24M取1,30M取0,前导1表示许档IAP
|
||
IAP_cmd = 3; //读取值1,写取2,擦除取3,擦除时按所在字节整个扇区撺除
|
||
IAP_trig = 0x5A; //先送5A
|
||
IAP_trig = 0xA5; //先送5A再送A5立即触发
|
||
saEEP(); //保护
|
||
}
|
||
|
||
xdata struct Ida{
|
||
char zo[3];//三个频率下的零点改正值
|
||
char j1; //相位补偿(3倍档)
|
||
char j2; //相位补偿(10倍档)
|
||
char J[4]; //相位补偿(V/I变换器)
|
||
char R[4]; //下臂电阻修正(20,1k,10k,100k)
|
||
char g1; //增益修正(3倍档)
|
||
char g2; //增益修正(10倍档)
|
||
} cs;
|
||
|
||
void cs_RW(char rw){
|
||
uchar i,*p = &cs;
|
||
if(rw){
|
||
eraseEEP(0);
|
||
for(i=0;i<sizeof(cs);i++) writeEEP(i,p[i]);
|
||
}else{
|
||
for(i=0;i<sizeof(cs);i++) p[i]=readEEP(i);
|
||
}
|
||
}
|
||
|
||
/**********
|
||
字形编码图
|
||
32
|
||
-
|
||
64| | 128
|
||
- 16
|
||
1| | 8
|
||
_. 4
|
||
2
|
||
**********/
|
||
uchar code zk[20]={235,136,179,186,216,122,123,168,251,250, 59,201,2,18,50}; //字库,0-9,10,11,12,13,14
|
||
uchar code zk2[8]={241,25,11,233,27,50,155,107};//p,n,u,m,0,k,M,G
|
||
|
||
uchar disp[6]={168,251,250}; char cx=-1; //显示缓存,cx光标位置
|
||
sfr P1M1=0x91; //P1端口设置寄存器
|
||
sfr P1M0=0x92; //P1端口设置寄存器
|
||
sfr P0M1=0x93; //P0端口设置寄存器
|
||
sfr P0M0=0x94; //P0端口设置寄存器
|
||
sfr P2M1=0x95; //P2端口设置寄存器
|
||
sfr P2M0=0x96; //P2端口设置寄存器
|
||
sfr P3M1=0xB1; //P3端口设置寄存器
|
||
sfr P3M0=0xB2; //P3端口设置寄存器
|
||
|
||
sbit ds3=P2^4; //数码管扫描口
|
||
sbit ds2=P2^5; //数码管扫描口
|
||
sbit ds1=P2^6; //数码管扫描口
|
||
sbit ds0=P2^7; //数码管扫描口
|
||
|
||
sbit spk=P2^3; //蜂鸣器
|
||
sbit Kb=P2^1; //量程开关B
|
||
sbit Ka=P2^2; //量程开关A
|
||
|
||
sbit DDS2=P1^2;//移相方波输出口
|
||
sbit K3=P1^7;
|
||
sbit K4=P1^6;
|
||
sbit K5=P1^5; //7.8kHz滤波开关
|
||
sbit K6=P1^4;
|
||
sbit K8=P2^0; //100Hz滤波开关
|
||
|
||
|
||
|
||
//==============字符显示函数====================
|
||
xdata uchar menu=1,menu2=0;
|
||
void cls(){ char i; for(i=0;i<6;i++) disp[i]=0; } //清屏
|
||
void showDig(long f){ //显示数字
|
||
uchar i;
|
||
cls();
|
||
for(i=0;i<6;i++) { disp[i]=zk[f%10], f/=10; if(!f) break; }
|
||
}
|
||
void showDig2(float f,char n,char dw){ //显示浮点数,nL是单位下限控制,如n=2时最小显示到u单位
|
||
char i,b=0,b2=0,fh=0;
|
||
if(f<0) fh=1,f=-f;
|
||
for(i=0;i<3;i++){ if(f>=1000) f/=1000, b++; } //以3位为单位移动小数点,把大数转粉0至999,小数点在末字
|
||
for(i=0;i<n;i++){ if(f<1) f*=1000, b--; } //以3位为单位移动小数点,把小数转粉0至999,小数点在末字
|
||
for(i=0;i<3;i++){ if(f<1000) f*=10, b2++; } //对小于1000结果,连同小数点整体移位,使首位移到最左边
|
||
showDig(f+10000); //加10000是为了补零
|
||
disp[b2] += 4; //小数点
|
||
if(!dw) return;
|
||
disp[0] = zk2[b+4]; //显示单位
|
||
if(fh) disp[0] += 4; //显示符号
|
||
}
|
||
|
||
|
||
|
||
//==============低频信号DDS====================
|
||
//PCA相关寄存器
|
||
sfr CMOD = 0xD9; //钟源选择控制等
|
||
sfr CH = 0xF9; //PCA的计数器
|
||
sfr CL = 0xE9; //PCA的计数器
|
||
sfr CCON = 0xD8; //PCA控制寄存器
|
||
sfr CCPAM0 = 0xDA; //PCA模块0工作模式寄存器
|
||
sfr CCPAM1 = 0xDB; //PCA模块1工作模式寄存器
|
||
sfr CCAP0L = 0xEA; //模块0捕获寄存器低位
|
||
sfr CCAP0H = 0xFA; //模块0捕获寄存器高位
|
||
|
||
sbit PPCA = IP^7; //PCA的中断优先级设置
|
||
sbit CCF0 = CCON^0; //PCA的模块0中断标志
|
||
sbit CCF1 = CCON^1; //PCA的模块1中断标志
|
||
sbit CR = CCON^6; //PCA计数器使能
|
||
|
||
void PWM_init(){ //把PCA置为PWM
|
||
CMOD = 2; //0000 0010 计数源选择,钟源取fosc/2
|
||
CL = CH = 0;
|
||
CCAP0L = CCAP0H = 192; //占空比为25%
|
||
//CCPAM0=0x42;//0100 0010,PCA的模块0设置为PWM模式,无中断
|
||
CCPAM0=0x53;//0101 0011,PCA的模块0设置为PWM模式,有中断,下降沿中断
|
||
PPCA = 1; //优先中断
|
||
//CR = 1; //开始计数
|
||
EA = 1; //开总中断
|
||
}
|
||
|
||
uint ph=0, phM=256, feq=1000; //相位,phM相位步进值
|
||
xdata float feqX=1000; //实际输出频率
|
||
uchar code sinB[256]={
|
||
//查询表中不可装载零值,否则会造成无中断产生
|
||
255,255,255,255,255,255,254,254,253,252,252,251,250,249,248,247,246,245,243,242,240,239,237,236,234,232,230,229,227,225,222,220,
|
||
218,216,214,211,209,206,204,201,199,196,194,191,188,185,183,180,177,174,171,168,165,162,159,156,153,150,147,144,140,137,134,131,
|
||
128,125,122,119,116,112,109,106,103,100, 97, 94, 91, 88, 85, 82, 79, 76, 73, 71, 68, 65, 62, 60, 57, 55, 52, 50, 47, 45, 42, 40,
|
||
38, 36, 34, 31, 29, 27, 26, 24, 22, 20, 19, 17, 16, 14, 13, 11, 10, 9, 8, 7, 6, 5, 4, 4, 3, 2, 2, 1, 1, 1, 1, 1,
|
||
1, 1, 1, 1, 1, 1, 2, 2, 3, 4, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 16, 17, 19, 20, 22, 24, 26, 27, 29, 31, 34, 36,
|
||
38, 40, 42, 45, 47, 50, 52, 55, 57, 60, 62, 65, 68, 71, 73, 76, 79, 82, 85, 88, 91, 94, 97,100,103,106,109,112,116,119,122,125,
|
||
128,131,134,137,140,144,147,150,153,156,159,162,165,168,171,174,177,180,183,185,188,191,194,196,199,201,204,206,209,211,214,216,
|
||
218,220,222,225,227,229,230,232,234,236,237,239,240,242,243,245,246,247,248,249,250,251,252,252,253,254,254,255,255,255,255,255
|
||
};
|
||
uchar code fbB[256]={ //方波DDS查询表
|
||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
|
||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
|
||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
|
||
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
|
||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
|
||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
|
||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
|
||
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
|
||
};
|
||
uchar chuX=0; //方波DDS初相
|
||
void PCAinter(void) interrupt 7 {//PCA中断
|
||
uchar x,y;
|
||
CCF0=0; //清除中断请求,以免反复中断
|
||
x = ph >> 8; //截断正弦相位累加器,取高8位
|
||
y = x + chuX; //方波相位
|
||
CCAP0H = sinB[x];//正弦DDS输出
|
||
DDS2 = fbB[y]; //方波DDS输出
|
||
ph += phM; //相位累加
|
||
}
|
||
void setDDS(uint f){ //参考时钟是c=(fosc/2)/256=32000000/2/256=62500,频率f=c*phM/2^16
|
||
feq = f;
|
||
phM=f*65536.0/62500; //phM=f*2^16/62500
|
||
feqX = 62500.0*phM/65536; //实际输出频率
|
||
ph = 0; //高频时,使波形对称
|
||
if(!f) CR=0; else CR=1;
|
||
}
|
||
|
||
//相位控制函数
|
||
xdata char xw=0; //相位
|
||
void set90(char k){ //设置方波的相位差
|
||
k %= 4;
|
||
if(k<0) k += 4;
|
||
if(k==0) chuX=0; //移相0度
|
||
if(k==1) chuX=64; //移相90度
|
||
if(k==2) chuX=128; //移相180度
|
||
if(k==3) chuX=192; //移相270度
|
||
xw = k;
|
||
}
|
||
void set902() { set90(xw+1); } //相位步进
|
||
|
||
//==============量程控制函数====================
|
||
xdata char rng=1; //量程
|
||
void setRng(char k){//切换量程
|
||
if(k==0) Ka=0,Kb=0; //100欧
|
||
if(k==1) Ka=0,Kb=1; //1k欧
|
||
if(k==2) Ka=1,Kb=0; //10k欧
|
||
if(k==3) Ka=1,Kb=1; //100k欧
|
||
rng = k;
|
||
}
|
||
void setRng2(){ setRng( (rng+1)%4); } //量程步进
|
||
|
||
//==============增益控制函数====================
|
||
char curGain=1; //当前增益索引号
|
||
void setGain(char k){ //设置电路增益
|
||
if(k>3) k=3;
|
||
if(k<0) k=0;
|
||
if(k==0) K4=0,K6=0; //1倍
|
||
if(k==1) K4=0,K6=1; //3倍
|
||
if(k==2) K4=1,K6=0; //10倍
|
||
if(k==3) K4=1,K6=1; //30倍
|
||
curGain = k;
|
||
}
|
||
void setGain2(){ setGain((curGain+1)%4); }
|
||
|
||
|
||
//==============LCR测量====================
|
||
xdata int Vxy[4]={0,0,0,0}; //Vxy[Vx1,Vy1,Vx2,Vy2]
|
||
xdata char Sxw[4]={0,1,0,1}; //保存正确相位
|
||
xdata char Vga[4]={1,1,1,1}; //上下臂增益记录表
|
||
xdata uchar tim=0,tims=0;
|
||
xdata char pau=0; //暂停坐标自动旋转
|
||
#define Vfull 9600
|
||
#define gad (9600/30)
|
||
uchar mT = 6; //测量速度
|
||
//==============设置频率====================
|
||
xdata char feqK=1; //频率索引号
|
||
void setF(char k){
|
||
if(k==-1){ //步进
|
||
k = 0;
|
||
if(feq==100) k=1;
|
||
if(feq==1000) k=2;
|
||
if(feq==7813) k=0;
|
||
}
|
||
if(k==0) { setDDS(100); K5=0; K8=1; mT=15; } //置为100Hz
|
||
if(k==1) { setDDS(1000); K5=0; K8=0; mT=6; } //置为1kHz
|
||
if(k==2) { setDDS(7813); K5=1; K8=0; mT=6; } //置为7.8125kHz
|
||
feqK=k;
|
||
TH1 = 47, TL1 = 171; //置为20ms
|
||
tims = 0;
|
||
tim = 0;
|
||
ph = 0;
|
||
}
|
||
int absMax(int a,int b){ //取两个数绝对值最大者
|
||
if(a<0) a = -a;
|
||
if(b<0) b = -b;
|
||
if(b>a) a = b;
|
||
return a;
|
||
}
|
||
#define avn 4 //求平无个数
|
||
xdata float vq[3][avn]; //数据缓存,用于求平均
|
||
void LCRcalc(int *v,char *g){ //LCR计算
|
||
code float ga[4] = { 1, 3, 9, 27 }; //增益表
|
||
code float dwR[4] = { 20, 1e3, 1e4, 1e5 }; //各档电阻表
|
||
xdata int g12 = (int)cs.g1+cs.g2; //增益最大补偿
|
||
xdata int j12 = (int)cs.j1+cs.j2; //相位最大补偿
|
||
xdata float JD = 0,cJD, G = 0; //补偿变量
|
||
xdata float a,b,c,e;
|
||
char i;
|
||
a = +( 1.0*v[2]*v[2] + 1.0*v[3]*v[3] );
|
||
b = -( 1.0*v[0]*v[2] + 1.0*v[1]*v[3] );
|
||
c = -( 1.0*v[2]*v[1] - 1.0*v[0]*v[3] );
|
||
a *= ga[g[0]] / ga[g[2]];
|
||
a /= dwR[rng]*(1+cs.R[rng]/10000.0); //除以下臂电阻阻值
|
||
|
||
//可控增益单元的增益修正、相位补偿量
|
||
if(g[0] == 1) JD += cs.j1, G += cs.g1;
|
||
if(g[0] == 2) JD += cs.j2, G += cs.g2;
|
||
if(g[0] == 3) JD += j12, G += g12;
|
||
if(g[2] == 1) JD -= cs.j1, G -= cs.g1;
|
||
if(g[2] == 2) JD -= cs.j2, G -= cs.g2;
|
||
if(g[2] == 3) JD -= j12, G -= g12;
|
||
JD -= cs.J[rng];
|
||
JD *= feqX/7813/1000;
|
||
cJD = 1 - JD*JD/2;
|
||
a *= 1+G/10000; //增益补偿
|
||
e = b*cJD - c*JD; //相位补偿
|
||
c = b*JD + c*cJD; //相位补偿
|
||
b = e;
|
||
//入队
|
||
for(i=1;i<avn;i++){
|
||
vq[0][i] = vq[0][i-1];
|
||
vq[1][i] = vq[1][i-1];
|
||
vq[2][i] = vq[2][i-1];
|
||
}
|
||
vq[0][0]=a, vq[1][0]=b, vq[2][0]=c;
|
||
}
|
||
|
||
void timerInter1(void) interrupt 3 {//T1中断
|
||
char g; int c;
|
||
if(pau) return;
|
||
tims++;
|
||
if(tims>=mT){ //tim进位触发
|
||
tims = 0, tim++;
|
||
if(tim>=4) tim=0;
|
||
c = getAD10(); //读取电压值
|
||
c -= cs.zo[feqK];
|
||
Vxy[tim] = xw<2 ? c : -c; //保存当前电压
|
||
Vga[tim] = curGain; //保存当前增益
|
||
Sxw[tim] += c<0 ? 2 : 0; //相位翻转(预测下次的相位采用值)
|
||
Sxw[tim] %= 4;
|
||
if(tim==1||tim==3){ //上下臂切换
|
||
//电压模值才能反应运放的输出幅度,所以增益切换判断得用模值
|
||
if(tim==1) K3=1, c = absMax(Vxy[2],Vxy[3]), g=Vga[2]; //切换到下臂
|
||
if(tim==3) K3=0, c = absMax(Vxy[0],Vxy[1]), g=Vga[0]; //切换到上臂
|
||
if(c>Vfull) g--;
|
||
else if(c<gad*1 ) g += 3; //增加27倍
|
||
else if(c<gad*3 ) g += 2; //增加9倍
|
||
else if(c<gad*9) g++; //增加3倍
|
||
setGain(g);
|
||
}
|
||
set90( Sxw[ (tim+1)%4 ] ); //相位旋转
|
||
LCRcalc(Vxy,Vga);
|
||
}
|
||
}
|
||
|
||
char sfdw=1; //是否显示单位
|
||
void showR(char xm, char binLian){ //显示LCR
|
||
char i;
|
||
xdata float a=0,b=0,c=0,e,w;
|
||
for(i=0;i<avn;i++)
|
||
a += vq[0][i]/avn,
|
||
b += vq[1][i]/avn,
|
||
c += vq[2][i]/avn;
|
||
|
||
//电学量显示
|
||
if(!a) { cls(); disp[3]=115;disp[2]=disp[1]=97; return; }
|
||
w = 2*3.1415926*feqX;
|
||
if(!binLian){ //串联
|
||
e = a;
|
||
if(xm==0){ showDig2(c/e,1, sfdw); }//显示X值,显示到毫欧
|
||
if(xm==1){ showDig2(b/e,1, sfdw); }//显示R值,显示到毫欧
|
||
if(xm==2){
|
||
if(c<0) showDig2(e/c/w,4, sfdw); //显示C值,显示到pF
|
||
else showDig2(c/e/w,2, sfdw); //显示L值,显示到uH
|
||
}
|
||
}else{ //并联
|
||
e = (b*b+c*c)/a;
|
||
if(xm==0){ showDig2(e/c,1, sfdw); }//显示并联X值,显示到毫欧
|
||
if(xm==1){ showDig2(e/b,1, sfdw); }//显示并联R值,显示到毫欧
|
||
if(xm==2){
|
||
if(c<0) showDig2(c/e/w,4, sfdw);//显示并联C值,显示到pF
|
||
else showDig2(e/c/w,2, sfdw);//显示并联L值,显示到uH
|
||
}
|
||
}
|
||
if(xm==3){ //显示Q值
|
||
if(!b) { showDig(9999); return; }
|
||
c = fabs(c/b);
|
||
if (c>=1000) { showDig(999 ); }
|
||
else if(c>=100 ) { showDig(c ); }
|
||
else if(c>=10 ) { showDig(c*10 ); disp[1] += 4; }
|
||
else if(c>=1 ) { showDig(c*100 ); disp[2] += 4; }
|
||
else { showDig(c*1000); disp[3] += 4; }
|
||
}
|
||
}
|
||
//void timerInter(void) interrupt 1 {}//T0中断
|
||
|
||
void showMsg(uchar a){ //临时跳出信息
|
||
P0 = ~a;
|
||
ds0=1, ds1=ds2=ds3=0;
|
||
delay2(50);
|
||
}
|
||
main(){
|
||
uchar i=0,kn=0,key=0;
|
||
uchar dispN=0; //显示扫描索引
|
||
uchar spkN=0; //蜂鸣器发声时长
|
||
uint nn=0;
|
||
uchar XRQ=1;
|
||
char binLian=0; //并联1,串联0
|
||
|
||
delay2(80); //启动延时
|
||
cs_RW(0); //读EEPROM
|
||
|
||
TCON=0, TMOD=0x12; //将T0置为自动重装定时器,T1置为定时器
|
||
TH1 = 0, TL1 = 0;
|
||
TR1=1; //T1开始计数
|
||
TR0=0; //T0暂停计数
|
||
ET1=1; //T1开中断
|
||
ET0=1; //T1开中断
|
||
EA=1; //开总中断
|
||
PT0=1; //设置优先级
|
||
|
||
|
||
set_channel(0); //设置AD转换通道
|
||
P2M0 = 0xFF; //P2.01234567置为推勉输出
|
||
P1M0 = 0xFC; //P1.234567置为推换口
|
||
P1M1 = 0x03; //P1.0置为高阻抗
|
||
|
||
//请注意启动延时0.5秒方可读取cs_RW
|
||
//cs_RW(0); //读取比值基数(调零时已做开机延时,确保电压上升到可读取EEPROW)
|
||
|
||
PWM_init();//DDS初始化
|
||
set90(2); //初始设置相位
|
||
setRng(1); //初始设置量程
|
||
setGain(1); //初始设置增益
|
||
setF(1); //DDS初始设置为1kHz
|
||
|
||
while(1){
|
||
//显示disp
|
||
nn++;
|
||
dispN=(++dispN)%4; //扫描器移动
|
||
ds0=ds1=ds2=ds3=0;
|
||
if(dispN==0) ds0=1;
|
||
if(dispN==1) ds1=1;
|
||
if(dispN==2) ds2=1;
|
||
if(dispN==3) ds3=1;
|
||
P0=~disp[dispN]; //显示
|
||
//扫描键盘
|
||
//键盘响应
|
||
//key = (~P3)&0xfc;
|
||
key = ~P3;
|
||
if(key&&kn<255) kn++; else kn=0;
|
||
for(i=0;key;i++) key/=2; key=i;
|
||
if(kn==20) spkN=50; else key=0; //当按下一定时间后,key才有效,否则无效。spkN发声时长设置
|
||
if(spkN) spkN--, spk=0; else spk=1; //键盘发声
|
||
//菜单系统
|
||
if(key==8) { menu=0; key=0; XRQ=-1;} //菜单键
|
||
if(menu>=1&&menu<=4){
|
||
if(key==7) setRng2(); //量程步进
|
||
if(key==6) setF(-1); //设置频率
|
||
}
|
||
if(menu==0){ //显示量程和菜单
|
||
showDig(10000);
|
||
if(key>=1 && key<=7) menu = key, menu2 = 0;
|
||
key = 0;
|
||
}
|
||
if(menu==1){ //自动LCR测量(串联)
|
||
pau = 0;
|
||
if(XRQ==-1) XRQ=1, sfdw=1;
|
||
if(key==4) { //串并联切换
|
||
if(binLian) { binLian=0; showMsg(122); } //转为串联
|
||
else { binLian=1; showMsg(241); } //转为并联
|
||
}
|
||
if(key==1) { if(XRQ==0) sfdw++; else sfdw=1; XRQ = 0; }
|
||
if(key==2) { if(XRQ==1) sfdw++; else sfdw=1; XRQ = 1; }
|
||
if(key==3) { if(XRQ==2) sfdw++; else sfdw=1; XRQ = 2; }
|
||
if(key==5) XRQ = 3;
|
||
sfdw %= 2;
|
||
showR(XRQ,binLian);
|
||
if(binLian && nn%512<50) { for(i=0;i<4;i++) disp[i] |= 4; }
|
||
}
|
||
if(menu==2){ //显示增益档位
|
||
showDig(Vga[0]*100+Vga[2]+10000);
|
||
disp[1]=disp[3]=0;
|
||
}
|
||
if(menu==3){ //手动调试
|
||
pau = 1;
|
||
if(key==1) { setGain2(); showMsg( zk[curGain] );} //增益控制
|
||
if(key==2) { };
|
||
if(key==3) { K3=~K3; showMsg(zk[K3]); } //切换上下臂
|
||
if(key==4) { set902(); showMsg(zk[xw]); } //相位旋转
|
||
if(nn%64==0) { showDig( getAD10()); disp[1]+=4; }
|
||
}
|
||
if(menu==7){ //设置零点偏移数
|
||
char *p,bc=1, feqD=1,rngD=1;
|
||
static char kc=0, mo=0;
|
||
if(menu2==0) p = cs.zo+0, feqD=0, rngD=2; //100Hz零点校准,接入10欧电阻
|
||
if(menu2==1) p = cs.zo+1, feqD=1, rngD=2; //1kHz零点校准,接入10欧电阻
|
||
if(menu2==2) p = cs.zo+2, feqD=2, rngD=2; //7.8kHz零点校准,接入10欧电阻
|
||
if(menu2==3) p = cs.J+0, feqD=2, rngD=0; //VI变换器相位校准,接入20电阻
|
||
if(menu2==4) p = cs.J+1, feqD=2, rngD=1; //VI变换器相位校准,接入1k电阻
|
||
if(menu2==5) p = cs.J+2, feqD=2, rngD=2; //VI变换器相位校准,接入10k电阻
|
||
if(menu2==6) p = cs.J+3, feqD=2, rngD=3; //VI变换器相位校准,接入100k电阻
|
||
if(menu2==7) p = &cs.j1, feqD=2, rngD=1; //运放3倍档相位校准,接入3.3k电阻
|
||
if(menu2==8) p = &cs.j2, feqD=2, rngD=1; //运放10倍档相位校准,接入10k电阻
|
||
if(menu2==9) p = cs.R+0, bc=2, feqD=1, rngD=0; //VI变换器模值校准,接入20欧
|
||
if(menu2==10) p = cs.R+1, bc=2, feqD=1, rngD=1; //VI变换器模值校准,接入1k欧
|
||
if(menu2==11) p = cs.R+2, bc=2, feqD=1, rngD=2; //VI变换器模值校准,接入10k欧
|
||
if(menu2==12) p = cs.R+3, bc=2, feqD=1, rngD=3; //VI变换器模值校准,接入100k欧
|
||
if(menu2==13) p = &cs.g1, bc=2, feqD=1, rngD=1; //运放3倍增益校准,接入2k欧电阻
|
||
if(menu2==14) p = &cs.g2, bc=2, feqD=1, rngD=1; //运放10倍增益校准,接入10k欧电阻
|
||
if(key==1) *p += bc; //X键增
|
||
if(key==2) *p -= bc; //R键减
|
||
if(key==3) { cs_RW(1); setF(feqK); } //L键保存
|
||
if(key==4) *p = 0; //C键清除
|
||
if(key==5) { if(menu2==0) menu2=14; else menu2--; mo=0; showMsg(menu2<9?zk[menu2]:zk[menu2-6]+4); }
|
||
if(key==6) { if(menu2==14)menu2=0; else menu2++; mo=0; showMsg(menu2<9?zk[menu2]:zk[menu2-6]+4); }
|
||
if(key==7) mo = (mo+1)%2;
|
||
if(key==4){ //恢复到默认值
|
||
if(++kc==5){
|
||
kc = 0;
|
||
cs.j1 = 16, cs.j2 = 18;
|
||
cs.g1 = 0, cs.g2 = 0;
|
||
cs.zo[0] = 15;
|
||
cs.zo[1] = 17;
|
||
cs.zo[2] = 15;
|
||
cs.J[0] = cs.J[1] = cs.J[2] = 0, cs.J[3] = 20;
|
||
cs.R[0] = cs.R[1] = cs.R[2] = cs.R[3] = 0;
|
||
}
|
||
}
|
||
else { if(key) kc=0; }
|
||
if(mo){
|
||
if(feqD!=feqK) setF(feqD);
|
||
if(rngD!=rng) setRng(rngD);
|
||
if(menu2>=3 && menu2<=8) showR(3,1); //显示Q
|
||
else showR(1,1); //显示电阻
|
||
}else{
|
||
sfdw = 0;
|
||
showDig(abs(*p));
|
||
if(*p<0) disp[3] = 16;
|
||
}
|
||
}
|
||
delay(4000);
|
||
}//while end
|
||
}
|
||
|
||
|