C 语言代码 --- 宏 中【指针内容】更改为【数组下标】

bh4qix

花了差不多一天时间，终于看懂原有逻辑，将 原有 宏中的 指针部分，替换为 数组下标，

逻辑功能一目了然。
结果已经验证OK.
和大家共享！

猪小呆

厉害，可以帮忙分析一下许老师电桥的代码吗？

1. 
   
2. 
   
3. //zz20130224 程序升级为V5.5版本；lcd_goto2(9)处显示位置修改，并处理末尾消隐；修正相对测量功能不能启动的问题
   
4. //zz20130223 完善手动档的相关显示，把频率和档位显示语句放到return之前，否则显示不完善
   
5. //zz20130222 修改图形ES(R)为字符型
   
6. //程序基于 2004程序_3.0_全自动电桥V5.4
   
7. 
   
8. //==========================================================================
   
9. //  LCR表驱动程序 V2.0
   
10. //  许剑伟 于莆田 2012.01
    
11. //==========================================================================
    
12. //==========================================================================
    
13. #define uchar unsigned char
    
14. #define uint  unsigned int
    
15. #define ulong  unsigned long
    
16. #include <reg52.h>
    
17. #include <math.h>
    
18. 
    
19. //==========================================================================
    
20. // 项目：LCD1602 四线驱动程序
    
21. // 设计要点：
    
22. //     LCD1602 的运行速度慢，而单片机运行的速度快，因此容易因为速度不
    
23. //     匹配造成调试失败。因此，调试之前应准确测试lcd_delay() 延时函数
    
24. //     准确的延时量，如果不能满足注释中的要求，则应调整循次数。每步操
    
25. //     作所需的延时量，按照数据手册指标指行，同时留下足够的时间余量。
    
26. // 硬件连接：
    
27. //     至少需要9条线，电源线2条，7条信号线。信号线详见程序中的接口定义。
    
28. //     清注意对LCD1602对比度的调节，否则无显示。
    
29. // 设计：许剑伟,于莆田,2010.12
    
30. //==========================================================================
    
31. sbit lcd_RS = P2^5; //数据命令控制位,0命令1数据
    
32. sbit lcd_RW = P2^6; //读写位,0写1读
    
33. sbit lcd_EN = P2^7; //使能位,下降沿触发
    
34. sbit lcd_D4 = P0^3; //数据端口D4
    
35. sbit lcd_D5 = P0^2; //数据端口D5
    
36. sbit lcd_D6 = P0^1; //数据端口D6
    
37. sbit lcd_D7 = P0^0; //数据端口D7
    
38. //==========================================================================
    
39. code char path[40]={
    
40. 0x00,0x00,0x0e,0x11,0x11,0x0a,0x1b,0x00,
    
41. 0x00,0x11,0x11,0x13,0x1d,0x10,0x10,0x10,
    
42. 0x0e,0x11,0x1f,0x11,0x11,0x0e,0x00,0x00,
    
43. 0x1C,0x10,0x1B,0x12,0x1B,0x01,0x07,0x00,
    
44. 0x04,0x0e,0x1f,0x04,0x1f,0x0e,0x04,0x00
    
45. };//自定义符号
    
46. 
    
47. code uchar abc[][5]={
    
48. "  err","   40","  120","  360"," 1080","   1K","   3K","   9K","  27K","  10K",
    
49. "  30K","  90K"," 270K"," 100K"," 300K"," 900K"," 2.7M","   13","  4.5","  1.5"
    
50. };
    
51. code char *lcr[7]   = {"2000", " 200", "20.0","2.00", " 20", " 20","2.0"};
    
52. code char *feqc[3]  = {"100Hz"," 1KHz" ,"7.8KH"};
    
53. code char *zero[2]  = {"Open zero......","Short zero...OK."};
    
54. 
    
55. char binLian=0,ATA=0,ATD=0;
    
56. char OX[8]={0,0,0,0,0,0,8,0};
    
57. int DDS3=1, c3 = 0,c4 = 0;
    
58. xdata char isQ=1,REL=0;
    
59. xdata uchar menu=1,menu2=0; //菜单变量
    
60. xdata float TR,TX; //清零数据
    
61. xdata float RELDAT; //相对测量数据
    
62. uint ph=0, phM=256, feq=977; //相位,phM相位步进值
    
63. 
    
64. void lcd_delay(int n){ //LCD专用延时函数
    
65.   //32MHz钟频下，约循环3000次延迟1毫秒
    
66.   int i,j;
    
67.   if(n<0)    { for(i=0;i< 30;i++); return; } //10us
    
68.   if(n== 0)  { for(i=0;i<150;i++); return; } //50us
    
69.   for(;n;n--){ for(j=0;j<3000;j++);        } //n毫秒
    
70. }
    
71. //==========================================================================
    
72. void lcd_B(char f, uchar c, char t){ //控制四线式接口LCD的7个脚
    
73.   //f=0写命令字, f=1写RAM数据, f=2读地址（或读忙）, f=3读RAM数据
    
74.   lcd_EN = 0;
    
75.   lcd_RS = f%2;
    
76.   lcd_RW = f/2%2;
    
77.   //移入高四位
    
78.   lcd_D4 = c & 16;
    
79.   lcd_D5 = c & 32;
    
80.   lcd_D6 = c & 64;
    
81.   lcd_D7 = c & 128;
    
82.   lcd_EN = 1;  lcd_delay(-1);  lcd_EN = 0; //使能脉冲
    
83.   if(f==4) { lcd_delay(t); return; }
    
84.   //移入低四位
    
85.   lcd_D4 = c & 1;
    
86.   lcd_D5 = c & 2;
    
87.   lcd_D6 = c & 4;
    
88.   lcd_D7 = c & 8;
    
89.   lcd_EN = 1;  lcd_delay(-1);  lcd_EN = 0; //使能脉冲
    
90.   lcd_delay(t);  //不同的命令,响应时间不同,清零命令需要2ms
    
91. }
    
92. //==========================================================================
    
93. void lcd_init(){ //LCD1602 初始化
    
94.   //启动四线模式须势行9个步骤，初始化所须耗时较长，约65ms，时限不可减
    
95.   lcd_delay(20); //启动lcd之前须延时大于15ms，直到VDD大于4.5V
    
96.   lcd_B(4, 0x30, 9); //置8线模式,须延时大于4.1ms
    
97.   lcd_B(4, 0x30, 5); //置8线模式,须延时大于100us
    
98.   lcd_B(4, 0x30, 5); //置8线模式,手册中未指定延时
    
99.   lcd_B(4, 0x20, 5); //进入四线模式
    
100.   lcd_B(0, 0x28, 5); //四线模式双行显示
     
101.   lcd_B(0, 0x0C, 5); //打开显示器
     
102.   lcd_B(0, 0x80, 5); //RAM指针定位
     
103.   lcd_B(0, 0x01, 5); //启动清屏命初始化LCD
     
104. }
     
105. //==========================================================================
     
106. //=========================几个功能常用函数=================================
     
107. void lcd_cls()         { lcd_B(0, 0x01+0, 2);  } //清屏
     
108. void lcd_cur0()        { lcd_B(0, 0x0C+0, 0);  } //隐藏光标
     
109. void lcd_goto1(uchar x){ lcd_B(0, 0x80+x, 0); } //设置DDRAM地址,第1行x位
     
110. void lcd_goto2(uchar x){ lcd_B(0, 0xC0+x, 0); } //设置DDRAM地址,第2行x位
     
111. void lcd_goto3(uchar x){ lcd_B(0, 0x94+x, 0); } //设置DDRAM地址,第3行x位
     
112. void lcd_goto4(uchar x){ lcd_B(0, 0xD4+x, 0); } //设置DDRAM地址,第4行x位
     
113. void lcd_putc(uchar d) { lcd_B(1, 0x00+d, 0);  } //字符输出
     
114. void lcd_puts(uchar *s){ for(; *s; s++) lcd_B(1,*s,0); } //字串输出
     
115. //==============字符显示函数====================
     
116. 
     
