577 lines
19 KiB
C
577 lines
19 KiB
C
|
/*************************************
|
|||
|
LCR<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> V1.0
|
|||
|
xjw01 <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 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++); } //<2F><>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>
|
|||
|
void delay2(uint k){ for(;k>0;k--) delay(10000); } //<2F><><EFBFBD><EFBFBD>ʱ,k=100<30><30>Լ<EFBFBD><D4BC>Ӧ1<D3A6><31>
|
|||
|
|
|||
|
//========================ADת<44><D7AA>=============================
|
|||
|
sfr P1ASF = 0x9D; //<2F><>P1<50><31>Ϊģ<CEAA><C4A3><EFBFBD>ڼĴ<DABC><C4B4><EFBFBD>(ʹ<><CAB9>),<2C><>λ<EFBFBD><CEBB>Ϊ1<CEAA><31><EFBFBD><EFBFBD>Ч
|
|||
|
sfr ADC_CONTR = 0xBC; //A/Dת<44><D7AA><EFBFBD><EFBFBD><EFBFBD>ƼĴ<C6BC><C4B4><EFBFBD>
|
|||
|
sfr ADC_res = 0xBD; //A/Dת<44><D7AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD>
|
|||
|
sfr ADC_resl = 0xBE; //A/Dת<44><D7AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD>
|
|||
|
|
|||
|
void set_channel(char channel){
|
|||
|
P1ASF = 1<<channel;
|
|||
|
ADC_CONTR = channel+128; //<2F><><EFBFBD><EFBFBD>λ<EFBFBD>ǵ<EFBFBD>Դ<EFBFBD><D4B4><EFBFBD><EFBFBD>,<2C><>3λͨ<CEBB><CDA8>ѡ<EFBFBD><D1A1>
|
|||
|
delay(1); //<2F>״δ<CEB4>ԴӦ<D4B4>ӳ٣<D3B3>ʹ<EFBFBD><CAB9><EFBFBD><EFBFBD><EFBFBD>ȶ<EFBFBD>
|
|||
|
}
|
|||
|
uint getAD2(){
|
|||
|
ADC_CONTR |= 0x08; //00001000,<2C><>ADC_START=1<><31><EFBFBD><EFBFBD>A/D ת<><D7AA>
|
|||
|
while ( !(ADC_CONTR & 0x10) ); //<2F>ȴ<EFBFBD>A/Dת<44><D7AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(ADC_FLAG==0)
|
|||
|
ADC_CONTR &= 0xE7; //11100111,<2C><>ADC_FLAG=0<><30><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><>ADC_START=0<>ر<EFBFBD>A/D ת<><D7AA>
|
|||
|
return ADC_res*4 + ADC_resl;
|
|||
|
}
|
|||
|
/*
|
|||
|
uchar get_AD(){
|
|||
|
ADC_CONTR |= 0x08; //00001000,<2C><>ADC_START=1<><31><EFBFBD><EFBFBD>A/D ת<><D7AA>
|
|||
|
while( !(ADC_CONTR & 0x10) ); //<2F>ȴ<EFBFBD>A/Dת<44><D7AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(ADC_FLAG==0)
|
|||
|
ADC_CONTR &= 0xE7; //11100111,<2C><>ADC_FLAG=0<><30><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><>ADC_START=0<>ر<EFBFBD>A/D ת<><D7AA>
|
|||
|
return ADC_res;
|
|||
|
}
|
|||
|
*/
|
|||
|
uint getAD10() reentrant { //10<31>β<EFBFBD><CEB2><EFBFBD>
|
|||
|
char i;
|
|||
|
uint c = 0;
|
|||
|
for(i=0;i<10;i++) c += getAD2();
|
|||
|
return c;
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
//============================EEPROWƫ<57><C6AB>=========================
|
|||
|
sfr IAP_data = 0xC2;
|
|||
|
sfr IAP_addrH = 0xC3;
|
|||
|
sfr IAP_addrL = 0xC4;
|
|||
|
sfr IAP_cmd = 0xC5;
|
|||
|
sfr IAP_trig = 0xC6;
|
|||
|
sfr IAP_contr = 0xC7;
|
|||
|
/********************
|
|||
|
д<EFBFBD>ֽ<EFBFBD>ʱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Խ<EFBFBD>ԭ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>е<EFBFBD>1<EFBFBD><EFBFBD>Ϊ0<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>0<EFBFBD><EFBFBD>Ϊ1<EFBFBD><EFBFBD>ֻ<EFBFBD><EFBFBD>ʹ<EFBFBD>ò<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>0<EFBFBD><EFBFBD>Ϊ1
|
|||
|
Ӧע<EFBFBD>⣬<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ὣ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
*********************/
|
|||
|
void saEEP(){ //EEP<45><50><EFBFBD><EFBFBD>
|
|||
|
IAP_cmd = 0; //<2F>ر<EFBFBD><D8B1><EFBFBD><EEA3AC><EFBFBD><EFBFBD>
|
|||
|
IAP_contr = 0; //<2F><>EEPROM<4F><4D><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
IAP_trig = 0;
|
|||
|
IAP_addrL = 255; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĵ<EFBFBD><C4B5>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_addrH = 255; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĸ<EFBFBD><C4B8>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
}
|
|||
|
uchar readEEP(uint k){ //<2F><>ȡ
|
|||
|
IAP_addrL = k; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĵ<EFBFBD><C4B5>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_addrH = k>>8; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĸ<EFBFBD><C4B8>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_contr = 0x81; //<2F><><EFBFBD>õȴ<C3B5>ʱ<EFBFBD>䣬1MHz<48><7A><EFBFBD><EFBFBD>ȡ7<C8A1><37>2M<32><4D><EFBFBD><EFBFBD>ȡ6<C8A1><36>3Mȡ5<C8A1><35>6Mȡ4<C8A1><34>12Mȡ3<C8A1><33>20Mȡ2<C8A1><32>24Mȡ1<C8A1><31>30Mȡ0<C8A1><30>ǰ<EFBFBD><C7B0>1<EFBFBD><31>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>IAP
|
|||
|
IAP_cmd = 1; //<2F><>ȡֵ1<D6B5><31>дȡ2<C8A1><32><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ3<C8A1><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֽ<EFBFBD><D6BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ߥ<EFBFBD><DFA5>
|
|||
|
IAP_trig = 0x5A; //<2F><><EFBFBD><EFBFBD>5A
|
|||
|
IAP_trig = 0xA5; //<2F><><EFBFBD><EFBFBD>5A<35><41><EFBFBD><EFBFBD>A5<41><35><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
saEEP(); //<2F><><EFBFBD><EFBFBD>
|
|||
|
return IAP_data;
|
|||
|
}
|
|||
|
void writeEEP(uint k, uchar da){ //д<><D0B4>
|
|||
|
IAP_data = da; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
IAP_addrL = k; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĵ<EFBFBD><C4B5>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_addrH = k>>8; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĸ<EFBFBD><C4B8>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_contr = 0x81; //<2F><><EFBFBD>õȴ<C3B5>ʱ<EFBFBD>䣬1MHz<48><7A><EFBFBD><EFBFBD>ȡ7<C8A1><37>2M<32><4D><EFBFBD><EFBFBD>ȡ6<C8A1><36>3Mȡ5<C8A1><35>6Mȡ4<C8A1><34>12Mȡ3<C8A1><33>20Mȡ2<C8A1><32>24Mȡ1<C8A1><31>30Mȡ0<C8A1><30>ǰ<EFBFBD><C7B0>1<EFBFBD><31>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>IAP
|
|||
|
IAP_cmd = 2; //<2F><>ȡֵ1<D6B5><31>дȡ2<C8A1><32><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ3<C8A1><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֽ<EFBFBD><D6BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ߥ<EFBFBD><DFA5>
|
|||
|
IAP_trig = 0x5A; //<2F><><EFBFBD><EFBFBD>5A
|
|||
|
IAP_trig = 0xA5; //<2F><><EFBFBD><EFBFBD>5A<35><41><EFBFBD><EFBFBD>A5<41><35><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
saEEP(); //<2F><><EFBFBD><EFBFBD>
|
|||
|
}
|
|||
|
void eraseEEP(uint k){ //<2F><><EFBFBD><EFBFBD>
|
|||
|
IAP_addrL = k; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĵ<EFBFBD><C4B5>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_addrH = k>>8; //<2F><><EFBFBD>ö<EFBFBD>ȡ<EFBFBD><C8A1>ַ<EFBFBD>ĸ<EFBFBD><C4B8>ֽڣ<D6BD><DAA3><EFBFBD>ַ<EFBFBD>ı<EFBFBD><C4B1><EFBFBD><EFBFBD><EFBFBD>Ҫ<EFBFBD><D2AA><EFBFBD><EFBFBD>
|
|||
|
IAP_contr = 0x81; //<2F><><EFBFBD>õȴ<C3B5>ʱ<EFBFBD>䣬1MHz<48><7A><EFBFBD><EFBFBD>ȡ7<C8A1><37>2M<32><4D><EFBFBD><EFBFBD>ȡ6<C8A1><36>3Mȡ5<C8A1><35>6Mȡ4<C8A1><34>12Mȡ3<C8A1><33>20Mȡ2<C8A1><32>24Mȡ1<C8A1><31>30Mȡ0<C8A1><30>ǰ<EFBFBD><C7B0>1<EFBFBD><31>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>IAP
|
|||
|
IAP_cmd = 3; //<2F><>ȡֵ1<D6B5><31>дȡ2<C8A1><32><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ3<C8A1><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֽ<EFBFBD><D6BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ߥ<EFBFBD><DFA5>
|
|||
|
IAP_trig = 0x5A; //<2F><><EFBFBD><EFBFBD>5A
|
|||
|
IAP_trig = 0xA5; //<2F><><EFBFBD><EFBFBD>5A<35><41><EFBFBD><EFBFBD>A5<41><35><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
saEEP(); //<2F><><EFBFBD><EFBFBD>
|
|||
|
}
|
|||
|
|
|||
|
xdata struct Ida{
|
|||
|
char zo[3];//<2F><><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD>µ<EFBFBD><C2B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵ
|
|||
|
char j1; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>(3<><33><EFBFBD><EFBFBD>)
|
|||
|
char j2; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>(10<31><30><EFBFBD><EFBFBD>)
|
|||
|
char J[4]; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>(V/I<>任<EFBFBD><E4BBBB>)
|
|||
|
char R[4]; //<2F>±۵<C2B1><DBB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(20,1k,10k,100k)
|
|||
|
char g1; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(3<><33><EFBFBD><EFBFBD>)
|
|||
|
char g2; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(10<31><30><EFBFBD><EFBFBD>)
|
|||
|
} 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);
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
/**********
|
|||
|
<EFBFBD><EFBFBD><EFBFBD>α<EFBFBD><EFBFBD><EFBFBD>ͼ
|
|||
|
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}; //<2F>ֿ<EFBFBD>,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; //<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>,cx<63><78><EFBFBD><EFBFBD>λ<EFBFBD><CEBB>
|
|||
|
sfr P1M1=0x91; //P1<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P1M0=0x92; //P1<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P0M1=0x93; //P0<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P0M0=0x94; //P0<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P2M1=0x95; //P2<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P2M0=0x96; //P2<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P3M1=0xB1; //P3<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
sfr P3M0=0xB2; //P3<50>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>üĴ<C3BC><C4B4><EFBFBD>
|
|||
|
|
|||
|
sbit ds3=P2^4; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɨ<EFBFBD><C9A8><EFBFBD><EFBFBD>
|
|||
|
sbit ds2=P2^5; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɨ<EFBFBD><C9A8><EFBFBD><EFBFBD>
|
|||
|
sbit ds1=P2^6; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɨ<EFBFBD><C9A8><EFBFBD><EFBFBD>
|
|||
|
sbit ds0=P2^7; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɨ<EFBFBD><C9A8><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
sbit spk=P2^3; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sbit Kb=P2^1; //<2F><><EFBFBD>̿<EFBFBD><CCBF><EFBFBD>B
|
|||
|
sbit Ka=P2^2; //<2F><><EFBFBD>̿<EFBFBD><CCBF><EFBFBD>A
|
|||
|
|
|||
|
sbit DDS2=P1^2;//<2F><><EFBFBD><EFBFBD><E0B7BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sbit K3=P1^7;
|
|||
|
sbit K4=P1^6;
|
|||
|
sbit K5=P1^5; //7.8kHz<EFBFBD>˲<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sbit K6=P1^4;
|
|||
|
sbit K8=P2^0; //100Hz<48>˲<EFBFBD><CBB2><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
|
|||
|
|
|||
|
//==============<3D>ַ<EFBFBD><D6B7><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>====================
|
|||
|
xdata uchar menu=1,menu2=0;
|
|||
|
void cls(){ char i; for(i=0;i<6;i++) disp[i]=0; } //<2F><><EFBFBD><EFBFBD>
|
|||
|
void showDig(long f){ //<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>
|
|||
|
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){ //<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,nL<6E>ǵ<EFBFBD>λ<EFBFBD><CEBB><EFBFBD><EFBFBD><DEBF><EFBFBD>,<2C><>n=2ʱ<32><CAB1>С<EFBFBD><D0A1>ʾ<EFBFBD><CABE>u<EFBFBD><75>λ
|
|||
|
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++; } //<2F><>3λΪ<CEBB><CEAA>λ<EFBFBD>ƶ<EFBFBD>С<EFBFBD><D0A1><EFBFBD>㣬<EFBFBD>Ѵ<EFBFBD><D1B4><EFBFBD>ת<EFBFBD><D7AA>0<EFBFBD><30>999,С<><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĩ<EFBFBD><C4A9>
|
|||
|
for(i=0;i<n;i++){ if(f<1) f*=1000, b--; } //<2F><>3λΪ<CEBB><CEAA>λ<EFBFBD>ƶ<EFBFBD>С<EFBFBD><D0A1><EFBFBD>㣬<EFBFBD><E3A3AC>С<EFBFBD><D0A1>ת<EFBFBD><D7AA>0<EFBFBD><30>999,С<><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ĩ<EFBFBD><C4A9>
|
|||
|
for(i=0;i<3;i++){ if(f<1000) f*=10, b2++; } //<2F><>С<EFBFBD><D0A1>1000<30><30><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͬС<CDAC><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD><CEBB>ʹ<EFBFBD><CAB9>λ<EFBFBD>Ƶ<EFBFBD><C6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
showDig(f+10000); //<2F><>10000<30><30>Ϊ<EFBFBD>˲<EFBFBD><CBB2><EFBFBD>
|
|||
|
disp[b2] += 4; //С<><D0A1><EFBFBD><EFBFBD>
|
|||
|
if(!dw) return;
|
|||
|
disp[0] = zk2[b+4]; //<2F><>ʾ<EFBFBD><CABE>λ
|
|||
|
if(fh) disp[0] += 4; //<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
|
|||
|
//==============<3D><>Ƶ<EFBFBD>ź<EFBFBD>DDS====================
|
|||
|
//PCA<43><41><EFBFBD>ؼĴ<D8BC><C4B4><EFBFBD>
|
|||
|
sfr CMOD = 0xD9; //<2F><>Դѡ<D4B4><D1A1><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD>
|
|||
|
sfr CH = 0xF9; //PCA<43>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sfr CL = 0xE9; //PCA<43>ļ<EFBFBD><C4BC><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sfr CCON = 0xD8; //PCA<43><41><EFBFBD>ƼĴ<C6BC><C4B4><EFBFBD>
|
|||
|
sfr CCPAM0 = 0xDA; //PCAģ<41><C4A3>0<EFBFBD><30><EFBFBD><EFBFBD>ģʽ<C4A3>Ĵ<EFBFBD><C4B4><EFBFBD>
|
|||
|
sfr CCPAM1 = 0xDB; //PCAģ<41><C4A3>1<EFBFBD><31><EFBFBD><EFBFBD>ģʽ<C4A3>Ĵ<EFBFBD><C4B4><EFBFBD>
|
|||
|
sfr CCAP0L = 0xEA; //ģ<><C4A3>0<EFBFBD><30><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD><EFBFBD><EFBFBD>λ
|
|||
|
sfr CCAP0H = 0xFA; //ģ<><C4A3>0<EFBFBD><30><EFBFBD><EFBFBD><EFBFBD>Ĵ<EFBFBD><C4B4><EFBFBD><EFBFBD><EFBFBD>λ
|
|||
|
|
|||
|
sbit PPCA = IP^7; //PCA<43><41><EFBFBD>ж<EFBFBD><D0B6><EFBFBD><EFBFBD>ȼ<EFBFBD><C8BC><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
sbit CCF0 = CCON^0; //PCA<43><41>ģ<EFBFBD><C4A3>0<EFBFBD>жϱ<D0B6>־
|
|||
|
sbit CCF1 = CCON^1; //PCA<43><41>ģ<EFBFBD><C4A3>1<EFBFBD>жϱ<D0B6>־
|
|||
|
sbit CR = CCON^6; //PCA<43><41><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʹ<EFBFBD><CAB9>
|
|||
|
|
|||
|
void PWM_init(){ //<2F><>PCA<43><41>ΪPWM
|
|||
|
CMOD = 2; //0000 0010 <20><><EFBFBD><EFBFBD>Դѡ<D4B4><D1A1>,<2C><>Դȡfosc/2
|
|||
|
CL = CH = 0;
|
|||
|
CCAP0L = CCAP0H = 192; //ռ<>ձ<EFBFBD>Ϊ25%
|
|||
|
//CCPAM0=0x42;//0100 0010,PCA<43><41>ģ<EFBFBD><C4A3>0<EFBFBD><30><EFBFBD><EFBFBD>ΪPWMģʽ,<2C><><EFBFBD>ж<EFBFBD>
|
|||
|
CCPAM0=0x53;//0101 0011,PCA<43><41>ģ<EFBFBD><C4A3>0<EFBFBD><30><EFBFBD><EFBFBD>ΪPWMģʽ,<2C><><EFBFBD>жϣ<D0B6><CFA3>½<EFBFBD><C2BD><EFBFBD><EFBFBD>ж<EFBFBD>
|
|||
|
PPCA = 1; //<2F><><EFBFBD><EFBFBD><EFBFBD>ж<EFBFBD>
|
|||
|
//CR = 1; //<2F><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD>
|
|||
|
EA = 1; //<2F><><EFBFBD><EFBFBD><EFBFBD>ж<EFBFBD>
|
|||
|
}
|
|||
|
|
|||
|
uint ph=0, phM=256, feq=1000; //<2F><>λ,phM<68><4D>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>ֵ
|
|||
|
xdata float feqX=1000; //ʵ<><CAB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>
|
|||
|
uchar code sinB[256]={
|
|||
|
//<2F><>ѯ<EFBFBD><D1AF><EFBFBD>в<EFBFBD><D0B2><EFBFBD>װ<EFBFBD><D7B0><EFBFBD><EFBFBD>ֵ<EFBFBD><D6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>жϲ<D0B6><CFB2><EFBFBD>
|
|||
|
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]={ //<2F><><EFBFBD><EFBFBD>DDS<44><53>ѯ<EFBFBD><D1AF>
|
|||
|
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; //<2F><><EFBFBD><EFBFBD>DDS<44><53><EFBFBD><EFBFBD>
|
|||
|
void PCAinter(void) interrupt 7 {//PCA<43>ж<EFBFBD>
|
|||
|
uchar x,y;
|
|||
|
CCF0=0; //<2F><><EFBFBD><EFBFBD><EFBFBD>ж<EFBFBD><D0B6><EFBFBD><EFBFBD><EFBFBD>,<2C><><EFBFBD>ⷴ<EFBFBD><E2B7B4><EFBFBD>ж<EFBFBD>
|
|||
|
x = ph >> 8; //<2F>ض<EFBFBD><D8B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD>ۼ<EFBFBD><DBBC><EFBFBD>,ȡ<><C8A1>8λ
|
|||
|
y = x + chuX; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ
|
|||
|
CCAP0H = sinB[x];//<2F><><EFBFBD><EFBFBD>DDS<44><53><EFBFBD><EFBFBD>
|
|||
|
DDS2 = fbB[y]; //<2F><><EFBFBD><EFBFBD>DDS<44><53><EFBFBD><EFBFBD>
|
|||
|
ph += phM; //<2F><>λ<EFBFBD>ۼ<EFBFBD>
|
|||
|
}
|
|||
|
void setDDS(uint f){ //<2F>ο<EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>c=(fosc/2)/256=32000000/2/256=62500,Ƶ<><C6B5>f=c*phM/2^16
|
|||
|
feq = f;
|
|||
|
phM=f*65536.0/62500; //phM=f*2^16/62500
|
|||
|
feqX = 62500.0*phM/65536; //ʵ<><CAB5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>
|
|||
|
ph = 0; //<2F><>Ƶʱ<C6B5><CAB1>ʹ<EFBFBD><CAB9><EFBFBD>ζԳ<CEB6>
|
|||
|
if(!f) CR=0; else CR=1;
|
|||
|
}
|
|||
|
|
|||
|
//<2F><>λ<EFBFBD><CEBB><EFBFBD>ƺ<EFBFBD><C6BA><EFBFBD>
|
|||
|
xdata char xw=0; //<2F><>λ
|
|||
|
void set90(char k){ //<2F><><EFBFBD>÷<EFBFBD><C3B7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD><CEBB>
|
|||
|
k %= 4;
|
|||
|
if(k<0) k += 4;
|
|||
|
if(k==0) chuX=0; //<2F><><EFBFBD><EFBFBD>0<EFBFBD><30>
|
|||
|
if(k==1) chuX=64; //<2F><><EFBFBD><EFBFBD>90<39><30>
|
|||
|
if(k==2) chuX=128; //<2F><><EFBFBD><EFBFBD>180<38><30>
|
|||
|
if(k==3) chuX=192; //<2F><><EFBFBD><EFBFBD>270<37><30>
|
|||
|
xw = k;
|
|||
|
}
|
|||
|
void set902() { set90(xw+1); } //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>
|
|||
|
|
|||
|
//==============<3D><><EFBFBD>̿<EFBFBD><CCBF>ƺ<EFBFBD><C6BA><EFBFBD>====================
|
|||
|
xdata char rng=1; //<2F><><EFBFBD><EFBFBD>
|
|||
|
void setRng(char k){//<2F>л<EFBFBD><D0BB><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
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); } //<2F><><EFBFBD>̲<EFBFBD><CCB2><EFBFBD>
|
|||
|
|
|||
|
//==============<3D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƺ<EFBFBD><C6BA><EFBFBD>====================
|
|||
|
char curGain=1; //<2F><>ǰ<EFBFBD><C7B0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
void setGain(char k){ //<2F><><EFBFBD>õ<EFBFBD>·<EFBFBD><C2B7><EFBFBD><EFBFBD>
|
|||
|
if(k>3) k=3;
|
|||
|
if(k<0) k=0;
|
|||
|
if(k==0) K4=0,K6=0; //1<><31>
|
|||
|
if(k==1) K4=0,K6=1; //3<><33>
|
|||
|
if(k==2) K4=1,K6=0; //10<31><30>
|
|||
|
if(k==3) K4=1,K6=1; //30<33><30>
|
|||
|
curGain = k;
|
|||
|
}
|
|||
|
void setGain2(){ setGain((curGain+1)%4); }
|
|||
|
|
|||
|
|
|||
|
//==============LCR<43><52><EFBFBD><EFBFBD>====================
|
|||
|
xdata int Vxy[4]={0,0,0,0}; //Vxy[Vx1,Vy1,Vx2,Vy2]
|
|||
|
xdata char Sxw[4]={0,1,0,1}; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȷ<EFBFBD><C8B7>λ
|
|||
|
xdata char Vga[4]={1,1,1,1}; //<2F><><EFBFBD>±<EFBFBD><C2B1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><C2BC>
|
|||
|
xdata uchar tim=0,tims=0;
|
|||
|
xdata char pau=0; //<2F><>ͣ<EFBFBD><CDA3><EFBFBD><EFBFBD><EFBFBD>Զ<EFBFBD><D4B6><EFBFBD>ת
|
|||
|
#define Vfull 9600
|
|||
|
#define gad (9600/30)
|
|||
|
uchar mT = 6; //<2F><><EFBFBD><EFBFBD><EFBFBD>ٶ<EFBFBD>
|
|||
|
//==============<3D><><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>====================
|
|||
|
xdata char feqK=1; //Ƶ<><C6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
void setF(char k){
|
|||
|
if(k==-1){ //<2F><><EFBFBD><EFBFBD>
|
|||
|
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; } //<2F><>Ϊ100Hz
|
|||
|
if(k==1) { setDDS(1000); K5=0; K8=0; mT=6; } //<2F><>Ϊ1kHz
|
|||
|
if(k==2) { setDDS(7813); K5=1; K8=0; mT=6; } //<2F><>Ϊ7.8125kHz
|
|||
|
feqK=k;
|
|||
|
TH1 = 47, TL1 = 171; //<2F><>Ϊ20ms
|
|||
|
tims = 0;
|
|||
|
tim = 0;
|
|||
|
ph = 0;
|
|||
|
}
|
|||
|
int absMax(int a,int b){ //ȡ<><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵ<EFBFBD><D6B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if(a<0) a = -a;
|
|||
|
if(b<0) b = -b;
|
|||
|
if(b>a) a = b;
|
|||
|
return a;
|
|||
|
}
|
|||
|
#define avn 4 //<2F><>ƽ<EFBFBD><EFBFBD><DEB8><EFBFBD>
|
|||
|
xdata float vq[3][avn]; //<2F><><EFBFBD>ݻ<EFBFBD><DDBB>棬<EFBFBD><E6A3AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƽ<EFBFBD><C6BD>
|
|||
|
void LCRcalc(int *v,char *g){ //LCR<43><52><EFBFBD><EFBFBD>
|
|||
|
code float ga[4] = { 1, 3, 9, 27 }; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
code float dwR[4] = { 20, 1e3, 1e4, 1e5 }; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
xdata int g12 = (int)cs.g1+cs.g2; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
xdata int j12 = (int)cs.j1+cs.j2; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>
|
|||
|
xdata float JD = 0,cJD, G = 0; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
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); //<2F><><EFBFBD><EFBFBD><EFBFBD>±۵<C2B1><DBB5><EFBFBD><EFBFBD><EFBFBD>ֵ
|
|||
|
|
|||
|
//<2F>ɿ<EFBFBD><C9BF><EFBFBD><EFBFBD>浥Ԫ<E6B5A5><D4AA><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD><CEBB><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
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; //<2F><><EFBFBD>油<EFBFBD><E6B2B9>
|
|||
|
e = b*cJD - c*JD; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>
|
|||
|
c = b*JD + c*cJD; //<2F><>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>
|
|||
|
b = e;
|
|||
|
//<2F><><EFBFBD><EFBFBD>
|
|||
|
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<54>ж<EFBFBD>
|
|||
|
char g; int c;
|
|||
|
if(pau) return;
|
|||
|
tims++;
|
|||
|
if(tims>=mT){ //tim<69><6D>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>
|
|||
|
tims = 0, tim++;
|
|||
|
if(tim>=4) tim=0;
|
|||
|
c = getAD10(); //<2F><>ȡ<EFBFBD><C8A1>ѹֵ
|
|||
|
c -= cs.zo[feqK];
|
|||
|
Vxy[tim] = xw<2 ? c : -c; //<2F><><EFBFBD>浱ǰ<E6B5B1><C7B0>ѹ
|
|||
|
Vga[tim] = curGain; //<2F><><EFBFBD>浱ǰ<E6B5B1><C7B0><EFBFBD><EFBFBD>
|
|||
|
Sxw[tim] += c<0 ? 2 : 0; //<2F><>λ<EFBFBD><CEBB>ת(Ԥ<><D4A4><EFBFBD>´ε<C2B4><CEB5><EFBFBD>λ<EFBFBD><CEBB><EFBFBD><EFBFBD>ֵ)
|
|||
|
Sxw[tim] %= 4;
|
|||
|
if(tim==1||tim==3){ //<2F><><EFBFBD>±<EFBFBD><C2B1>л<EFBFBD>
|
|||
|
//<2F><>ѹģֵ<C4A3><D6B5><EFBFBD>ܷ<EFBFBD>Ӧ<EFBFBD>˷ŵ<CBB7><C5B5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȣ<EFBFBD><C8A3><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD><D0BB>жϵ<D0B6><CFB5><EFBFBD>ģֵ
|
|||
|
if(tim==1) K3=1, c = absMax(Vxy[2],Vxy[3]), g=Vga[2]; //<2F>л<EFBFBD><D0BB><EFBFBD><EFBFBD>±<EFBFBD>
|
|||
|
if(tim==3) K3=0, c = absMax(Vxy[0],Vxy[1]), g=Vga[0]; //<2F>л<EFBFBD><D0BB><EFBFBD><EFBFBD>ϱ<EFBFBD>
|
|||
|
if(c>Vfull) g--;
|
|||
|
else if(c<gad*1 ) g += 3; //<2F><><EFBFBD><EFBFBD>27<32><37>
|
|||
|
else if(c<gad*3 ) g += 2; //<2F><><EFBFBD><EFBFBD>9<EFBFBD><39>
|
|||
|
else if(c<gad*9) g++; //<2F><><EFBFBD><EFBFBD>3<EFBFBD><33>
|
|||
|
setGain(g);
|
|||
|
}
|
|||
|
set90( Sxw[ (tim+1)%4 ] ); //<2F><>λ<EFBFBD><CEBB>ת
|
|||
|
LCRcalc(Vxy,Vga);
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
char sfdw=1; //<2F>Ƿ<EFBFBD><C7B7><EFBFBD>ʾ<EFBFBD><CABE>λ
|
|||
|
void showR(char xm, char binLian){ //<2F><>ʾ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;
|
|||
|
|
|||
|
//<2F><>ѧ<EFBFBD><D1A7><EFBFBD><EFBFBD>ʾ
|
|||
|
if(!a) { cls(); disp[3]=115;disp[2]=disp[1]=97; return; }
|
|||
|
w = 2*3.1415926*feqX;
|
|||
|
if(!binLian){ //<2F><><EFBFBD><EFBFBD>
|
|||
|
e = a;
|
|||
|
if(xm==0){ showDig2(c/e,1, sfdw); }//<2F><>ʾXֵ,<2C><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>ŷ
|
|||
|
if(xm==1){ showDig2(b/e,1, sfdw); }//<2F><>ʾRֵ,<2C><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>ŷ
|
|||
|
if(xm==2){
|
|||
|
if(c<0) showDig2(e/c/w,4, sfdw); //<2F><>ʾCֵ,<2C><>ʾ<EFBFBD><CABE>pF
|
|||
|
else showDig2(c/e/w,2, sfdw); //<2F><>ʾLֵ,<2C><>ʾ<EFBFBD><CABE>uH
|
|||
|
}
|
|||
|
}else{ //<2F><><EFBFBD><EFBFBD>
|
|||
|
e = (b*b+c*c)/a;
|
|||
|
if(xm==0){ showDig2(e/c,1, sfdw); }//<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>Xֵ,<2C><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>ŷ
|
|||
|
if(xm==1){ showDig2(e/b,1, sfdw); }//<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>Rֵ,<2C><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>ŷ
|
|||
|
if(xm==2){
|
|||
|
if(c<0) showDig2(c/e/w,4, sfdw);//<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>Cֵ,<2C><>ʾ<EFBFBD><CABE>pF
|
|||
|
else showDig2(e/c/w,2, sfdw);//<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>Lֵ,<2C><>ʾ<EFBFBD><CABE>uH
|
|||
|
}
|
|||
|
}
|
|||
|
if(xm==3){ //<2F><>ʾ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<54>ж<EFBFBD>
|
|||
|
|
|||
|
void showMsg(uchar a){ //<2F><>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϣ
|
|||
|
P0 = ~a;
|
|||
|
ds0=1, ds1=ds2=ds3=0;
|
|||
|
delay2(50);
|
|||
|
}
|
|||
|
main(){
|
|||
|
uchar i=0,kn=0,key=0;
|
|||
|
uchar dispN=0; //<2F><>ʾɨ<CABE><C9A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
uchar spkN=0; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>
|
|||
|
uint nn=0;
|
|||
|
uchar XRQ=1;
|
|||
|
char binLian=0; //<2F><><EFBFBD><EFBFBD>1,<2C><><EFBFBD><EFBFBD>0
|
|||
|
|
|||
|
delay2(80); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ
|
|||
|
cs_RW(0); //<2F><>EEPROM
|
|||
|
|
|||
|
TCON=0, TMOD=0x12; //<2F><>T0<54><30>Ϊ<EFBFBD>Զ<EFBFBD><D4B6><EFBFBD>װ<EFBFBD><D7B0>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD>T1<54><31>Ϊ<EFBFBD><CEAA>ʱ<EFBFBD><CAB1>
|
|||
|
TH1 = 0, TL1 = 0;
|
|||
|
TR1=1; //T1<54><31>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD>
|
|||
|
TR0=0; //T0<54><30>ͣ<EFBFBD><CDA3><EFBFBD><EFBFBD>
|
|||
|
ET1=1; //T1<54><31><EFBFBD>ж<EFBFBD>
|
|||
|
ET0=1; //T1<54><31><EFBFBD>ж<EFBFBD>
|
|||
|
EA=1; //<2F><><EFBFBD><EFBFBD><EFBFBD>ж<EFBFBD>
|
|||
|
PT0=1; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȼ<EFBFBD>
|
|||
|
|
|||
|
|
|||
|
set_channel(0); //<2F><><EFBFBD><EFBFBD>ADת<44><D7AA>ͨ<EFBFBD><CDA8>
|
|||
|
P2M0 = 0xFF; //P2.01234567<EFBFBD><EFBFBD>Ϊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
P1M0 = 0xFC; //P1.234567<EFBFBD><EFBFBD>Ϊ<EFBFBD>ƻ<EFBFBD><EFBFBD><EFBFBD>
|
|||
|
P1M1 = 0x03; //P1.0<EFBFBD><EFBFBD>Ϊ<EFBFBD><EFBFBD><EFBFBD>迹
|
|||
|
|
|||
|
//<2F><>ע<EFBFBD><D7A2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ0.5<EFBFBD>뷽<EFBFBD>ɶ<EFBFBD>ȡcs_RW
|
|||
|
//cs_RW(0); //<2F><>ȡ<EFBFBD><C8A1>ֵ<EFBFBD><D6B5><EFBFBD><EFBFBD>(<28><><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1>ȷ<EFBFBD><C8B7><EFBFBD><EFBFBD>ѹ<EFBFBD><D1B9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɶ<EFBFBD>ȡEEPROW)
|
|||
|
|
|||
|
PWM_init();//DDS<44><53>ʼ<EFBFBD><CABC>
|
|||
|
set90(2); //<2F><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ
|
|||
|
setRng(1); //<2F><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
setGain(1); //<2F><>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
setF(1); //DDS<44><53>ʼ<EFBFBD><CABC><EFBFBD><EFBFBD>Ϊ1kHz
|
|||
|
|
|||
|
while(1){
|
|||
|
//<2F><>ʾdisp
|
|||
|
nn++;
|
|||
|
dispN=(++dispN)%4; //ɨ<><C9A8><EFBFBD><EFBFBD><EFBFBD>ƶ<EFBFBD>
|
|||
|
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]; //<2F><>ʾ
|
|||
|
//ɨ<><C9A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ӧ
|
|||
|
//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; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>һ<EFBFBD><D2BB>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>key<65><79><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ч<EFBFBD><D0A7>spkN<6B><4E><EFBFBD><EFBFBD>ʱ<EFBFBD><CAB1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if(spkN) spkN--, spk=0; else spk=1; //<2F><><EFBFBD>̷<EFBFBD><CCB7><EFBFBD>
|
|||
|
//<2F>˵<EFBFBD>ϵͳ
|
|||
|
if(key==8) { menu=0; key=0; XRQ=-1;} //<2F>˵<EFBFBD><CBB5><EFBFBD>
|
|||
|
if(menu>=1&&menu<=4){
|
|||
|
if(key==7) setRng2(); //<2F><><EFBFBD>̲<EFBFBD><CCB2><EFBFBD>
|
|||
|
if(key==6) setF(-1); //<2F><><EFBFBD><EFBFBD>Ƶ<EFBFBD><C6B5>
|
|||
|
}
|
|||
|
if(menu==0){ //<2F><>ʾ<EFBFBD><CABE><EFBFBD>̺Ͳ˵<CDB2>
|
|||
|
showDig(10000);
|
|||
|
if(key>=1 && key<=7) menu = key, menu2 = 0;
|
|||
|
key = 0;
|
|||
|
}
|
|||
|
if(menu==1){ //<2F>Զ<EFBFBD>LCR<43><52><EFBFBD><EFBFBD>(<28><><EFBFBD><EFBFBD>)
|
|||
|
pau = 0;
|
|||
|
if(XRQ==-1) XRQ=1, sfdw=1;
|
|||
|
if(key==4) { //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>л<EFBFBD>
|
|||
|
if(binLian) { binLian=0; showMsg(122); } //תΪ<D7AA><CEAA><EFBFBD><EFBFBD>
|
|||
|
else { binLian=1; showMsg(241); } //תΪ<D7AA><CEAA><EFBFBD><EFBFBD>
|
|||
|
}
|
|||
|
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){ //<2F><>ʾ<EFBFBD><CABE><EFBFBD>浵λ
|
|||
|
showDig(Vga[0]*100+Vga[2]+10000);
|
|||
|
disp[1]=disp[3]=0;
|
|||
|
}
|
|||
|
if(menu==3){ //<2F>ֶ<EFBFBD><D6B6><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
pau = 1;
|
|||
|
if(key==1) { setGain2(); showMsg( zk[curGain] );} //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if(key==2) { };
|
|||
|
if(key==3) { K3=~K3; showMsg(zk[K3]); } //<2F>л<EFBFBD><D0BB><EFBFBD><EFBFBD>±<EFBFBD>
|
|||
|
if(key==4) { set902(); showMsg(zk[xw]); } //<2F><>λ<EFBFBD><CEBB>ת
|
|||
|
if(nn%64==0) { showDig( getAD10()); disp[1]+=4; }
|
|||
|
}
|
|||
|
if(menu==7){ //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ƫ<EFBFBD><C6AB><EFBFBD><EFBFBD>
|
|||
|
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<48><7A><EFBFBD><EFBFBD>У,<2C><><EFBFBD><EFBFBD>10ŷ<30><C5B7><EFBFBD><EFBFBD>
|
|||
|
if(menu2==1) p = cs.zo+1, feqD=1, rngD=2; //1kHz<48><7A><EFBFBD><EFBFBD>У,<2C><><EFBFBD><EFBFBD>10ŷ<30><C5B7><EFBFBD><EFBFBD>
|
|||
|
if(menu2==2) p = cs.zo+2, feqD=2, rngD=2; //7.8kHz<EFBFBD><EFBFBD><EFBFBD><EFBFBD>У,<2C><><EFBFBD><EFBFBD>10ŷ<30><C5B7><EFBFBD><EFBFBD>
|
|||
|
if(menu2==3) p = cs.J+0, feqD=2, rngD=0; //VI<56>任<EFBFBD><E4BBBB><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>20<32><30><EFBFBD><EFBFBD>
|
|||
|
if(menu2==4) p = cs.J+1, feqD=2, rngD=1; //VI<56>任<EFBFBD><E4BBBB><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>1k<31><6B><EFBFBD><EFBFBD>
|
|||
|
if(menu2==5) p = cs.J+2, feqD=2, rngD=2; //VI<56>任<EFBFBD><E4BBBB><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>10k<30><6B><EFBFBD><EFBFBD>
|
|||
|
if(menu2==6) p = cs.J+3, feqD=2, rngD=3; //VI<56>任<EFBFBD><E4BBBB><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>100k<30><6B><EFBFBD><EFBFBD>
|
|||
|
if(menu2==7) p = &cs.j1, feqD=2, rngD=1; //<2F>˷<EFBFBD>3<EFBFBD><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>3.3k<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if(menu2==8) p = &cs.j2, feqD=2, rngD=1; //<2F>˷<EFBFBD>10<31><30><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λУ,<2C><><EFBFBD><EFBFBD>10k<30><6B><EFBFBD><EFBFBD>
|
|||
|
if(menu2==9) p = cs.R+0, bc=2, feqD=1, rngD=0; //VI<56>任<EFBFBD><E4BBBB>ģֵУ,<2C><><EFBFBD><EFBFBD>20ŷ
|
|||
|
if(menu2==10) p = cs.R+1, bc=2, feqD=1, rngD=1; //VI<56>任<EFBFBD><E4BBBB>ģֵУ,<2C><><EFBFBD><EFBFBD>1kŷ
|
|||
|
if(menu2==11) p = cs.R+2, bc=2, feqD=1, rngD=2; //VI<56>任<EFBFBD><E4BBBB>ģֵУ,<2C><><EFBFBD><EFBFBD>10kŷ
|
|||
|
if(menu2==12) p = cs.R+3, bc=2, feqD=1, rngD=3; //VI<56>任<EFBFBD><E4BBBB>ģֵУ,<2C><><EFBFBD><EFBFBD>100kŷ
|
|||
|
if(menu2==13) p = &cs.g1, bc=2, feqD=1, rngD=1; //<2F>˷<EFBFBD>3<EFBFBD><33><EFBFBD><EFBFBD><EFBFBD><EFBFBD>У,<2C><><EFBFBD><EFBFBD>2kŷ<6B><C5B7><EFBFBD><EFBFBD>
|
|||
|
if(menu2==14) p = &cs.g2, bc=2, feqD=1, rngD=1; //<2F>˷<EFBFBD>10<31><30><EFBFBD><EFBFBD><EFBFBD><EFBFBD>У,<2C><><EFBFBD><EFBFBD>10kŷ<6B><C5B7><EFBFBD><EFBFBD>
|
|||
|
if(key==1) *p += bc; //X<><58><EFBFBD><EFBFBD>
|
|||
|
if(key==2) *p -= bc; //R<><52><EFBFBD><EFBFBD>
|
|||
|
if(key==3) { cs_RW(1); setF(feqK); } //L<><4C><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
if(key==4) *p = 0; //C<><43><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
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){ //<2F>ָ<EFBFBD><D6B8><EFBFBD>Ĭ<EFBFBD><C4AC>ֵ
|
|||
|
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); //<2F><>ʾQ
|
|||
|
else showR(1,1); //<2F><>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD>
|
|||
|
}else{
|
|||
|
sfdw = 0;
|
|||
|
showDig(abs(*p));
|
|||
|
if(*p<0) disp[3] = 16;
|
|||
|
}
|
|||
|
}
|
|||
|
delay(4000);
|
|||
|
}//while end
|
|||
|
}
|
|||
|
|
|||
|
|