设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机LCR电桥程序 许老师多年前的作品
返回列表 发新帖
查看: 10209|回复: 21
收起左侧

单片机LCR电桥程序 许老师多年前的作品

  [复制链接]
ID:845676 发表于 2021-10-21 08:33 | 显示全部楼层 |阅读模式
该电桥，具有价格便宜，性能精度能满足一般电子爱好者的使用,电路方面许老师的自述文件里都有介绍，现提供热心网友提供的更新程序，最后声明：所有文件的所有权益归原作者许老师所有.

单片机源程序如下:
  1. //==========================================================================
  2. //  LCR表驱动程序 V2.0
  3. //  许剑伟 于莆田 2012.01
  4. //==========================================================================
  5. //==========================================================================
  6. #define uchar unsigned char
  7. #define uint  unsigned int
  8. #define ulong  unsigned long
  9. #include <reg52.h>
  10. #include <math.h>

  12. //==========================================================================
  13. // 项目：LCD1602 四线驱动程序
  14. // 设计要点：
  15. //     LCD1602 的运行速度慢，而单片机运行的速度快，因此容易因为速度不
  16. //     匹配造成调试失败。因此，调试之前应准确测试lcd_delay() 延时函数
  17. //     准确的延时量，如果不能满足注释中的要求，则应调整循次数。每步操
  18. //     作所需的延时量，按照数据手册指标指行，同时留下足够的时间余量。
  19. // 硬件连接：
  20. //     至少需要9条线，电源线2条，7条信号线。信号线详见程序中的接口定义。
  21. //     清注意对LCD1602对比度的调节，否则无显示。
  22. // 设计：许剑伟,于莆田,2010.12
  23. //==========================================================================
  24. sbit lcd_RS = P0^6; //数据命令控制位,0命令1数据
  25. sbit lcd_RW = P0^5; //读写位,0写1读
  26. sbit lcd_EN = P0^4; //使能位,下降沿触发
  27. sbit lcd_D4 = P0^3; //数据端口D4
  28. sbit lcd_D5 = P0^2; //数据端口D5
  29. sbit lcd_D6 = P0^1; //数据端口D6
  30. sbit lcd_D7 = P0^0; //数据端口D7
  31. //==========================================================================
  32. code char path[32]={
  33. 0x00,0x00,0x0e,0x11,0x11,0x0a,0x1b,0x00,
  34. 0x00,0x11,0x11,0x13,0x1d,0x10,0x10,0x10,
  35. 0x0e,0x11,0x1f,0x11,0x11,0x0e,0x00,0x00,
  36. 0x1C,0x10,0x1B,0x12,0x1B,0x01,0x07,0x00
  37. };//自定义符号
  38. char binLian=0,ATA=0,ATB=1;
  39. char OX[8]={0,0,0,0,0,0,8,0};
  40. int DDS3=1, c3 = 0; //交替显示变量
  41. char digW=4; //数字显示位数宏
  42. code uchar abc[][5]={
  43. "  err","   40","  120","  360"," 1080","   1K","   3K","   9K","  27K","  10K",
  44. "  30K","  90K"," 270K"," 100K"," 300K"," 900K"," 2.7M","   13","  4.5","  1.5"
  45. };

  47. void lcd_delay(int n){ //LCD专用延时函数
  48.   //32MHz钟频下，约循环3000次延迟1毫秒
  49.   int i,j;
  50.   if(n<0)    { for(i=0;i< 30;i++); return; } //10us
  51.   if(n== 0)  { for(i=0;i<150;i++); return; } //50us
  52.   for(;n;n--){ for(j=0;j<3000;j++);        } //n毫秒
  53. }
  54. //==========================================================================
  55. void lcd_B(char f, uchar c, char t){ //控制四线式接口LCD的7个脚
  56.   //f=0写命令字, f=1写RAM数据, f=2读地址（或读忙）, f=3读RAM数据
  57.   lcd_EN = 0;
  58.   lcd_RS = f%2;
  59.   lcd_RW = f/2%2;
  60.   //移入高四位
  61.   lcd_D4 = c & 16;
  62.   lcd_D5 = c & 32;
  63.   lcd_D6 = c & 64;
  64.   lcd_D7 = c & 128;
  65.   lcd_EN = 1;  lcd_delay(-1);  lcd_EN = 0; //使能脉冲
  66.   if(f==4) { lcd_delay(t); return; }
  67.   //移入低四位
  68.   lcd_D4 = c & 1;
  69.   lcd_D5 = c & 2;
  70.   lcd_D6 = c & 4;
  71.   lcd_D7 = c & 8;
  72.   lcd_EN = 1;  lcd_delay(-1);  lcd_EN = 0; //使能脉冲
  73.   lcd_delay(t);  //不同的命令,响应时间不同,清零命令需要2ms
  74. }
  75. //==========================================================================
  76. void lcd_init(){ //LCD1602 初始化
  77.   //启动四线模式须势行9个步骤，初始化所须耗时较长，约65ms，时限不可减
  78.   lcd_delay(20); //启动lcd之前须延时大于15ms，直到VDD大于4.5V
  79.   lcd_B(4, 0x30, 9); //置8线模式,须延时大于4.1ms
  80.   lcd_B(4, 0x30, 5); //置8线模式,须延时大于100us
  81.   lcd_B(4, 0x30, 5); //置8线模式,手册中未指定延时
  82.   lcd_B(4, 0x20, 5); //进入四线模式
  83.   lcd_B(0, 0x28, 5); //四线模式双行显示
  84.   lcd_B(0, 0x0C, 5); //打开显示器
  85.   lcd_B(0, 0x80, 5); //RAM指针定位
  86.   lcd_B(0, 0x01, 5); //启动清屏命初始化LCD
  87. }
  88. //==========================================================================
  89. //=========================几个功能常用函数=================================
  90. void lcd_cls()         { lcd_B(0, 0x01+0, 2);  } //清屏
  91. void lcd_cur0()        { lcd_B(0, 0x0C+0, 0);  } //隐藏光标
  92. void lcd_goto1(uchar x){if(ATB) lcd_B(0, 0x80+x, 0); else lcd_B(0, 0x94+x, 0);} //设置DDRAM地址,第1行x位
  93. void lcd_goto2(uchar x){if(ATB) lcd_B(0, 0xC0+x, 0); else lcd_B(0, 0xD4+x, 0);} //设置DDRAM地址,第2行x位
  94. void lcd_goto3(uchar x){if(ATB) lcd_B(0, 0x94+x, 0); else lcd_B(0, 0x80+x, 0);} //设置DDRAM地址,第3行x位
  95. void lcd_goto4(uchar x){if(ATB) lcd_B(0, 0xD4+x, 0); else lcd_B(0, 0xC0+x, 0);} //设置DDRAM地址,第4行x位
  96. void lcd_putc(uchar d) { lcd_B(1, 0x00+d, 0);  } //字符输出
  97. void lcd_puts(uchar *s){ for(; *s; s++) lcd_B(1,*s,0); } //字串输出
  98. //==============字符显示函数====================

  100. void lcd_putp(float a,float b,char bo,char n, float qmin){ //带单位显示复数,n是单位下限,qmin是最小位权值(用于限定有效数字)
  101.   code uchar dwB[] = {'p','n','u','m',' ','k','M','G'}; //单位表
  102.   char i,j, c=0, h=digW-1, fh[2]={' ','+'};
  103.   long d,q,qm,Q=1; //最高位权
  104.   float f,g=1;
  105.   if(a<0) fh[0] = '-', a = -a;
  106.   if(b<0) fh[1] = '-', b = -b;
  107.   if(a>b) f = a; else f = b;
  108.   for(i=1;i<digW;i++) Q *= 10;
  109.   for(i=0;i<3;i++){ if(f*g >= 1000) g/=1000, c++; } //以3位为单位移动小数点,右移
  110.   for(i=0;i<n;i++){ if(f*g < 1)     g*=1000, c--; } //以3位为单位移动小数点,左移
  111. if ((n==1)&&(c==-1)){
  112.   for(i=1;i<2 && f*g<Q;i++) g*=10,h--;           //继续移动小数点，使之满字
  113. }else if ((n==2)&&(c==-2)){
  114.   for(i=1;i<3 && f*g<Q;i++) g*=10,h--;           //继续移动小数点，使之满字
  115. }else if ((n==4)&&(c==-4)){
  116.   for(i=1;i<2 && f*g<Q;i++) g*=10,h--;           //继续移动小数点，使之满字
  117. }else{
  118.   for(i=1;i<digW && f*g<Q;i++) g*=10,h--;        //继续移动小数点，使之满字
  119. }
  120.   qm = g*qmin;
  121.   for(i=0;i<2;i++){
  122.    if(i) d = b*g;      //取出实部
  123.    else  d = a*g;      //取出虚部
  124.    if(qm) d+=qm/2, d-=d%qm;//去除小于qmin的尾数
  125.    q = Q;
  126.    lcd_putc(fh[i]);        //显示符号
  127.    for(j=0; j<digW; j++){  //数字输出
  128.     lcd_putc(d/q+48);      //数字
  129.     if(j==h) lcd_putc('.');//小数点
  130.     d %= q, q /= 10;  
  131.    }
  132.    if(!bo) break;     //不显示虚部
  133.   }
  134.   //lcd_putc(dwB[c+4]); //单位
  135. if(dwB[c+4]=='u') { lcd_putc(9);} else {
  136. if(n==1){
  137. if(dwB[c+4]==' ') { lcd_putc(8); OX[6]=32; } else { lcd_putc(dwB[c+4]); OX[6]=8; } //自动单位
  138. }
  139. else { lcd_putc(dwB[c+4]); OX[6]=8; }
  140. } //符号

  142. }
  143. void lcd_putf(float a, char n, float qmin) //带单位显示浮点数,n是单位下限
  144.   { lcd_putp(a,0,0,n,qmin); }
  145. void lcd_int(int a,char w){ //定宽显示正整数
  146.   char i=0, s[5] = {' ',' ',' ',' ',' '};
  147.   if(a<0) { a=-a; lcd_puts("-"); }
  148.   else    lcd_puts(" ");
  149.   do{
  150.    s[i++] = a%10+48;
  151.    a /= 10;
  152.   }while(a);
  153.   for(;w;w--) lcd_putc(s[w-1]);
  154. }

  156. //==========================================================================
  157. //===============================延时函数===================================
  158. void delay(uint loop) { uint i; for(i=0;i<loop;i++); } //延时函数
  159. void delay2(uint k)   { for(;k>0;k--) delay(10000);  } //长延时,k=100大约对应1秒

  161. //==========================================================================
  162. //=================================AD转换===================================
  163. sfr P1ASF = 0x9D;     //将P1置为模拟口寄存器(使能),各位中为1的有效
  164. sfr ADC_CONTR = 0xBC; //A/D转换控制寄存器
  165. sfr ADC_res   = 0xBD; //A/D转换结果寄存器
  166. sfr ADC_resl  = 0xBE; //A/D转换结果寄存器

  168. void set_channel(char channel){
  169. P1ASF = 1<<channel;
  170. ADC_CONTR = channel+128; //最高位是电源开关,低3位通道选择
  171. delay(1); //首次打开电源应延迟，使输入稳定
  172. }
  173. uint getAD2(){
  174. ADC_CONTR |= 0x08;             //00001000,置ADC_START=1启动A/D 转换
  175. while ( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
  176. ADC_CONTR &= 0xE7;             //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
  177. return ADC_res*4 + ADC_resl;
  178. }
  179. /*
  180. uchar get_AD(){
  181. ADC_CONTR |= 0x08;             //00001000,置ADC_START=1启动A/D 转换
  182. while( !(ADC_CONTR & 0x10) );  //等待A/D转换结束(ADC_FLAG==0)
  183. ADC_CONTR &= 0xE7;             //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
  184. return ADC_res;
  185. }
  186. */


  189. //==========================================================================
  190. //==================================EEPROW偏程==============================
  191. sfr IAP_data  = 0xC2;
  192. sfr IAP_addrH = 0xC3;
  193. sfr IAP_addrL = 0xC4;
  194. sfr IAP_cmd   = 0xC5;
  195. sfr IAP_trig  = 0xC6;
  196. sfr IAP_contr = 0xC7;
  197. /********************
  198. 写字节时，可以将原有数据中的1改为0，无法将0改为1，只能使用擦除命令将0改为1
  199. 应注意，擦除命令会将整个扇区擦除
  200. *********************/
  201. int eepEn = 0;
  202. void saEEP(){ //触发并EEP保护
  203. if(eepEn==12345) IAP_trig = 0x5A;  //先送5A
  204. if(eepEn==12345) IAP_trig = 0xA5;  //先送5A再送A5立即触发
  205. IAP_cmd = 0;      //关闭令，保护
  206. IAP_contr = 0;    //关EEPROM，保护
  207. IAP_trig = 0;
  208. IAP_addrL = 255; //设置读取地址的低字节，地址改变才需要设置
  209. IAP_addrH = 255; //设置读取地址的高字节，地址改变才需要设置
  210. }
  211. uchar readEEP(uint k){ //读取
  212. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
  213. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
  214. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
  215. IAP_cmd = 1;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
  216. saEEP(); //触发并保护
  217. return IAP_data;
  218. }
  219. void writeEEP(uint k, uchar da){ //写入
  220. IAP_data = da;    //传入数据
  221. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
  222. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
  223. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
  224. IAP_cmd = 2;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
  225. saEEP(); //触发并保护
  226. }
  227. void eraseEEP(uint k){ //擦除
  228. IAP_addrL = k;    //设置读取地址的低字节，地址改变才需要设置
  229. IAP_addrH = k>>8; //设置读取地址的高字节，地址改变才需要设置
  230. IAP_contr = 0x81; //设置等待时间，1MHz以下取7，2M以下取6，3M取5，6M取4，12M取3，20M取2，24M取1，30M取0，前导1表示许档IAP
  231. IAP_cmd = 3;      //读取值1，写取2，擦除取3，擦除时按所在字节整个扇区撺除
  232. saEEP(); //触发并保护
  233. }


  236. xdata struct Ida{
  237. char zo[3];//三个频率下的零点改正值
  238. char j1;   //相位补偿(3倍档)
  239. char j2;   //相位补偿(10倍档)
  240. char J[4];  //相位补偿(V/I变换器)
  241. char R[4]; //下臂电阻修正(40,1k,10k,100k)
  242. char g1;   //增益修正(3倍档)
  243. char g2;   //增益修正(10倍档)
  244. char phx; //1kHz以下相位改正
  245. char R4b; //100k档7.8kHz频率下的幅度补偿
  246. char G2b; //9倍档7.8kHz频率下的幅度补偿
  247. char feq; //频率修正
  248. char ak;  //AD斜率修正
  249. float QRs[3],QXs[3]; //短路清零数据
  250. float QRo[3],QXo[3]; //开路清零数据
  251. } cs;

  253. void cs_RW(char rw){
  254. uchar i,*p = &cs;
  255. const int offs=512;
  256. if(rw){
  257.   delay2(10); //等待(防止掉电误识别键盘而调用本函数)
  258.   eraseEEP(offs);
  259.   for(i=0;i<sizeof(cs);i++) writeEEP(i+offs,p[i]);
  260. }else{
  261.   for(i=0;i<sizeof(cs);i++) p[i]=readEEP(i+offs);
  262. }
  263. }

  265. //==========================================================================
  266. //==================================LCR主程序===============================
  267. //==========================================================================
  268. sfr P1M1=0x91; //P1端口设置寄存器
  269. sfr P1M0=0x92; //P1端口设置寄存器
  270. sfr P0M1=0x93; //P0端口设置寄存器
  271. sfr P0M0=0x94; //P0端口设置寄存器
  272. sfr P2M1=0x95; //P2端口设置寄存器
  273. sfr P2M0=0x96; //P2端口设置寄存器
  274. sfr P3M1=0xB1; //P3端口设置寄存器
  275. sfr P3M0=0xB2; //P3端口设置寄存器


  278. sbit spk=P2^3; //蜂鸣器
  279. sbit Kb=P2^1;  //量程开关B
  280. sbit Ka=P2^2;  //量程开关A
  281. sbit DDS2=P1^2;//移相方波输出口
  282. sbit K3=P1^7;
  283. sbit K4=P1^6;
  284. sbit K5=P1^5;  //7.8kHz滤波开关
  285. sbit K6=P1^4;
  286. sbit K8=P2^0;  //100Hz滤波开关
  287. sbit K32=P1^1; //32kHz发生器
  288. xdata uchar menu=1,menu2=0; //菜单变量

  290. //==============低频信号DDS相关参数====================
  291. //PCA相关寄存器
  292. sfr CMOD = 0xD9;   //钟源选择控制等
  293. sfr CH = 0xF9;     //PCA的计数器
  294. sfr CL = 0xE9;     //PCA的计数器
  295. sfr CCON = 0xD8;   //PCA控制寄存器
  296. sfr CCPAM0 = 0xDA; //PCA模块0工作模式寄存器
  297. sfr CCPAM1 = 0xDB; //PCA模块1工作模式寄存器
  298. sfr CCAP0L = 0xEA; //模块0捕获寄存器低位
  299. sfr CCAP0H = 0xFA; //模块0捕获寄存器高位
  300. sfr IPH = 0xB7;

  302. sbit PPCA  = IP^7;   //PCA的中断优先级设置
  303. sbit CCF0  = CCON^0; //PCA的模块0中断标志
  304. sbit CCF1  = CCON^1; //PCA的模块1中断标志
  305. sbit CR = CCON^6;    //PCA计数器使能

  307. uint ph=0, phM=256, feq=977; //相位,phM相位步进值
  308. uchar *ph8 = (char*)&ph;    //ph的高8位地址
  309. xdata float feqX=976.6; //实际输出频率
  310. uchar code sinB[256]={
  311. //查询表中不可装载零值，否则会造成无中断产生
  312. 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,
  313. .......
  314. uchar chuX=0; //方波DDS初相
  315. //==============低频信号DDS函数====================
  316. void PWM_init(){ //把PCA置为PWM
  317.   CMOD = 2;   //0000 0010 计数源选择,钟源取fosc/2
  318.   CL = CH = 0;
  319.   CCAP0L = CCAP0H = 192; //占空比为25%
  320.   //CCPAM0=0x42;//0100 0010,PCA的模块0设置为PWM模式,无中断
  321.   CCPAM0=0x53;//0101 0011,PCA的模块0设置为PWM模式,有中断，下降沿中断
  322.   PPCA = 1;   //优先中断
  323.   IPH |= 128;
  324.   //CR = 1;   //开始计数
  325.   EA = 1;     //开总中断
  326. }

  328. void PCAinter(void) interrupt 7 {//PCA中断
  329.   uchar x,y;
  330.   CCF0=0; //清除中断请求,以免反复中断
  331.   x = *ph8;        //截断正弦相位累加器,取高8位
  332.   y = x + chuX;    //方波相位
  333.   CCAP0H = sinB[x];//正弦DDS输出
  334. if(DDS3) {  DDS2 = fbB[y];   //方波DDS输出
  335. }else {DDS2 = 0;}
  336.   ph += phM;       //相位累加
  337.   K32 = ~K32;
  338. }
  339. void setDDS(uint f){ //参考时钟是c=(fosc/2)/256=32000000/2/256=62500,频率f=c*phM/2^16
  340. feq = f;
  341. phM=f*65536.0/62500; //phM=f*2^16/62500
  342. feqX = 62500.0*phM/65536*(1+cs.feq/10000.0); //实际输出频率
  343. ph = 0;              //高频时，使波形对称
  344. if(!f) CR=0; else CR=1;
  345. }

  347. //相位控制函数
  348. xdata char xw=0; //相位
  349. void set90(char k){ //设置方波的相位差
  350.   k %= 4;
  351.   if(k<0) k += 4;
  352.   if(k==0) chuX=0;   //移相0度
  353.   if(k==1) chuX=64;  //移相90度
  354.   if(k==2) chuX=128; //移相180度
  355.   if(k==3) chuX=192; //移相270度
  356.   xw = k;
  357. }
  358. void set902() { set90(xw+1); } //相位步进

  360. //==============量程控制函数====================
  361. xdata char rng=1; //量程
  362. void setRng(char k){//切换量程
  363. if(k>3) k=3;
  364. if(k<0) k=0;
  365. if(k==0) Ka=0,Kb=0; //40欧
  366. if(k==1) Ka=0,Kb=1; //1k欧
  367. if(k==2) Ka=1,Kb=0; //10k欧
  368. if(k==3) Ka=1,Kb=1; //100k欧
  369. rng = k;
  370. }
  371. void setRng2(){ setRng( (rng+1)%4); } //量程步进

  373. //==============增益控制函数====================
  374. char curGain=1; //当前增益索引号
  375. void setGain(char k){ //设置电路增益
  376.   if(k>3) k=3;
  377.   if(k<0) k=0;
  378.   if(k==0) K4=0,K6=0; //1倍
  379.   if(k==1) K4=0,K6=1; //3倍
  380.   if(k==2) K4=1,K6=0; //9倍
  381.   if(k==3) K4=1,K6=1; //27倍
  382.   curGain = k;
  383. }
  384. void setGain2(){ setGain((curGain+1)%4); }


  387. //==============AD非线性改正与过采样=================
  388. uint getAD10(){ //120次采样,用reentrant申明，有的单片机无法运行
  389. int i;
  390. long c;
  391. for(i=0;i<250;i++) c += getAD2();
  392. return (c+12)/25;
  393. }
  394. uint getAD10b(){ //120次采样,用reentrant申明，有的单片机无法运行
  395. xdata long c = 0, c2 = 0;
  396. int i;
  397. for(i=0;i<250;i++){
  398.   ADC_CONTR |= 0x08;             //00001000,置ADC_START=1启动A/D 转换
  399.   while ( !(ADC_CONTR & 0x10) ); //等待A/D转换结束(ADC_FLAG==0)
  400.   ADC_CONTR &= 0xE7;             //11100111,置ADC_FLAG=0清除结束标记, 置ADC_START=0关闭A/D 转换
  401.   c  += ADC_resl;
  402.   c2 += ADC_res;
  403. }
  404. c3 = c;
  405. c = ( c2*4L + c )/25;
  406. c3= ( c2*4L + c3 ) -c*25;
  407. return c;
  408. }



  412. //==============LCR测量====================
  413. code float ga[4] =  {  1,   3,   9,  27 }; //增益表
  414. code float dwR[4] = { 40, 1e3, 1e4, 1e5 }; //各档电阻表
  415. xdata int Vxy[12]={0,0,0,0,1,1}; //Vxy[Vx1,Vy1,Vx2,Vy2,g1,g2]
  416. xdata char Sxw[4]={0,1,0,1};    //保存正确相位
  417. xdata int Vz[24];               //LCR测量结果队
  418. xdata uchar tim=0,tims=0;
  419. xdata char pau=0; //暂停坐标自动旋转
  420. xdata char isQ=1;

  422. #define Vfull 9600
  423. #define gad (9600/30)
  424. uchar mT = 6; //测量速度,mT取值为6或12或24时，可以消除数字噪声，尾数不动，但不利于于取平均
  425. //==============设置频率====================
  426. xdata char feqK=1; //频率索引号
  427. void setF(char k){
  428.   if(k==-1) k = (feqK+1)%3; //步进
  429.   feqK = k;
  430.   if(k==0) { setDDS(100);   K5=0; K8=1; mT=12; } //置为100Hz
  431.   if(k==1) { setDDS(977);   K5=0; K8=0; mT=6;  } //置为1kHz
  432.   if(k==2) { setDDS(7813);  K5=1; K8=0; mT=6;  } //置为7.8125kHz
  433.   TH1 = 150, TL1 = 171; //置为20ms
  434.   tims = 0;
  435.   tim = 0;
  436.   ph = 0;
  437. }
  438. int absMax(int a,int b){ //取两个数绝对值最大者
  439.   if(a<0) a = -a;
  440.   if(b<0) b = -b;
  441.   if(b>a) a = b;
  442.   return a;
  443. }

  445. char yc1=0,yc2=0; //溢出标识
  446. char slw = 1; //降速倍率
  447. char chg=0;   //量程切换标记
  448. void timerInter1(void) interrupt 3 {//T1中断,LCR数据采集
  449. code int y[5]={0,-15,30,24,0}; //满度用30
  450. code int x[5]={4900,5090,5140,5500,6120};
  451.   char g,gb,Rb,i; int c=0,cc=0;
  452.   tims++;
  453.   if(tims>=mT/slw) tims = 0, tim++, c = 1;
  454.   if(tim>=4) tim=0;
  455.   if(pau) return;
  456.   if(!c) return; //tim未进位触发
  457.   c = getAD10b();   //读取电压值
  458.   cc= c3;
  459.   c -= cs.zo[feqK];
  460. if(cs.ak>0){
  461. for(i=0;i<4;i++){ //非线性改正
  462.   if(c<x[i]||c>=x[i+1]) continue;
  463.   c += cs.ak*( y[i] + (y[i+1]-y[i]) * ((int)(c-x[i])) / (x[i+1]-x[i]) ) / 30;
  464.   break;
  465. }
  466. }
  467.   
  468.   Vxy[tim] = xw<2 ? c : -c;  //保存当前电压
  469.   Vxy[tim+6] = xw<2 ? cc : -cc;  //保存当前电压
  470.   Vxy[tim/2+4] = curGain;    //保存当前增益
  471.   Sxw[tim] = ( Sxw[tim]+(c<0 ? 2 : 0) )%4;  //相位翻转(预测下次的相位采用值)
  472.   if(tim==1||tim==3){ //上下臂切换
  473.     if(tim==1) { K3=1, c = absMax(Vxy[2],Vxy[3]), g=Vxy[5]; yc2 = c>Vfull ? 1:0; }//切换到下臂
  474.     if(tim==3) { K3=0, c = absMax(Vxy[0],Vxy[1]), g=Vxy[4]; yc1 = c>Vfull ? 1:0; }//切换到上臂
  475.     gb=g, Rb=rng;
  476.     if(c>Vfull){ if(g==0&&rng>0&&K3&&isQ) Rb=rng-1; gb=0; }
  477.     else if(c<gad*1 ) gb = g+3; //增加27倍
  478.     else if(c<gad*3 ){ gb = g+2;if(c<gad*2&&rng>=1&&rng<=2&&K3&&isQ ) { gb=0; Rb=rng+1; }} //增加9倍
  479.     else if(c<gad*9)  gb = g+1; //增加3倍
  480.         if(gb>3) gb = 3;
  481.     if(g==3&&rng<3&&K3&&isQ) { gb=0; Rb=rng+1; }
  482.     if(g==0&&c<gad*1&&rng<3&&K3&&isQ) { gb=0; Rb=rng+1; }

  484.         setRng(Rb); setGain(gb); //置量程
  485.     if(gb!=g || Rb!=rng) slw = 2, chg++; //量程正在改变，则加速测量
  486.     if(tim==3){ if(!chg) slw=1; chg=0; }
  487.   }
  488.   set90( Sxw[ (tim+1)%4 ] ); //相位旋转
  489.   if(tim==3){ for(i=0;i<12;i++) Vz[i+12]=Vz[i], Vz[i]=Vxy[i]; }
  490. }


  493. void showR(char binLian, char showk){ //显示LCR
  494.   xdata float a=0,b=0,c=0,qq=0,dd=0,e,w,L,C;
  495.   xdata int gr=cs.R[rng], g1=cs.g1, g2=cs.g2;
  496.   xdata int g12 = g1 + g2;          //增益最大补偿
  497.   xdata int j12 = (int)cs.j1+cs.j2; //相位最大补偿
  498.   xdata float JD = 0, G = 0, cJD;   //补偿变量
  499.   xdata float v[4];
  500.   xdata char ATC=0,d3=1;

  502.   //LCR计算
  503.   if(feqK<0||feqK>2) return;
  504.   if(feq==7813&&rng==3) gr += cs.R4b; //7.8kHz时下臂修正量
  505.   //可控增益单元的增益修正、相位补偿量
  506.   if(feq==7813) g2 += cs.G2b;  //7.8kHz时9倍档修正量
  507. ……………………

  509. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei附件下载:
2004程序_3.0_全自动电桥V1.rar (28.53 KB, 下载次数: 437)

评分

参与人数 1黑币 +20 收起 理由
admin + 20 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:99525 发表于 2021-12-7 02:53 | 显示全部楼层
许老师把资料公开了？怪不得某宝多出来很多套件！
回复

使用道具 举报

ID:36902 发表于 2021-12-11 09:18 | 显示全部楼层
吃透了吗?可以一起讨论学习下吗
回复

使用道具 举报

ID:976070 发表于 2021-12-11 19:02 | 显示全部楼层
置量程不懂！！！！！！
回复

使用道具 举报

ID:241992 发表于 2022-1-1 20:58 | 显示全部楼层
置量程不懂！！！！！！
回复

使用道具 举报

ID:357043 发表于 2022-3-2 00:10 | 显示全部楼层
一起讨论学习下
回复

使用道具 举报

ID:854496 发表于 2022-3-3 17:15 | 显示全部楼层
感谢分享，过了这么多年，许老师这个电桥还是很给力啊，DIY者乐此不疲
回复

使用道具 举报

ID:983641 发表于 2022-3-13 15:08 | 显示全部楼层
感谢许老师的无私奉献。
回复

使用道具 举报

ID:1016748 发表于 2022-4-8 15:43 | 显示全部楼层
high，供电不足
回复

使用道具 举报

ID:452539 发表于 2022-4-13 13:53 | 显示全部楼层
哪位坛友能把徐老师电桥的硬件资料发上来啊，学习一下
回复

使用道具 举报

ID:1036978 发表于 2022-6-28 05:37 来自手机 | 显示全部楼层
这个固件在2004屏幕上显示不完整。
回复

使用道具 举报

ID:61140 发表于 2022-6-28 21:30 | 显示全部楼层
固件其实是LCD1602的,但写的用2004的屏,会导致显示不完整,
回复

使用道具 举报

ID:155507 发表于 2022-7-30 13:48 | 显示全部楼层
lao4jiadian 发表于 2022-4-13 13:53
哪位坛友能把徐老师电桥的硬件资料发上来啊，学习一下

XJW01许老师 LCR数字电桥板原理图 XJW01许老师LCR数字电桥板原理图.png



回复

使用道具 举报

ID:41415 发表于 2022-9-8 11:07 | 显示全部楼层
有没有全套2004LCD可以完全使用的固件和硬件，网上找的都不是很全
回复

使用道具 举报

ID:920827 发表于 2023-4-18 16:50 | 显示全部楼层
研究研究代码，看看能不能搞懂
回复

使用道具 举报

ID:1090742 发表于 2023-8-5 02:55 | 显示全部楼层
太有用啦
回复

使用道具 举报

ID:876099 发表于 2023-9-7 16:59 | 显示全部楼层
我想问一下楼主能理解这个程序的意思吗，我最近在搞电桥，想移植程序到stm32无奈看不懂许老师这个stc的程序，如果知道可以回复我一下我最近都在线
回复

使用道具 举报

ID:1106269 发表于 2023-12-25 16:30 | 显示全部楼层
感谢老师的无私奉献。
回复

使用道具 举报

ID:452133 发表于 2024-2-23 20:26 | 显示全部楼层

感谢老师的无私奉献。
回复

使用道具 举报

ID:93626 发表于 2024-3-1 15:17 | 显示全部楼层
12864版吗?
回复

使用道具 举报

ID:1111950 发表于 2024-3-2 09:47 | 显示全部楼层
1045964948 发表于 2023-9-7 16:59
我想问一下楼主能理解这个程序的意思吗，我最近在搞电桥，想移植程序到stm32无奈看不懂许老师这个stc的程序 ...

我也学不会，期待许老师出山答疑。STC的程序，有几个小伙伴在学习  STC官方也在折腾好像
回复

使用道具 举报

ID:57414 发表于 2024-3-8 21:07 | 显示全部楼层
哪里有这个电桥的PCB文件，我想去打个板子调试下效果。
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表