117. void lcd_putp(float a,float b,char bo,char n, float qmin){ //带单位显示复数,n是单位下限,qmin是最小位权值(用于限定有效数字)
     
118.   code uchar dwB[] = {'p','n',1,'m',0,'k','M','G'}; //单位表
     
119.   char i,j, c=0,digW=4, h=3, fh[2]={' ','+'};
     
120.   long d,q,qm,Q=1; //最高位权
     
121.   float f,g=1,k=1;
     
122.   if(bo==2){k=2;}
     
123.   if(a<0) fh[0] = '-', a = -a;
     
124.   if(b<0) fh[1] = '-', b = -b;
     
125.   if(a>b) f = a; else f = b;
     
126.   for(i=1;i<4;i++) Q *= 10;
     
127.   for(i=0;i<3;i++){ if(f*g >= k*1000) g/=1000, c++; } //以3位为单位移动小数点,右移
     
128.   for(i=0;i<n;i++){ if(f*g < k)     g*=1000, c--; }   //以3位为单位移动小数点,左移
     
129.   if ((n==1)&&(c==-1)){
     
130.   digW=2;                 //移动1位小数点
     
131.   }else if ((n==2)&&(c==-2)){
     
132.   if(feq!=7813) {digW=2;   //移动1位小数点
     
133.   }else{ digW=3; }         //移动2位小数点
     
134.   }else if ((n==4)&&(c==-4)){
     
135.   if(feq!=7813) {digW=2;   //移动1位小数点
     
136.   }else{ digW=3; }         //移动2位小数点
     
137.   }
     
138.   for(i=1;i<digW && f*g<k*Q;i++) g*=10,h--;           //继续移动小数点，使之满字
     
139.   qm = g*qmin;
     
140.   for(i=0;i<2;i++){
     
141.    if(i) d = b*g+0.5;      //取出实部
     
142.    else  d = a*g+0.5;      //取出虚部
     
143.    if(qm) d+=qm/2, d-=d%qm;//去除小于qmin的尾数
     
144.    if(d>=Q*20) d=(d+0.5)/10, h++;
     
145.    q = Q;
     
146.    if(d>=Q*10){
     
147.      d -= Q*10;
     
148.      if(fh[i]=='-') {lcd_puts("-1");
     
149.      }else          {lcd_puts(" 1");}
     
150.    }else{
     
151.    lcd_putc(fh[i]); if(bo==2)lcd_putc('0');      //显示符号
     
152.    }
     
153.    for(j=0; j<4; j++){  //数字输出
     
154.     lcd_putc(d/q+48);      //数字
     
155.     if(j==h) lcd_putc('.');//小数点
     
156.     d %= q, q /= 10;  
     
157.    }
     
158.    if(!bo||bo==2) break;     //不显示虚部
     
159.   }
     
160.   if((n!=1)&&(dwB[c+4]==0))lcd_putc(' '); else lcd_putc(dwB[c+4]);//单位
     
161.   if((n==1)&&(dwB[c+4]==0)) OX[6]=32; else OX[6]=8; //自动单位
     
162. }
     
163. 
     
164. void lcd_putf(float a, char n, float qmin) //带单位显示浮点数,n是单位下限
     
165.   { lcd_putp(a,0,0,n,qmin); }
     
166. void lcd_int(int a,char w){ //定宽显示正整数
     
167.   char i=0, s[5] = {' ',' ',' ',' ',' '};
     
168.   if(a<0) { a=-a; lcd_puts("-"); }
     
169.   else    lcd_puts(" ");
     
170.   do{
     
171.    s[i++] = a%10+48;
     
172.    a /= 10;
     
173.   }while(a);
     
174.   for(;w;w--) lcd_putc(s[w-1]);
     
175. }
     
176. 
     
177. //==========================================================================
     
178. //===============================延时函数===================================
     
179. void delay(uint loop) { uint i; for(i=0;i<loop;i++); } //延时函数
     
180. void delay2(uint k)   { for(;k>0;k--) delay(10000);  } //长延时,k=100大约对应1秒
     
181. 
     
182. //==========================================================================
     
183. //=================================AD转换===================================
     
184. sfr P1ASF = 0x9D;     //将P1置为模拟口寄存器(使能),各位中为1的有效
     
185. sfr ADC_CONTR = 0xBC; //A/D转换控制寄存器
     
186. sfr ADC_res   = 0xBD; //A/D转换结果寄存器
     
187. sfr ADC_resl  = 0xBE; //A/D转换结果寄存器
     
188. 
     
189. void set_channel(char channel){
     
190. P1ASF = 1<<channel;
     
191. ADC_CONTR = channel+128; //最高位是电源开关,低3位通道选择
     
192. delay(1); //首次打开电源应延迟，使输入稳定
     
193. }
     
194. uint getAD2(){
     
195. ADC_CONTR |= 0x08;             //00001000,置ADC_START=1启动A/D 转换
     
196. while ( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
     
197. ADC_CONTR &= 0xE7;             //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
     
198. return ADC_res*4 + ADC_resl;
     
199. }
     
200. 
     
201. 
     
202. 
     
203. //==========================================================================
     
204. //==================================EEPROW偏程==============================
     
205. sfr IAP_data  = 0xC2;
     
206. sfr IAP_addrH = 0xC3;
     
207. sfr IAP_addrL = 0xC4;
     
208. sfr IAP_cmd   = 0xC5;
     
209. sfr IAP_trig  = 0xC6;
     
210. sfr IAP_contr = 0xC7;
     
211. /********************
     
212. 写字节时，可以将原有数据中的1改为0，无法将0改为1，只能使用擦除命令将0改为1
     
213. 应注意，擦除命令会将整个扇区擦除
     
214. *********************/
     
215. int eepEn = 0;
     
216. void saEEP(){ //触发并EEP保护
     
217. if(eepEn==12345) IAP_trig = 0x5A;  //先送5A
     
218. if(eepEn==12345) IAP_trig = 0xA5;  //先送5A再送A5立即触发
     
219. IAP_cmd = 0;      //关闭令，保护
     
220. IAP_contr = 0;    //关EEPROM，保护
     
221. IAP_trig = 0;
     
222. IAP_addrL = 255; //设置读取地址的低字节，地址改变才需要设置
     
223. IAP_addrH = 255; //设置读取地址的高字节，地址改变才需要设置
     
224. }
     
225. uchar readEEP(uint k){ //读取
     
226. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
     
227. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
     
228. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
     
229. IAP_cmd = 1;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
     
230. saEEP(); //触发并保护
     
231. return IAP_data;
     
232. }
     
233. void writeEEP(uint k, uchar da){ //写入
     
234. IAP_data = da;    //传入数据
     
235. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
     
236. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
     
237. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
     
238. IAP_cmd = 2;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
     
239. saEEP(); //触发并保护
     
240. }
     
241. void eraseEEP(uint k){ //擦除
     
242. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
     
243. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
     
244. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
     
245. IAP_cmd = 3;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
     
246. saEEP(); //触发并保护
     
247. }
     
248. 
     
249. 
     
250. xdata struct Ida{
     
251. char zo[3];//三个频率下的零点改正值
     
252. char j1;   //相位补偿(3倍档)
     
253. char j2;   //相位补偿(10倍档)
     
254. char J[4];  //相位补偿(V/I变换器)
     
255. char R[4]; //下臂电阻修正(40,1k,10k,100k)
     
256. char g1;   //增益修正(3倍档)
     
257. char g2;   //增益修正(10倍档)
     
258. char phx; //1kHz以下相位改正
     
259. char R4b; //100k档7.8kHz频率下的幅度补偿
     
260. char G2b; //9倍档7.8kHz频率下的幅度补偿
     
261. char feq; //频率修正
     
262. char ak;  //AD斜率修正
     
263. float QRs[3],QXs[3]; //短路清零数据
     
264. float QRo[3],QXo[3]; //开路清零数据
     
265. } cs;
     
266. 
     
267. void cs_RW(char rw){
     
268. uchar i,*p = &cs;
     
269. const int offs=512;
     
270. if(rw){
     
271.   delay2(20); //等待(防止掉电误识别键盘而调用本函数)
     
272.   eraseEEP(offs);
     
273.   for(i=0;i<sizeof(cs);i++) writeEEP(i+offs,p[i]);
     
274. }else{
     
275.   for(i=0;i<sizeof(cs);i++) p[i]=readEEP(i+offs);
     
276. }
     
277. }
     
278. 
     
279. //==========================================================================
     
280. //==================================LCR主程序===============================
     
281. //==========================================================================
     
282. sfr P1M1=0x91; //P1端口设置寄存器
     
283. sfr P1M0=0x92; //P1端口设置寄存器
     
284. sfr P0M1=0x93; //P0端口设置寄存器
     
285. sfr P0M0=0x94; //P0端口设置寄存器
     
286. sfr P2M1=0x95; //P2端口设置寄存器
     
287. sfr P2M0=0x96; //P2端口设置寄存器
     
288. sfr P3M1=0xB1; //P3端口设置寄存器
     
289. sfr P3M0=0xB2; //P3端口设置寄存器
     
290. 
     
291. 
     
292. sbit spk=P2^3; //蜂鸣器
     
293. sbit Kb=P2^4;  //量程开关B
     
294. sbit Ka=P2^2;  //量程开关A
     
295. sbit DDS2=P1^2;//移相方波输出口
     
296. sbit K3=P1^7;
     
297. sbit K4=P1^6;
     
298. sbit K5=P1^5;  //7.8kHz滤波开关
     
299. sbit K6=P1^4;
     
300. sbit K8=P2^0;  //100Hz滤波开关
     
301. sbit K32=P1^1; //32kHz发生器
     
302. 
     
303. 
     
304. //==============低频信号DDS相关参数====================
     
305. //PCA相关寄存器
     
306. sfr CMOD = 0xD9;   //钟源选择控制等
     
307. sfr CH = 0xF9;     //PCA的计数器
     
308. sfr CL = 0xE9;     //PCA的计数器
     
309. sfr CCON = 0xD8;   //PCA控制寄存器
     
310. sfr CCPAM0 = 0xDA; //PCA模块0工作模式寄存器
     
311. sfr CCPAM1 = 0xDB; //PCA模块1工作模式寄存器
     
312. sfr CCAP0L = 0xEA; //模块0捕获寄存器低位
     
313. sfr CCAP0H = 0xFA; //模块0捕获寄存器高位
     
314. sfr IPH = 0xB7;
     
315. 
     
316. sbit PPCA  = IP^7;   //PCA的中断优先级设置
     
317. sbit CCF0  = CCON^0; //PCA的模块0中断标志
     
318. sbit CCF1  = CCON^1; //PCA的模块1中断标志
     
319. sbit CR = CCON^6;    //PCA计数器使能
     
320. 
     
321. uchar *ph8 = (char*)&ph;    //ph的高8位地址
     
322. xdata float feqX=976.6; //实际输出频率
     
323. uchar code sinB[256]={
     
324. //查询表中不可装载零值，否则会造成无中断产生
     
325. 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,
     
326. 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,
     
327. 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,
     
328.   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,
     
329.    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,
     
330.   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,
     
331. 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,
     
332. 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
     
333. };
     
334. uchar code fbB[256]={ //方波DDS查询表
     
335. 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,
     
336. 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,
     
337. 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,
     
338. 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};
     
339. uchar chuX=0; //方波DDS初相
     
340. //==============低频信号DDS函数====================
     
341. void PWM_init(){ //把PCA置为PWM
     
342.   CMOD = 2;   //0000 0010 计数源选择,钟源取fosc/2
     
343.   CL = CH = 0;
     
344.   CCAP0L = CCAP0H = 192; //占空比为25%
     
345.   //CCPAM0=0x42;//0100 0010,PCA的模块0设置为PWM模式,无中断
     
346.   CCPAM0=0x53;//0101 0011,PCA的模块0设置为PWM模式,有中断，下降沿中断
     
347.   PPCA = 1;   //优先中断
     
348.   IPH |= 128;
     
349.   //CR = 1;   //开始计数
     
350.   EA = 1;     //开总中断
     
351. }
     
352. 
     
353. void PCAinter(void) interrupt 7 {//PCA中断
     
354.   uchar x,y;
     
355.   CCF0=0; //清除中断请求,以免反复中断
     
356.   x = *ph8;        //截断正弦相位累加器,取高8位
     
357.   y = x + chuX;    //方波相位
     
358.   CCAP0H = sinB[x];//正弦DDS输出
     
359. if(DDS3) {  DDS2 = fbB[y];   //方波DDS输出
     
360. }else {DDS2 = 0;}
     
361.   ph += phM;       //相位累加
     
362.   K32 = ~K32;
     
363. }
     
364. void setDDS(uint f){ //参考时钟是c=(fosc/2)/256=32000000/2/256=62500,频率f=c*phM/2^16
     
365. feq = f;
     
366. phM=f*65536.0/62500; //phM=f*2^16/62500
     
367. feqX = 62500.0*phM/65536*(1+cs.feq/10000.0); //实际输出频率
     
368. ph = 0;              //高频时，使波形对称
     
369. if(!f) CR=0; else CR=1;
     
370. }
     
371. 
     
372. //相位控制函数
     
373. xdata char xw=0; //相位
     
374. void set90(char k){ //设置方波的相位差
     
375.   k %= 4;
     
376.   if(k<0) k += 4;
     
377.   chuX = k*64;   //移相0~270度
     
378.   xw = k;
     
379. }
     
380. void set902() { set90(xw+1); } //相位步进
     
381. 
     
382. //==============量程控制函数====================
     
383. xdata char rng=1; //量程
     
384. void setRng(char k){//切换量程
     
385. if(k>3) k=3;
     
386. if(k<0) k=0;
     
387. Kb = k & 2, Ka = k & 1;  //40欧--100k欧
     
388. rng = k;
     
389. }
     
390. void setRng2(){ setRng( (rng+1)%4);} //量程步进       
     
391. 
     
392. //==============增益控制函数====================
     
393. char curGain=1; //当前增益索引号
     
394. void setGain(char k){ //设置电路增益
     
395.   if(k>3) k=3;
     
396.   if(k<0) k=0;
     
397.   K4 = k & 2, K6 = k & 1; //1倍--27倍
     
398.   curGain = k;
     
399. }
     
400. void setGain2(){ setGain((curGain+1)%4); }
     
401. 
     
402. 
     
403. //==============AD非线性改正与过采样=================
     
404. uint getAD10(){ //120次采样,用reentrant申明，有的单片机无法运行
     
405. uchar i;
     
406. long c;
     
407. for(i=0;i<250;i++) c += getAD2();
     
408. return (c+12)/25;
     
409. }
     
410. uint getAD10b(){ //120次采样,用reentrant申明，有的单片机无法运行
     
411. xdata uint c = 0, c2 = 0;
     
412. uchar i;
     
413. for(i=0;i<250;i++){
     
414.   ADC_CONTR |= 0x08;             //00001000,置ADC_START=1启动A/D 转换
     
415.   while ( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
     
416.   ADC_CONTR &= 0xE7;             //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
     
417.   c  += ADC_resl;
     
418.   c2 += ADC_res;
     
419. }
     
420. c3 = c;
     
421. c = ( c2*4L + c )/25;
     
422. c3= ( c2*4L + c3 ) -c*25;
     
423. return c;
     
424. }
     
425. 
     
426. 
     
427. 
     
428. //==============LCR测量====================
     
429. code float ga[4] =  {  1,   3,   9,  27 }; //增益表
     
430. code float dwR[4] = { 40, 1e3, 1e4, 1e5 }; //各档电阻表
     
431. xdata int Vxy[12]={0,0,0,0,1,1}; //Vxy[Vx1,Vy1,Vx2,Vy2,g1,g2]
     
432. xdata char Sxw[4]={0,1,0,1};    //保存正确相位
     
433. xdata int Vz[24];               //LCR测量结果队
     
434. xdata uchar tim=0,tims=0;
     
435. xdata char pau=0; //暂停坐标自动旋转
     
436. 
     
437. 
     
438. #define Vfull 9600
     
439. #define gad (9600/30)
     
440. uchar mT = 6; //测量速度,mT取值为6或12或24时，可以消除数字噪声，尾数不动，但不利于于取平均
     
441. //==============设置频率====================
     
442. xdata char feqK=1; //频率索引号
     
443. void setF(char k){
     
444.   if(k==-1) k = (feqK+1)%3; //步进
     
445.   feqK = k;
     
446.   if(k==0) { setDDS(100);   K5=0; K8=1; mT=12; } //置为100Hz
     
447.   if(k==1) { setDDS(977);   K5=0; K8=0; mT=6;  } //置为1kHz
     
448.   if(k==2) { setDDS(7813);  K5=1; K8=0; mT=6;  } //置为7.8125kHz
     
449.   TH1 = 150, TL1 = 171; //置为20ms
     
450.   tims = 0;
     
451.   tim = 0;
     
452.   ph = 0;
     
453. }
     
454. int absMax(int a,int b){ //取两个数绝对值最大者
     
455.   if(a<0) a = -a;
     
456.   if(b<0) b = -b;
     
457.   if(b>a) a = b;
     
458.   return a;
     
459. }
     
460. 
     
461. char yc1=0,yc2=0; //溢出标识
     
462. char slw = 1; //降速倍率
     
463. char chg=0;   //量程切换标记
     
464. void timerInter1(void) interrupt 3 {//T1中断,LCR数据采集
     
465. code int y[5]={0,-15,30,24,0}; //满度用30
     
466. code int x[5]={4900,5090,5140,5500,6120};
     
467.   char g,gb,Rb,i; int c=0,cc=0;
     
468.   tims++;
     
469.   if(tims>=mT/slw) tims = 0, tim++, c = 1;
     
470.   if(tim>=4) tim=0;
     
471.   if(pau) return;
     
472.   if(!c) return; //tim未进位触发
     
473.   c = getAD10b();   //读取电压值
     
474.   c4= c;
     
475.   cc= c3;
     
476.   c -= cs.zo[feqK];
     
477. if(cs.ak!=0){
     
478. for(i=0;i<4;i++){ //非线性改正
     
479.   if(c<x[i]||c>=x[i+1]) continue;
     
480.   c += cs.ak*( y[i] + (y[i+1]-y[i]) * ((int)(c-x[i])) / (x[i+1]-x[i]) ) / 30;
     
481.   break;
     
482. }
     
483. }
     
484.   
     
485.   Vxy[tim] = xw<2 ? c : -c;  //保存当前电压
     
486.   Vxy[tim+6] = xw<2 ? cc : -cc;  //保存当前电压
     
487.   Vxy[tim/2+4] = curGain;    //保存当前增益
     
488.   Sxw[tim] = ( Sxw[tim]+(c<0 ? 2 : 0) )%4;  //相位翻转(预测下次的相位采用值)
     
489.   if(tim==1||tim==3){ //上下臂切换
     
490.     if(tim==1) { K3=1, c = absMax(Vxy[2],Vxy[3]), g=Vxy[5]; yc2 = c>Vfull ? 1:0; }//切换到下臂
     
491.     if(tim==3) { K3=0, c = absMax(Vxy[0],Vxy[1]), g=Vxy[4]; yc1 = c>Vfull ? 1:0; }//切换到上臂
     
492.     gb=g, Rb=rng;
     
493.     if(c>Vfull){ if(g==0&&rng>0&&K3&&isQ) Rb=rng-1; gb=0; }
     
494.     else if(c<gad*1 ) gb = g+3; //增加27倍
     
495.     else if(c<gad*3 ){ gb = g+2;if(c<gad*2&&rng>=1&&rng<=2&&K3&&isQ ) { gb=0; Rb=rng+1; }} //增加9倍
     
496.     else if(c<gad*9)  gb = g+1; //增加3倍
     
497.         if(gb>3) gb = 3;
     
498.     if(g==3&&rng<3&&K3&&isQ) { gb=0; Rb=rng+1; }
     
499.     if(g==0&&c<gad*1&&rng<3&&K3&&isQ) { gb=0; Rb=rng+1; }
     
500. 
     
501.         setRng(Rb); setGain(gb); //置量程
     
502.     if(gb!=g || Rb!=rng) slw = 2, chg++; //量程正在改变，则加速测量
     
503.     if(tim==3){ if(!chg) slw=1; chg=0; }
     
504.   }
     
505.   set90( Sxw[ (tim+1)%4 ] ); //相位旋转
     
506.   if(tim==3){ for(i=0;i<12;i++) Vz[i+12]=Vz[i], Vz[i]=Vxy[i]; }
     
507. }
     
508. 
     
509. 
     
510. void showR(char binLian, char showk){ //显示LCR
     
511.   xdata float a=0,b=0,c=0,qq=0,dd=0,e,w,L,C;
     
512.   xdata int gr=cs.R[rng], g1=cs.g1, g2=cs.g2;
     
513.   xdata int g12 = g1 + g2;          //增益最大补偿
     
514.   xdata int j12 = (int)cs.j1+cs.j2; //相位最大补偿
     
515.   xdata float RELOUT;
     
516.   xdata long RELTMP;
     
517.   xdata float JD = 0, G = 0, cJD;   //补偿变量
     
518.   xdata float v[4];
     
519.   xdata char ATC=0,ATE=0,d2=0,d3=1;
     
520.   xdata float LCR[3];
     
521.   //LCR计算
     
522.   if(feqK<0||feqK>2) return;
     
523.   if(feq==7813&&rng==3) gr += cs.R4b; //7.8kHz时下臂修正量
     
524.   //可控增益单元的增益修正、相位补偿量
     
525.   if(feq==7813) g2 += cs.G2b;  //7.8kHz时9倍档修正量
     
526.   if(Vz[4] == 1) JD += cs.j1,  G += g1;
     
527.   if(Vz[4] == 2) JD += cs.j2,  G += g2;
     
528.   if(Vz[4] == 3) JD += j12,    G += g12;
     
529.   if(Vz[5] == 1) JD -= cs.j1,  G -= g1;
     
530.   if(Vz[5] == 2) JD -= cs.j2,  G -= g2;
     
531.   if(Vz[5] == 3) JD -= j12,    G -= g12;
     
532.   JD = (JD - cs.J[rng]) * feqX/7813/2000;
     
533.   if(feq==977) JD -= cs.phx/2000.0;
     
534.   cJD = 1 - JD*JD/2;
     
535.   v[0] = Vz[0]+Vz[12]+(Vz[6]+Vz[18])/25.0;
     
536.   v[1] = Vz[1]+Vz[13]+(Vz[7]+Vz[19])/25.0;
     
537.   v[2] = Vz[2]+Vz[14]+(Vz[8]+Vz[20])/25.0;
     
538.   v[3] = Vz[3]+Vz[15]+(Vz[9]+Vz[21])/25.0;
     
539.   a = (+( 1.0*v[2]*v[2] + 1.0*v[3]*v[3] )*((ga[Vz[4]] / ga[Vz[5]]) /(dwR[rng]*(1+gr/10000.0))))+(+( 1.0*v[2]*v[2] + 1.0*v[3]*v[3] )*((ga[Vz[4]] / ga[Vz[5]]) /(dwR[rng]*(1+gr/10000.0))))*G/10000;  //增益补偿
     
540.   b = (-( 1.0*v[0]*v[2] + 1.0*v[1]*v[3] ))*cJD - (-( 1.0*v[2]*v[1] - 1.0*v[0]*v[3] ))*JD; //相位补偿
     
541.   c = (-( 1.0*v[0]*v[2] + 1.0*v[1]*v[3] ))*JD + (-( 1.0*v[2]*v[1] - 1.0*v[0]*v[3] ))*cJD; //相位补偿  
     
542. if(showk){
     
543.   w = 2*3.1415926*feqX;
     
544.   if((showk==5)||(showk==8)||(showk==10)||(showk==13)||(showk==15)||(showk==18)||(showk==19)){d3=0;}
     
545.   if((showk==1)||(showk==2)||(showk==3))  //校准项
     
546.   {
     
547.   showk=0;
     
548.   lcd_puts("Z=");
     
549.   lcd_putf(c4-cs.zo[feqK],0,0);
     
550.   return;
     
551.   }
     
552.   if(binLian){ //并联
     
553.     e = (b*b+c*c)/a;
     
554.   if(d3){
     
555.     lcd_puts("R=");
     
556.         lcd_putp(e/b, 0,2,1, 1e-4); //显示并联复阻抗,显示到毫欧
     
557.   }else{
     
558.   if((showk==10)||(showk==13)||(showk==15)||(showk==18)){
     
559.         C = -c/e/w;
     
560.         L = +e/c/w;
     
561.     if(C>-2e-12) { lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F'); } //显示并联C值,显示到pF
     
562.     else         { lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H'); } //显示并联L值,显示到uH
     
563.   }else{
     
564.     lcd_putc(10);lcd_puts("=");
     
565.     lcd_putf(atan2(c,b)*180/3.1415926,0,0); //显示角度
     
566.     lcd_puts("    ");
     
567. }
     
568. }
     
569.   }else{ //串联
     
570.     e = a;
     
571.   if(d3){
     
572.     lcd_puts("R=");
     
573.         lcd_putp(b/e, c/e, 2, 1, 1e-5); lcd_putc(OX[6]); //定义欧姆符号_显示串联复阻抗,显示到毫欧
     
574.   }else{
     
575.   if((showk==10)||(showk==13)||(showk==15)||(showk==18)){
     
576.         C = -e/c/w;
     
577.         L = +c/e/w;
     
578.     if(L<-2e-8) { lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F'); } //显示C值,显示到pF
     
579.     else        { lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H'); } //显示L值,显示到uH
     
580.   }else{
     
581.     lcd_putc(10);lcd_puts("="); /////////////////////////////lcd_putc(10)相位角自定义符号
     
582.     lcd_putf(atan2(c,b)*180/3.1415926,0,0); //显示角度
     
583.     lcd_puts("    ");
     
584.   }
     
585.   }
     
586. }
     
587. return;
     
588. }
     
589. 
     
590.   if(binLian==20){ //测量开路残余值
     
591.   if(rng==0){
     
592.   TR += b/a, TX += c/a; //短路残余阻抗
     
593.   }
     
594.   if(rng==3){
     
595.   a = (b*b+c*c)/a;
     
596.   TR += b/a, TX += c/a; //开路残余导抗
     
597.   }
     
598. 
     
599.   return;
     
600.   }
     
601. 
     
602.   if(binLian==21){ //是否应用清零
     
603.     isQ = (isQ+1)%2;
     
604.     return;
     
605.   }
     
606. 
     
607.   w = 2*3.1415926*feqX;
     
608.   if(isQ){ //自动手动，此处为自动  ////////////////////////////////////////////////////////////////
     
609.   if(rng==0){
     
610.     b -= cs.QRs[feqK]*a, c -= cs.QXs[feqK]*a;//短路清零
     
611.   }
     
612.   if(rng>1){
     
613.     a = (b*b+c*c)/a;       
     
614.     b -= cs.QRo[feqK]*a, c -= cs.QXo[feqK]*a; //开路清零
     
615.     a = (b*b+c*c)/a;
     
616. }
     
617. 
     
618.   if(ATA!=0){
     
619.   if(ATD==0) { if(rng>1)ATE=1;else ATE=0;  } //置为100Hz
     
620.   if(ATD==1) { ATE=1;  } //置为1kHz
     
621.   if(ATD==2) { ATE=0;  } //置为7.8125kHz
     
622.   }else      { if(rng>1)ATE=1;else ATE=0; }
     
623. 
     
624.   if(feq==100)  LCR[0]=2e3,LCR[1]=2e-1,LCR[2]=2e7,d2=1;
     
625.   if(feq==977)  LCR[0]=2e2,LCR[1]=2e-2,LCR[2]=2e7,d2=2;
     
626.   if(feq==7813) LCR[0]=2e1,LCR[1]=2e-3,LCR[2]=2e6,d2=3;
     
627. 
     
628.   if(ATE){ //并联
     
629.     e = (b*b+c*c)/a;
     
630.         C = -c/e/w;
     
631.         L = +e/c/w;
     
632.     if(C>-2e-12) { ATC=1; }
     
633.     else         { ATC=2; }
     
634.     if(fabs(e/b)<fabs(e/c)) { ATC=3; }
     
635.   }else{ //串联
     
636.     e = a;
     
637.         C = -e/c/w;
     
638.         L = +c/e/w;
     
639.     if(L<-2e-8)  { ATC=1; }
     
640.     else         { ATC=2; }
     
641.     if(fabs(b/e)>fabs(c/e)) { ATC=3; }
     
642.    }
     
643. 
     
644. 
     
645.   qq = fabs(c/b); //计算Q
     
646.   if(!b||qq>999) qq = 999;
     
647.   dd = fabs(b/c); //计算D
     
648.   if(!c||dd>=10) dd = 9.999;
     
649. 
     
650.   if(ATA!=0){ATC=ATA;}
     
651. 
     
652.   lcd_goto1(0);
     
653.   if(ATC==0){
     
654. 
     
655.   }else if(ATC==1){
     
656.   if(ATE){ //并联
     
657.   lcd_puts("Cp");
     
658.     if(C>-2e-12) {
     
659.     if(fabs(C)<LCR[1]) {lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F');  //显示并联C值,显示到pF
     
660.     }else{lcd_puts(" C>");lcd_puts(lcr[d2]);lcd_puts("mF");}
     
661.     }
     
662.     else         { lcd_puts(" ---OL---"); }
     
663.   }else{ //串联
     
664.   lcd_puts("Cs");
     
665.     if(L<-2e-8)  {
     
666.     if(fabs(C)<LCR[1]) {lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F');  //显示串联C值,显示到pF
     
667.     }else{lcd_puts(" C>");lcd_puts(lcr[d2]);lcd_puts("mF");}
     
668.     }
     
669.     else         { lcd_puts(" ---OL---"); }
     
670.   }
     
671. 
     
672.   }else if(ATC==2){
     
673.   if(ATE){ //并联
     
674.   lcd_puts("Lp");
     
675.     if(C>-2e-12) { lcd_puts(" ---OL---"); }
     
676.     else         {
     
677.     if(fabs(L)<LCR[0]) { lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H');   //显示并联L值,显示到uH
     
678.     }else{lcd_puts(" L>");lcd_puts(lcr[d2-1]);lcd_puts(" H");}
     
679.     }
     
680.   }else{ //串联
     
681.   lcd_puts("Ls");
     
682.     if(L<-2e-8) { lcd_puts(" ---OL---"); }
     
683.     else         {
     
684.     if(fabs(L)<LCR[0]) { lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H');   //显示串联L值,显示到uH
     
685.     }else{lcd_puts(" L>");lcd_puts(lcr[d2-1]);lcd_puts(" H");}
     
686.     }
     
687.   }
     
688. 
     
689. 
     
690.   }else if(ATC==3){
     
691.   if(ATE){ //并联
     
692.   lcd_puts("Rp");
     
693.    if(fabs(e/b)<LCR[2]) {  lcd_putp(e/b, 0,2,1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
694.    else                 { lcd_puts(" R>");lcd_puts(lcr[d2+3]);lcd_puts(" M");lcd_putc(OX[6]); }
     
695.   }else{ //串联
     
696.   lcd_puts("Rs");
     
697.    if(fabs(b/e)<LCR[2]) { lcd_putp(b/e, 0,2,1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
698.    else                 { lcd_puts(" R>");lcd_puts(lcr[d2+3]);lcd_puts(" M");lcd_putc(OX[6]); }
     
699.   }
     
700. }
     
701. 
     
702.   lcd_goto2(0);
     
703.   lcd_puts("Q=");
     
704.   lcd_putf(qq,0,0); //显示Q
     
705.   lcd_goto3(0);
     
706.   lcd_puts("D=");
     
707.   lcd_putf(dd,0,0); //显示D
     
708. 
     
709.   lcd_goto4(0);
     
710.   if(REL) {
     
711.   lcd_putc(4);lcd_puts("=");
     
712.   if(ATC==0){
     
713.   }else if(ATC==1){if(RELDAT==0){RELDAT=C;RELOUT=0;}else{RELOUT=(C-RELDAT)/RELDAT*100.0;}
     
714.   }else if(ATC==2){if(RELDAT==0){RELDAT=L;RELOUT=0;}else{RELOUT=(L-RELDAT)/RELDAT*100.0;}
     
715.   }else if(ATC==3){
     
716.   if(ATE){ //并联
     
717.   if(RELDAT==0){RELDAT=e/b;RELOUT=0;}else{RELOUT=((e/b)-RELDAT)/RELDAT*100.0;}
     
718.   }else{ //串联
     
719.   if(RELDAT==0){RELDAT=b/e;RELOUT=0;}else{RELOUT=((b/e)-RELDAT)/RELDAT*100.0;}
     
720.   }
     
721.   }
     
722.    if(RELOUT<-99.9)RELOUT=-100;
     
723.    if(RELOUT>99.9)RELOUT=100;
     
724. 
     
725.   if (fabs(RELOUT)==100){
     
726.   if (RELOUT>99.9) lcd_puts("   OL  %"); else lcd_puts("-  OL  %");
     
727.   }else{
     
728.    RELTMP=RELOUT*1000+0.5;
     
729.    lcd_putf(RELTMP/1000.0,0,0); lcd_puts("%");
     
730.   }
     
731.   if(!ATA){ATA=ATC;}
     
732.   }else{
     
733.   RELDAT=0;
     
734. 
     
735.   lcd_putc(10);lcd_putc('=');
     
736.   lcd_putf(atan2(c,b)*180/3.1415926,0,0);lcd_puts(" "); //显示角度
     
737.   }
     
738. 
     
739. 
     
740.   lcd_goto2(9);          ///////////////////////////////////////////////
     
741.   if(ATC==3){
     
742.   if(ATE){ //并联
     
743.   lcd_puts(" Xp");
     
744.    if(fabs(e/c)<LCR[2]) { lcd_putf(e/c, 1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
745.    else                 { lcd_puts(" X>");lcd_puts(lcr[d2+3]);lcd_puts("M");lcd_putc(OX[6]);}//lcd_puts(" "); }
     
746.   }else{ //串联
     
747.   lcd_puts(" Xs");
     
748.    if(fabs(c/e)<LCR[2]) { lcd_putp(c/e, b/e, 0, 1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
749.    else                 { lcd_puts(" X>");lcd_puts(lcr[d2+3]);lcd_puts("M");lcd_putc(OX[6]);}//lcd_puts(" "); }
     
750. 
     
751.   }
     
752.   }else{
     
753.   if(ATE){ //并联
     
754.   lcd_puts(" RP");
     
755.    if(fabs(e/b)<LCR[2]) {lcd_putf(e/b, 1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
756.    else                 { lcd_puts(" R>");lcd_puts(lcr[d2+3]);lcd_puts("M");lcd_putc(OX[6]);}//lcd_puts(" "); }
     
757.   }else{ //串联
     
758.   lcd_puts("ESR");//lcd_putc(11); //lcd_putc(11)是自定义的es（R）图形
     
759.   //lcd_putc('R');
     
760.   if(fabs(b/e)<LCR[2]) { lcd_putp(b/e, c/e, 0, 1, 1e-4); lcd_putc(OX[6]);} //显示电阻
     
761.   else                 { lcd_puts(" R>");lcd_puts(lcr[d2+3]);lcd_puts("M");lcd_putc(OX[6]);}//lcd_puts(" "); }
     
762.   }
     
763.   }
     
764. 
     
765.   lcd_goto1(11);
     
766.   if(ATA==0||ATD==0){
     
767.   if(ATA==0) lcd_puts("  AUTO   ");
     
768.   if(ATA==1) lcd_puts("  AUTO-C ");
     
769.   if(ATA==2) lcd_puts("  AUTO-L ");
     
770.   if(ATA==3) lcd_puts("  AUTO-R ");
     
771.   }else{
     
772.   if(ATE) lcd_puts("   P "); else lcd_puts("   S ");
     
773.   if(feq==100)  lcd_putc('A');
     
774.   if(feq==977)  lcd_putc('B');
     
775.   if(feq==7813) lcd_putc('C');
     
776.   lcd_putc(rng+49); //显示量程
     
777. }
     
778.   lcd_goto3(9);
     
779.   lcd_puts("   ");
     
780.   if(Vz[4]!=0&&rng==0) {for(OX[5]=0;OX[5]<5;OX[5]++){ lcd_putc(abc[16+Vz[4]][OX[5]]); }lcd_putc(8);}
     
781.   else {for(OX[5]=0;OX[5]<5;OX[5]++){ lcd_putc(abc[rng*4+Vz[5]+1][OX[5]]); }lcd_putc(8);}
     
782.   lcd_goto4(10);
     
783.   if(feq==100)  lcd_puts("   100Hz  ");
     
784.   if(feq==977)  lcd_puts("    1KHz  ");
     
785.   if(feq==7813) lcd_puts("  7.8KHz  ");
     
786. 
     
787.   //lcd_goto2(19);lcd_puts(" ");
     
788.   
     
789.   }else{        //以下为手动
     
790.   //显示量程信息
     
791.   lcd_goto4(0); //第四行显示
     
792.   if(isQ) lcd_puts("Auto/");  else lcd_puts("Hand/"); //显示自动手动
     
793.   if(binLian) lcd_puts("p");  else lcd_puts("s"); //显示串联并联
     
794.   lcd_puts(" ");
     
795.   lcd_goto4(7);//第四行显示频率
     
796.   if(feq==100)  lcd_puts(" 100Hz ");
     
797.   if(feq==977)  lcd_puts("  1KHz ");
     
798.   if(feq==7813) lcd_puts("7.8KHz ");
     
799.   lcd_goto4(14); ////////////////////////////////////zz
     
800.   if(rng==0)  {lcd_puts("40");lcd_putc(244);lcd_puts("  ");} //////zz
     
801.   if(rng==1)  {lcd_puts("1K");lcd_putc(244);lcd_puts("  ");} //////zz
     
802.   if(rng==2)  {lcd_puts("10K");lcd_putc(244);lcd_puts(" ");} //////zz
     
803.   if(rng==3)  {lcd_puts("100K");lcd_putc(244);} ///////////////////zz
     
804. 
     
805. if(!isQ){  //手动
     
806.   if(yc1&&rng!=3){ lcd_goto1(2); lcd_puts(" Overflow,high  ");lcd_goto2(2); lcd_puts("              ");} //未知高阻溢出
     
807.   if(yc2&&rng!=0){ lcd_goto1(2); lcd_puts(" Overflow,low    ");lcd_goto2(2); lcd_puts("              ");} //未知低阻溢出
     
808.   if(yc1||yc2){ lcd_goto2(2); lcd_puts("                  ");lcd_goto3(2); lcd_puts("                  "); return; }
     
809. }
     
810. 
     
811. 
     
812.   //电学量显示  if(!a) { lcd_cls(); lcd_puts("DIV 0"); return; }
     
813. 
     
814.   if(binLian){ //并联
     
815.     e = (b*b+c*c)/a;
     
816.     lcd_goto1(0); lcd_puts("R=");
     
817.         lcd_putf(e/b, 1, 1e-4); //显示并联复阻抗,显示到毫欧
     
818.     lcd_putc(OX[6]);
     
819.         lcd_putf(e/c, 1, 1e-4); //显示并联复阻抗,显示到毫欧
     
820.         lcd_putc(OX[6]);lcd_puts("  ");
     
821.         C = -c/e/w;
     
822.         L = +e/c/w;
     
823.     lcd_goto2(0);
     
824.      if(C>-2e-12) {lcd_puts("C="); lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F'); } //显示并联C值,显示到pF
     
825.     else          {lcd_puts("L="); lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H'); } //显示并联L值,显示到uH
     
826.    lcd_puts("         ");
     
827.   }else{ //串联
     
828.     e = a;
     
829.     lcd_goto1(0); lcd_puts("R=");         //////////////////////////////////////////////////////////////////////
     
830.         lcd_putp(b/e, c/e, 1, 1, 1e-4); lcd_putc(OX[6]); //定义欧姆符号_显示串联复阻抗,显示到毫欧
     
831.     lcd_puts("    ");
     
832.         C = -e/c/w;
     
833.         L = +c/e/w;
     
834.     lcd_goto2(0);
     
835.     if(L<-2e-8) {lcd_puts("C="); lcd_putp(C, 0,2,4, 1e-14); lcd_putc('F'); } //显示C值,显示到pF
     
836.     else        {lcd_puts("L="); lcd_putp(L, 0,2,2, 5e-9 ); lcd_putc('H'); } //显示L值,显示到uH
     
837.    lcd_puts("         ");
     
838.   }
     
839. 
     
840.   qq = fabs(c/b); //计算Q
     
841.   if(!b||qq>999) qq = 999;
     
842.   dd = fabs(b/c); //计算D
     
843.   if(!c||dd>=10) dd = 9.999;
     
844. 
     
845.   lcd_goto3(0); //跳转第三行
     
846.   lcd_puts("Q="); //显示标识
     
847.   lcd_putf(qq,0,0); //显示Q//lcd_putf(c,0,0); //显示Q
     
848. 
     
849.   lcd_puts(" ");
     
850.   lcd_putc(10);lcd_putc('=');
     
851.   lcd_putf(atan2(c,b)*180/3.1415926,0,0); //显示角度
     
852. 
     
853.   lcd_puts(" ");
     
854. 
     
855.   lcd_goto1(17);
     
856.   if((feq==7813)&&(rng==0)&&(!binLian)&&(!isQ)&&(L<-2e-8)){lcd_puts("ESR");}//else{lcd_puts("   ");}//lcd_goto1(19);lcd_puts(" ");}        ///zz
     
857. 
     
858. //  lcd_goto4(14);
     
859. //  if(Vz[4]!=0&&rng==0) {for(OX[5]=0;OX[5]<5;OX[5]++){ lcd_putc(abc[16+Vz[4]][OX[5]]); }lcd_putc(8);}
     
860. //  else {for(OX[5]=0;OX[5]<5;OX[5]++){ lcd_putc(abc[rng*4+Vz[5]+1][OX[5]]); }lcd_putc(8);}
     
861. 
     
862. }
     
863. }
     
864. //void timerInter(void) interrupt 1 {}//T0中断
     
865. 
     
866. main(){
     
867. uchar i=0,s=0,key=0;
     
868. uchar dispN=0; //显示扫描索引
     
869. uchar spkN=0;  //蜂鸣器发声时长
     
870. uint nn=0;
     
871. int kn=0;
     
872. char mo=0; //编辑显示开关
     
873. lcd_init(); //初始化LCD
     
874. lcd_cur0(); //隐藏光标
     
875. lcd_B(0, 0x40, 0); //定义欧姆符号_设置CGRAM地址,写指令
     
876. for(i=0;i<40;i++)lcd_B(1, 0x00+path[i], 0); //定义欧姆符号_把数据送入CGRAM地址内
     
877. lcd_goto1(0);//定义欧姆符号_光标定位
     
878. lcd_puts("LCR 3.0");
     
879. lcd_goto2(0);
     
880. lcd_puts("XJW Putian,2012");
     
881. delay2(500); //启动延时
     
882. eepEn= 12345;
     
883. cs_RW(0);   //读EEPROM
     
884. 
     
885. TCON=0, TMOD=0x12; //将T0置为自动重装定时器，T1置为定时器
     
886. TH1 = 0, TL1 = 0;
     
887. TR1=1;  //T1开始计数
     
888. TR0=0;  //T0暂停计数
     
889. ET1=1;  //T1开中断
     
890. ET0=1;  //T1开中断
     
891. EA=1;   //开总中断
     
892. //PT0=1;  //设置优先级
     
893. 
     
894. set_channel(0); //设置AD转换通道
     
895. P2M0 = 0xFF;    //P2.01234567置为推勉输出
     
896. P1M0 = 0xFE;    //P1.1234567置为推换口
     
897. P1M1 = 0x01;    //P1.0置为高阻抗
     
898. P2 = 0x0F;
     
899. 
     
900. 
     
901. PWM_init(); //DDS初始化
     
902. set90(2);   //初始设置相位
     
903. setRng(1);  //初始设置量程
     
904. setGain(1); //初始设置增益
     
905. setF(1);    //DDS初始设置为1kHz
     
906. while(1){
     
907.   //显示disp
     
908. 
     
909.   //1键-X，2键-R，3键-L，4键-C，5键-Q，6键-F，7键-Rng，8键-Menu
     
910. 
     
911.   nn++;
     
912.   //扫描键盘
     
913.   key = ~P3;
     
914.   if(key&&kn<255) kn++; else kn=0;
     
915.   for(i=0;key;i++) key/=2; key=i;
     
916.   if(menu==7&&key<3){
     
917.   if(kn==4) spkN=10,kn=-14; else key=0;      //校准数值加速
     
918.   }else{
     
919.   if(kn==4) spkN=10; else key=0;   //当按下一定时间后key才有效。spkN发声时长设置
     
920.   }
     
921. 
     
922.   //菜单系统
     
923.   if(key==8){//菜单键
     
924.     lcd_cls();    lcd_puts(" LCR Set Options");
     
925.     lcd_goto2(0); lcd_puts(" Exit:X  Ver:5.5");
     
926.     menu=0; key=0; mo=0; pau=0;
     
927.     for(i=0;i<3;i++)OX[i]=3.1415;
     
928. 
     
929.     delay(10000);
     
930.   }
     
931.   if(menu>=1 && menu<=3){
     
932.     if(key==7) setRng2(); //量程步进
     
933.     if(key==6) setF(-1);  //设置频率
     
934.     delay(10000);
     
935.   }
     
936.   if(menu==0){ //显示量程和菜单
     
937.     if(key) lcd_cls();
     
938.         if(key>=1 && key<=7) {menu = key, menu2 = 0;if (key==1)isQ=1;}
     
939.         key = 0;
     
940.     DDS3 = 1;
     
941.     delay(10000);
     
942.   }  //1键-X，2键-R，3键-L，4键-C，5键-Q，6键-F，7键-Rng，8键-Menu
     
943.   if(menu==1){ //LCR测量
     
944.     if(key==1) if(isQ){ ATA++;ATD=0;REL=0;if(ATA>3){ATA=0;}}else{binLian = (binLian+1)%2;} //L／C／R 模式
     
945.     if(key==2) if(isQ){ ATD++;REL=0;if(ATD>2){ATD=0;}} //串并联测量模式选择
     
946.     if(key==3) {showR(21,0);REL=0;} //自动手动切换
     
947.     if(key==4) {
     
948.   if((rng==3)||(rng==0)){
     
949.   lcd_cls();if(rng==3){lcd_puts(zero[0]);}else{lcd_puts(zero[1]);}delay2(100);
     
950.   for(i=0;i<3;i++){
     
951.   lcd_goto2(2);
     
952.   if(feq==100)  delay2(150);
     
953.   lcd_puts(feqc[feqK]);lcd_goto2(9);lcd_puts(" ");
     
954.   delay2(100);
     
955.   TR = 0, TX = 0;
     
956.   for(s=0;s<4;s++){lcd_goto2(9);lcd_putc(51-s);if(feq==100){delay2(150);}else{delay2(75);}showR(20,0);}
     
957.   if(rng==3){
     
958.   cs.QRo[feqK] = TR/4.0, cs.QXo[feqK] = TX/4.0; //开路残余导抗
     
959.   }
     
960.   if(rng==0){
     
961.   cs.QRs[feqK] = TR/4.0, cs.QXs[feqK] = TX/4.0; //短路残余阻抗
     
962.   }
     
963.   setF(-1);
     
964.   }
     
965.   cs_RW(1);
     
966.   lcd_goto1(0);if(rng==3){lcd_puts(zero[0]);}else{lcd_puts(zero[1]);}delay2(100);
     
967.   }
     
968.   REL=0;
     
969.   } //清零
     
970.     OX[7]++;
     
971.     if(OX[7]>15){OX[7]=0;showR(binLian,0);}
     
972.     delay(12000);
     
973.   }
     
974.     if(key==5) {REL = (REL+1)%2;spkN=0;}
     
975. 
     
976.   if(menu==2){
     
977.     lcd_goto1(0);
     
978.     lcd_puts("up:");  lcd_putc(Vxy[4]+48);
     
979.     lcd_puts(" dw:"); lcd_putc(Vxy[5]+48);
     
980.    delay(10000);
     
981.   }
     
982.   if(menu==3){ //手动调试
     
983.     pau = 1;
     
984.     if(key==1) setGain2();//增益控制
     
985.     if(key==2) { };
     
986.     if(key==3) K3=~K3;    //切换上下臂
     
987.     if(key==4) set902();  //相位旋转
     
988.     lcd_goto1(0);
     
989.     lcd_puts(" xw="); lcd_putc(xw+48);      //相位索引号
     
990.     lcd_puts(" K3="); lcd_putc(K3?49:48);   //K3状态
     
991.     lcd_puts(" Ga="); lcd_putc(curGain+48); //增益索引号
     
992.     lcd_goto2(0);
     
993.     if(nn%32==0) lcd_int(getAD10(),5);
     
994.     delay(10000);
     
995.   }
     
996.   if(menu>=4 && menu<=5){
     
997.     delay(10000);
     
998.   }
     
999.   if(menu==6){ //频率修正
     
1000.     if(key==1) cs.feq += 1; //X键增
      
1001.     if(key==2) cs.feq -= 1; //R键减
      
1002.     if(key==3) { cs_RW(1); setF(feqK); } //L键保存
      
1003.     if(OX[0]!=cs.feq){ lcd_cls();OX[0]=cs.feq;
      
1004.     lcd_goto1(0); lcd_puts("Feq correct");
      
1005.     lcd_goto2(0); lcd_putf(cs.feq,0,0);}
      
1006.         delay(10000);
      
1007.   }
      
1008.   if(menu==7){ //校准
      
1009.         code char *csR[19]   = {
      
1010.      "Z0 :000", "Z1 :000", "Z2 :000",
      
1011.      "R1 : 40", "R1X: 40",
      
1012.      "ak : 25",
      
1013.      "R2 : 1k", "R2X: 1k",
      
1014.      "R3 :10k", "R3X:10k",
      
1015.      "R4 :.1M", "R4b:.1M", "R4X:.1M",
      
1016.      "G1 : 3k", "G1X: 3k",
      
1017.      "G2 : 9k", "G2b: 9k", "G2X: 9k",     
      
1018.      "phX: 1k"
      
1019.      };
      
1020.     char *p,bc=1, feqD=1,rngD=1;
      
1021.         static char kc=0;
      
1022.         isQ = 0;
      
1023.     lcd_goto2(5);
      
1024.      if(menu2==0)  p = cs.zo+0,      feqD=0, rngD=0; //100Hz零点校准,接入20k欧电阻  //Z0 77
      
1025.     if(menu2==1)  p = cs.zo+1,      feqD=1, rngD=0; //1kHz零点校准,接入20k欧电阻  //Z1 74
      
1026.     if(menu2==2)  p = cs.zo+2,      feqD=2, rngD=0; //7.8kHz零点校准,接入20k欧电阻        //Z2 44
      
1027.     if(menu2==3)  p = cs.R+0, bc=2, feqD=1, rngD=0; //VI变换器模值校准,接入40欧         //R1 20
      
1028.     if(menu2==4)  p = cs.J+0,       feqD=2, rngD=0; //40R相位  //R1X 0
      
1029.     if(menu2==5)  p = &cs.ak,       feqD=1, rngD=0; //AD校准 //ak 0
      
1030.     if(menu2==6)  p = cs.R+1, bc=2, feqD=1, rngD=1; //VI变换器模值校准,接入1k欧         //R2 0
      
1031.     if(menu2==7)  p = cs.J+1,       feqD=2, rngD=1; //1k相位  //R2X        -2
      
1032.     if(menu2==8)  p = cs.R+2, bc=2, feqD=1, rngD=2; //VI变换器模值校准,接入10k欧  //R3 2
      
1033.     if(menu2==9)  p = cs.J+2,       feqD=2, rngD=2; //10k相位  //R3X -6(2)
      
1034.     if(menu2==10) p = cs.R+3, bc=2, feqD=1, rngD=3; //VI变换器模值校准,接入100k欧  //R4        24
      
1035.     if(menu2==11) p = &cs.R4b,bc=2, feqD=2, rngD=3; //7.8kHz频率100k档幅度校准        //R4b 28
      
1036.     if(menu2==12) p = cs.J+3,       feqD=2, rngD=3; //100k相位        //R4X 29
      
1037.     if(menu2==13) p = &cs.g1, bc=2, feqD=1, rngD=1; //运放3倍增益校准,接入3.3k欧电阻  //G1 -2
      
1038.     if(menu2==14) p = &cs.j1,       feqD=2, rngD=1; //3倍档相位         G1X 32
      
1039.     if(menu2==15) p = &cs.g2, bc=2, feqD=1, rngD=1; //运放9倍增益校准,接入10k欧电阻         //G2 -10
      
1040.     if(menu2==16) p = &cs.G2b,bc=2, feqD=2, rngD=1; //7.8kHz频率9倍档幅度校准  //G2b 2
      
1041.     if(menu2==17) p = &cs.j2,       feqD=2, rngD=1; //9倍档相位         //G2X 24(34)
      
1042.     if(menu2==18) p = &cs.phx,      feqD=1, rngD=1; //1kHz以下相位校准,接入1k欧电阻         //phx 0
      
1043.     if(menu2<3) DDS3=0; else DDS3=1;
      
1044.     if(key==1) *p += bc ; //X键增
      
1045.     if(key==2) *p -= bc ; //R键减
      
1046.     if(key==3) { cs_RW(1); setF(feqK); } //L键保存
      
1047.     if(key==4) *p = 0;   //C键清除
      
1048.         if(key==5) { if(menu2==0) menu2=18; else menu2--; mo=0; }
      
1049.         if(key==6) { if(menu2==18)menu2=0;  else menu2++; mo=0; }
      
1050.         if(key==7) mo = (mo+1)%2;
      
1051.         if(key==4){ //恢复到默认值
      
1052.           if(++kc==5){
      
1053.            kc = 0;
      
1054.        cs.j1 = 32, cs.j2 = 24;
      
1055.        cs.g1 = -2,  cs.g2 = -10;
      
1056.        cs.zo[0] = 76;
      
1057.        cs.zo[1] = 78;
      
1058.        cs.zo[2] = 78;
      
1059.        cs.J[0] = 0,cs.J[1] = -2, cs.J[2] = -6, cs.J[3] = 29;
      
1060.        cs.R[0] = 20,cs.R[1] = 0,cs.R[2] = 2,cs.R[3] = 24;
      
1061.        cs.R4b = 28, cs.G2b = 2,cs.phx = cs.feq = 0;
      
1062.            cs.ak = 0;
      
1063.            for(i=0;i<3;i++) cs.QRs[i] = cs.QXs[i] = cs.QRo[i] = cs.QXo[i] = 0;
      
1064.           }
      
1065.         }
      
1066.         else { if(key) kc=0; }
      
1067.         //显示
      
1068.         if(mo){
      
1069.      OX[1]=3.1415;OX[2]=3.1415;
      
1070.          if(feqD!=feqK) setF(feqD);
      
1071.          if(rngD!=rng)  setRng(rngD);
      
1072.      if(menu2>=3&&menu2<=7) showR(0,0);
      
1073.      else showR(1,0);
      
1074.         }else{
      
1075.          if(feqD!=feqK) setF(feqD);
      
1076.          if(rngD!=rng)  setRng(rngD);
      
1077.      if(menu2>=3&&menu2<=7) showR(0,menu2+1);
      
1078.      else showR(1,menu2+1);
      
1079.     if(OX[1]!=*p||OX[2]!=menu2){ OX[1]=*p;OX[2]=menu2;
      
1080.           lcd_cls();
      
1081.       lcd_goto1(0); lcd_puts(csR[menu2]);lcd_puts(" X:+ R:-"); //输出参数名称
      
1082.       lcd_goto2(0); lcd_int(*p,3);     //输出参数值
      
1083.       }
      
1084.      delay(10000);
      
1085.     }
      
1086.   }
      
1087. if (menu!=7){
      
1088.   if(spkN) spkN--, spk=0; else spk=1; //键盘发声
      
1089. }
      
1090. 
      
1091. }//while end
      
1092. }
      
1093. //==========================================================================
      
1094. 
      

复制代码

bh4qix

猪小呆 发表于 2025-6-11 11:27
厉害，可以帮忙分析一下许老师电桥的代码吗？

不懂这个。

呵呵#1861

谢谢分享