搜索
bottom↓
楼主: jun427

用M8制作电感、电容、电解电容测量仪表

  [复制链接]

出0入0汤圆

发表于 2012-9-2 22:22:18 | 显示全部楼层
仿制中,继电器和云母电容还在路上。。。。

出0入8汤圆

 楼主| 发表于 2012-9-3 10:22:56 | 显示全部楼层
halloocc 发表于 2012-9-2 22:18
不好意思,表达不周。我意思是 LZ的推算公式Cx=(F1^2/F2^2-1)*C1, 假设F1

看原理图就知道,测量电容时被测电容是并联到谐振回路的,所以F1不可能大于F2;测量电感时被测电感是串联到谐振回路的,同样F1不可能大于F2。

出0入0汤圆

发表于 2012-9-3 11:49:58 | 显示全部楼层
jun427 发表于 2012-9-3 10:22
看原理图就知道,测量电容时被测电容是并联到谐振回路的,所以F1不可能大于F2;测量电感时被测电感是串联 ...


本人愚钝了, 谢指教

出0入0汤圆

发表于 2012-9-3 14:47:16 | 显示全部楼层
LZ还想问下
因L1  82uH在当地找了几个店都没有,  看贴电感L1的具体傎是临时计算出的吧,那是不是我用100UH代替也行,这个值最好在多少到多少范围选择好了
谢谢!

出0入8汤圆

 楼主| 发表于 2012-9-3 15:39:05 | 显示全部楼层
yzl1978 发表于 2012-9-3 14:47
LZ还想问下
因L1  82uH在当地找了几个店都没有,  看贴电感L1的具体傎是临时计算出的吧,那是不是我用100UH ...

你可以使用80-120uH的任一取值的电感,不影响测量结果。

出0入0汤圆

发表于 2012-9-3 16:49:14 | 显示全部楼层
非常好!谢谢分享!

出0入0汤圆

发表于 2012-9-4 09:09:26 | 显示全部楼层

LZ下面代码怎么多了 3.1416 * 3.1416  上图只是F1的平方啊  
         L1 = 3.1416 * 3.1416
         L1 = L1 * 4
         L1 = L1 * Ca1
         L1 = L1 * C1
         L1 = 1 / L1
         L1 = L1 * 1000000000000000000       '单位uH

出0入8汤圆

 楼主| 发表于 2012-9-4 09:37:19 | 显示全部楼层
yzl1978 发表于 2012-9-4 09:09
LZ下面代码怎么多了 3.1416 * 3.1416  上图只是F1的平方啊  
         L1 = 3.1416 * 3.1416
         L1  ...


当时整理文档时写错了,应该是这样的

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-9-4 09:55:47 | 显示全部楼层
好玩意,有时间摆弄一个。

出0入0汤圆

发表于 2012-9-4 10:08:14 | 显示全部楼层
本帖最后由 icewooo 于 2012-9-4 10:09 编辑

那位好人帮忙编译个HEX文件,我仿制的是jianjun42 的那个M16能测频率 的LFC,C1=1805 , C2=1800, L=82   ,谢谢了  icewoo@126.com
jianjun42的程序:http://www.amobbs.com/forum.php? ... 9&highlight=LFC
我只改了C2=1800,是不是别的不改。
程序:
$regfile = "m16def.dat"
$crystal = 8000000
Config Lcdpin = Pin , Db4 = Portd.2 , Db5 = Portb.7 , Db6 = Protb.6 , Db7 = Portb.5 , Rs = Protd.6 , E = Portd.5
Config Lcd = 16 * 2
Config Timer1 = Counter , Edge = Falling                    '配置T/C1为计数
Config Timer2 = Timer , Prescale = 64                       '配置T/C2定时
Config Int1 = Falling
Config Timer0 = Timer , Prescale = 8
On Ovf0 Tim0_isr
On Int1 T1_isr
On Ovf2 Tim2_isr
Enable Ovf2
On Ovf1 Tim1_isr
Enable Ovf1
Enable Interrupts
Tcnt2 = &H83
Start Timer2
Counter1 = 0
Start Counter1
Dim F1 As Long , F2 As Long , Fx As Long , Tc1 As Long , Te As Long
Dim C1 As Single , Ca1 As Single , Ca2 As Single , Cx As Single , L1 As Single , Lx As Single , F11 As Single
Dim V1 As String * 11 , V2 As String * 11 , V3 As String * 9 , Vf As String * 6 , Vs As String * 8 , Z1 As String * 2 , Z2 As String * 3
Dim J As Bit , I As Byte , K As Bit , M As Bit , Vl As Byte , Tc As Byte , Fa As Byte
'///////端口初始化//////////
Ddrc.0 = 1
Ddrc.1 = 1
Ddrc.2 = 0
Ddrc.3 = 1
Ddrc.4 = 1
Ddrc.5 = 1
Ddrd.7 = 1
Portd.7 = 1
Portc.0 = 1
Portc.1 = 1
Portc.2 = 1
Portc.3 = 1
Portc.4 = 0
Portc.5 = 1
Waitms 20
Portc.4 = 1
Portc.5 = 0
J = 1
K = 1
M = 1
I = 1
Tc1 = 0
Cls
Cursor Off

'////////////////////////////////主程///////////////////////////////
Do

'///////////////按键处理程序段///////////////

   If Pinc.2 = 0 Then                                       '选择键
      Waitms 40
         If Pinc.2 = 0 Then
            Incr I
            Bitwait Pinc.2 , Set                            '防抖动处理
         End If
   End If

   Select Case I
           Case 1                                           '校准程序段
               If J = 1 Then
                  Lcd "  L_C_F  meter  "
                  Lowerline
                  Lcd "   wait plise   "
                  Waitms 1500
                  Portc.0 = 0                               '接入标准电容C2
                  Waitms 1500
                  Ca1 = F1 * F1
                  Ca2 = F2 * F2
                  C1 = Ca1 - Ca2
                  C1 = Ca2 / C1
                  C1 = C1 * 1800                            '1800是标准电容C2
                  L1 = 3.1416 * 3.1416
                  L1 = L1 * 4
                  L1 = L1 * Ca1
                  L1 = L1 * C1
                  L1 = 1 / L1
                  L1 = L1 * 1000000000000000000             '单位uH
                  Portc.0 = 1                               '断开标准电容C2
               End If
               J = 0
               Vf = Str(f1)                                 '显示f1
               Vf = Format(vf , "      ")
               Locate 1 , 7
               Lcd "F=" ; Vf ; "Hz"
               Locate 1 , 1
               Lcd "SetOK "
               V1 = Fusing(c1 , "#.#")
               V2 = Fusing(l1 , "#.#")
               Locate 2 , 1
               Lcd V1 ; "pF " ; V2 ; "uH"                   '显示C1和L1

           Case 2                                           '电容测量程序段
                Vf = Str(f1)
                Vf = Format(vf , "      ")
                Locate 1 , 7
                Lcd "F=" ; Vf ; "Hz"
                F11 = F1 * F1
                Cx = Ca1 / F11
                Cx = Cx - 1
                Cx = Cx * C1
                V1 = Fusing(cx , "#.#")
                Vl = Len(v1)
                Z1 = "pF"
                If Vl = 6 Then
                   V1 = Mid(v1 , 1 , 4)
                   Z1 = "pF"
                Elseif Vl = 7 Then
                        V1 = Mid(v1 , 1 , 4)
                        V1 = Format(v1 , "00.00")
                        Z1 = "nF"
                Elseif Vl = 8 Then
                        V1 = Mid(v1 , 1 , 4)
                        V1 = Format(v1 , "000.0")
                        Z1 = "nF"
                Elseif Vl = 9 Then
                        V1 = Mid(v1 , 1 , 4)
                        V1 = Format(v1 , "0.000")
                        Z1 = "uF"
                End If

                Vs = Space(8)
                Locate 2 , 1
                Lcd "   Cx=" ; V1 ; Z1 ; Vs
                Locate 1 , 1
                Lcd "TestC "

           Case 3                                           '电感测量程序段
                 Vf = Str(f1)
                 Vf = Format(vf , "      ")
                 If F1 < 50 Then
                    Vf = "     0"
                 End If
                 Locate 1 , 7
                 Lcd "F=" ; Vf ; "Hz"
                 Portd.7 = 0                                '输入端切换到测电感
                 If F1 > 1000 Then
                    F11 = F1 * F1
                    Lx = Ca1 / F11
                    Lx = Lx - 1
                    Lx = Lx * L1
                 Else
                    Lx = 0
                 End If
                 V1 = Fusing(lx , "#.##")
                 Vl = Len(v1)
                 Z1 = "uH"
                 If Vl = 6 Then
                    V1 = Mid(v1 , 1 , 5)
                    Z1 = "uH"
                 Elseif Vl = 7 Then
                         V1 = Mid(v1 , 1 , 4)
                         V1 = Format(v1 , "0.000")
                         Z1 = "mH"
                 Elseif Vl = 8 Then
                         V1 = Mid(v1 , 1 , 4)
                         V1 = Format(v1 , "00.00")
                         Z1 = "mH"
                 Elseif Vl = 9 Then
                         V1 = Mid(v1 , 1 , 4)
                         V1 = Format(v1 , "000.0")
                         Z1 = "mH"
                 Elseif Vl = 10 Then
                         V1 = Mid(v1 , 1 , 4)
                         V1 = Format(v1 , "0.000")
                         Z1 = "H "
                 End If
                 Vs = Space(8)
                 Locate 2 , 1
                 Lcd "   Lx=" ; V1 ; Z1 ; Vs
                 Locate 1 , 1
                 Lcd "TestL "

           Case 4                                           '频率测量程序段
                 Portc.3 = 0
                 Portc.5 = 1
                 Waitms 20
                 Portc.5 = 0
                 Locate 1 , 1
                 Lcd "TestF  [0-35MHz]"
                 V3 = Str(fx)
                 If Fx < 1000 Then
                    V3 = Format(v3 , "        0")
                    Z2 = "Hz "
                 Elseif Fx > 999 And Fx < 1000000 Then
                         V3 = Format(v3 , "     .000")
                         Z2 = "KHz"
                 Elseif Fx > 999999 Then
                         V3 = Format(v3 , "  .000000")
                         Z2 = "MHz"
                 End If
                 Locate 2 , 3
                 Lcd "F=" ; V3 ; Z2

           Case 5                                           '电解电容测量程序段 (<500uf)
                 Portd.7 = 1
                 If K = 1 Then
                    Disable Ovf1
                    Disable Ovf2
                    Enable Int1
                    Enable Ovf0
                    Locate 1 , 1
                    Lcd "TestCE  [<500uF]"
                    Locate 2 , 1
                    Lcd "   CEx=       "
                 End If
                 K = 0
                 Portc.1 = 0                                '开始充电
                 Start Timer0                               '开始计时
           Case 6                                           '电解电容测量程序段(>500uf)

                 If M = 1 Then
                    Portc.0 = 0
                    Locate 1 , 1
                    Lcd "TestCE  [>500uF]"
                    Locate 2 , 1
                    Lcd "   CEx=       "
                 End If
                 M = 0
                 Portc.1 = 0                                '开始充电
                 Start Timer0                               '开始计时
           Case 7
                I = 2                                       '返回到电容测量
                Enable Ovf1
                Enable Ovf2
                Disable Int1
                Disable Ovf0
                Portc.0 = 1
                Portc.3 = 1
                K = 1
                M = 1

   End Select

Loop
End

'/////计数溢出中断/////

Tim1_isr:

   Incr Tc1

Return

'/////定时中断/////

Tim2_isr:

   Tcnt2 = &H83                                             '定时器T2初值
   Incr Tc
   If Tc = 250 Then
       Stop Counter1
       Portc.4 = 0                                          '关闭闸门
       Tc1 = Tc1 * 65535
       Fx = Counter1
       Fa = Pina
       Portc.5 = 1                                          '74LS393清零
       Counter1 = 0                                         '清零计数值
       Fx = Fx * 256
       Fx = Fx + Fa
       Fx = Fx + Tc1
       Fx = Fx * 4
       If Portc.0 = 1 Then F1 = Fx Else F2 = Fx
       Portc.5 = 0                                          '74LS393开启
       Start Counter1
       Portc.4 = 1                                          '打开闸门
       Tc = 0
       Tc1 = 0
    End If

Return

'/////定时中断,测电解电容/////

Tim0_isr:

   Incr Te                                                  '定时器0中断次数

Return

'/////外部中断,测电解电容/////

T1_isr:

   Stop Timer0

   Te = Te * 256
   Te = Te + Tcnt0
   Te = Te / 2                                              '时间/充电电阻=被测电容

   V1 = Str(te)
   Vl = Len(v1)

   If Portc.0 = 1 Then                                      '充电电阻R9接入,<500uF
      Select Case Vl
              Case 2
                   V1 = "NO"
              Case 3
                   V1 = Mid(v1 , 1 , 3)
                   V1 = Format(v1 , "0.000")
              Case 4
                   V1 = Mid(v1 , 1 , 3)
                   V1 = Format(v1 , "0.00")
              Case 5
                   V1 = Mid(v1 , 1 , 3)
                   V1 = Format(v1 , "0.0")
              Case 6 : V1 = Mid(v1 , 1 , 3)
              Case 7 : V1 = "  OL  "
       End Select
   Elseif Portc.0 = 0 Then                                  '接入充电电阻R10
       Select Case Vl
               Case 2
                    V1 = Mid(v1 , 1 , 2)
                    V1 = Format(v1 , "0.00")
               Case 3
                    V1 = Mid(v1 , 1 , 3)
                    V1 = Format(v1 , "0.00")
               Case 4 : V1 = Mid(v1 , 1 , 2)
               Case 5 : V1 = Mid(v1 , 1 , 3)
               Case 6 : V1 = Mid(v1 , 1 , 4)
               Case 7 : V1 = Mid(v1 , 1 , 5)
      End Select
   End If
   Vs = Space(7)

   If Te > 1 And Te < 10 Then

      Locate 2 , 1
      Lcd "   CEx=" ; "0" ; "uF" ; Vs

   End If

   If Te > 10 Then

      Locate 2 , 1
      Lcd "   CEx=" ; V1 ; "uF" ; Vs

   End If

   Portc.1 = 1                                              '开始放电

   If Portc.0 = 1 And Te > 10 Then Waitms 100

   If Portc.0 = 0 And Te > 10 Then Waitms 500


   Tcnt0 = 0                                                '定时计数器清零
   Te = 0                                                   '定时中断次数清零
Return

出0入0汤圆

发表于 2012-9-5 15:37:02 | 显示全部楼层
本帖最后由 yzl1978 于 2012-9-5 15:38 编辑

LZ   LC200A手持式电感电容表 电容测量范围:0.01pF-10uF

最小分辨率:0.01pF

电感测量范围:0.001uH-100mH

最小分辨率:0.001uH

大电感测量范围:0.001mH-100H

最小分辨率:0.001mH

大电容测量范围:1uF-100mF

最小分辨率:0.01uF


如何增加你的LC测试的范围了,LC200A好象没有用继电器吧

能仿制一个LC200A吗

出0入8汤圆

 楼主| 发表于 2012-9-5 22:11:00 | 显示全部楼层
本帖最后由 jun427 于 2012-9-5 22:16 编辑
yzl1978 发表于 2012-9-5 15:37
LZ   LC200A手持式电感电容表 电容测量范围:0.01pF-10uF

最小分辨率:0.01pF


0.01pF 这个吹口气都要变,扩展不出来,至少是现制作的这个电路无法达到。

出0入0汤圆

发表于 2012-9-6 10:00:28 | 显示全部楼层
LZ你看下,我下载的LC_PCB1.PcbDoc文件与你做好的板比较,有一根线没连可以不连是吗?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-9-6 10:02:13 | 显示全部楼层
本帖最后由 yzl1978 于 2012-9-6 10:03 编辑

不好意思看错了,上面有接电阻

出0入0汤圆

发表于 2012-9-6 14:44:25 | 显示全部楼层

图中R21、C14取值多少

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入8汤圆

 楼主| 发表于 2012-9-6 17:01:40 | 显示全部楼层
yzl1978 发表于 2012-9-6 14:44
图中R21、C14取值多少

R21、C14 不用安装。

出0入8汤圆

 楼主| 发表于 2012-9-6 17:04:57 | 显示全部楼层
icewooo 发表于 2012-9-4 10:08
那位好人帮忙编译个HEX文件,我仿制的是jianjun42 的那个M16能测频率 的LFC,C1=1805 , C2=1800, L=82   , ...

你可以找这个制作的作者,他会帮助解决问题的。

出0入0汤圆

发表于 2012-9-6 20:50:42 来自手机 | 显示全部楼层
本帖最后由 yzl1978 于 2012-9-6 20:56 编辑

LZ  R9,R10要改的话程序改那两处,精度1%的用万用表量阻值没有2k,200欧
还有R13是不是也不用接

出0入8汤圆

 楼主| 发表于 2012-9-7 09:06:48 | 显示全部楼层
yzl1978 发表于 2012-9-6 20:50
LZ  R9,R10要改的话程序改那两处,精度1%的用万用表量阻值没有2k,200欧
还有R13是不是也不用接 ...

'/////外部中断,测电解电容/////

T1_isr:

   Stop Timer0

   Te = Te * 256
   Te = Te + Tcnt0     '定时器中断次数的和加上当前定时值
  Te = Te / 2    '时间/充电电阻=被测电容

R13不用接。

出0入0汤圆

发表于 2012-9-7 09:14:32 | 显示全部楼层
jun427 发表于 2012-9-7 09:06
'/////外部中断,测电解电容/////

T1_isr:

是这看到了,主要没找到200欧那改

出0入0汤圆

发表于 2012-9-7 21:12:29 | 显示全部楼层
LZ 这按键用的那种规格,网上看到有几种大小
有8*8、8.5*8.5、7*7的等等,PCB板已做好了所以问下应该买那种规格的

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入8汤圆

 楼主| 发表于 2012-9-8 14:26:18 | 显示全部楼层
yzl1978 发表于 2012-9-7 21:12
LZ 这按键用的那种规格,网上看到有几种大小
有8*8、8.5*8.5、7*7的等等,PCB板已做好了所以问下应该买那种 ...

实测了是8.5*8.5

出0入0汤圆

发表于 2012-9-10 12:27:17 | 显示全部楼层
看电路图应该用不到ADC的功能,AVCC接的L2,C13我也想省略了,该成用100欧姆电阻接+5V。晶振是8M的我手里没有,但是有很多12M的晶振,我以前用过在M8上也很稳定,所以想改成12M的,另外两个22PF电容我想省略掉,因为从来没发现接不接有什么区别,至少起振都没有问题的。但是程序定时部分不知道怎么修改,这些地方的注释不够详细,一时还没有搞清楚。basic的资料手里太少了,网上也很难找。R9,R10改成1K,100的,因为手里没有2K,200的,需要修改程序哪个部分呢?另外电容放电可能会不完全,因为8050完全导通时也有0.2V左右的压降,是不是可以把它改成MOS管,或者程序里有什么补偿吗?C11耦合的电容我改成4.7uF了,应该没事吧。

出0入0汤圆

发表于 2012-9-13 13:41:21 | 显示全部楼层
太牛马给力了!

出0入0汤圆

发表于 2012-9-13 21:15:22 | 显示全部楼层
本帖最后由 yzl1978 于 2012-9-13 21:31 编辑

LZ看看怎么常显示乱码?

在测量电解时上面应该显示<500的
电解电容我还没接就一直显示6点多UF


测量电容还是很好

电解怎么测量我测电解屏幕上一直没反应

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-9-13 21:23:44 | 显示全部楼层
很好得的东西,准备自己做一个!

出0入0汤圆

发表于 2012-9-14 19:13:56 | 显示全部楼层
很好的资料。谢谢。

出0入0汤圆

发表于 2012-9-15 01:37:07 | 显示全部楼层
这个东西很实用啊!!!!!

出0入0汤圆

发表于 2012-9-17 23:25:08 | 显示全部楼层
5IDIANZI 发表于 2012-9-10 12:27
看电路图应该用不到ADC的功能,AVCC接的L2,C13我也想省略了,该成用100欧姆电阻接+5V。晶振是8M的我手里没 ...

已经按照我的想法做出来了,电路部分已经固定,就等着修改程序了,目前AVCC我没接,因为拿表量它和VCC是内部连接的,晶振还是12M的,程序肯定要麻烦没有8M合适是肯定的,8M分频的频率正好是所需要的,12M就得浮点计算,不知道浮点运算够不够快,会不会影响到定时器中断。我用示波器测量运算放大器的1脚,看到信号不是连续的,而是间断出现的,不知道是什么问题,有时间再研究一下。

出0入0汤圆

发表于 2012-9-18 11:01:15 | 显示全部楼层
5IDIANZI 发表于 2012-9-17 23:25
已经按照我的想法做出来了,电路部分已经固定,就等着修改程序了,目前AVCC我没接,因为拿表量它和VCC是 ...

运放2,4脚之间的电容我从47UF改成10uF了,频率变化加快了,原来是2430,1720两个数不断闪烁,间隔周期大约1秒,现在交替比较快,我都看不清数了。

出0入0汤圆

发表于 2012-9-18 15:40:32 | 显示全部楼层
jun427 发表于 2012-5-24 20:49
老论坛资料暂时不能下载,重放一个,

请楼主帮忙,震荡频率不对,示波器量LM393 1脚有1.2Hz方波,检查周边电路没有异常。取下单片机,LCD1602,耦合电容C11,仍然可以在比较器1脚测量到这个频率的震荡,怀疑运放自激震荡。同时不理解这个LC震荡的原理,跪求答案。

出0入8汤圆

 楼主| 发表于 2012-9-18 17:30:10 | 显示全部楼层
5IDIANZI 发表于 2012-9-18 15:40
请楼主帮忙,震荡频率不对,示波器量LM393 1脚有1.2Hz方波,检查周边电路没有异常。取下单片机,LCD1602 ...

这个是正常的,当L1,C1没有接入时是有一个约1.2Hz的方波。

出0入0汤圆

发表于 2012-9-19 09:32:43 | 显示全部楼层
jun427 发表于 2012-9-18 17:30
这个是正常的,当L1,C1没有接入时是有一个约1.2Hz的方波。

谢谢,这样我就放心了。那么LC震荡的频率约350KHz叠加在这个1.2Hz的方波上就是正常的了。在1.2Hz方波由低电平转换为高电平时产生了一个约350KHz的方波(应该是LC震荡产生)。程序中使timer1来计算脉冲个数,使用timer2来计算250ms内的频率脉冲个数。我有一个疑问,在1.5秒延时时间内,怎么能保证计数脉冲正好取到了350KHz那个时刻呢,这首先要保证350KHz方波能够产生足够长的时间(250ms),同时产生350KHz方波这一段时间正好是计数器开始工作的时候。我测量计数脉冲时发现高频振荡时间很短,所以我的测量值飘忽不定,结果校准电容和电感时得到的值都是0,而频率值不断跳变(setok F=   3500Hz)(setok F=   4300Hz),就是这样。是不是我的电路有问题呢?350KHz的LC振荡频率产生时间太短就是不能成功的根本原因吧,我用的电容是2200PF,电感是100UH,跪请楼主指教。

出0入8汤圆

 楼主| 发表于 2012-9-19 16:27:03 | 显示全部楼层
5IDIANZI 发表于 2012-9-19 09:32
谢谢,这样我就放心了。那么LC震荡的频率约350KHz叠加在这个1.2Hz的方波上就是正常的了。在1.2Hz方波由低 ...

从产生350KHz的振荡看,电路应该没有什么问题,检查M8熔丝位设置应为外部晶振。

出0入0汤圆

发表于 2012-9-19 16:50:25 | 显示全部楼层
jun427 发表于 2012-9-19 16:27
从产生350KHz的振荡看,电路应该没有什么问题,检查M8熔丝位设置应为外部晶振。 ...

震荡确实可以产生但是持续时间太短,我觉得应该是长时间产生震荡的吧。怎么也得大于250ms吧,晶振设定没有问题,谢谢。clk1111,sut10

出0入8汤圆

 楼主| 发表于 2012-9-19 21:12:55 | 显示全部楼层
5IDIANZI 发表于 2012-9-19 16:50
震荡确实可以产生但是持续时间太短,我觉得应该是长时间产生震荡的吧。怎么也得大于250ms吧,晶振设定没 ...

间歇振荡是不正常,振荡应该是连续的,只有在测量电感时,当被测电感未接入时振荡停止。

出0入0汤圆

发表于 2012-9-19 22:21:10 | 显示全部楼层
jun427 发表于 2012-9-19 21:12
间歇振荡是不正常,振荡应该是连续的,只有在测量电感时,当被测电感未接入时振荡停止。 ...

谢谢楼主这么晚还帮助我解决问题,我再仔细查查电路部分看看什么原因。

出0入0汤圆

发表于 2012-9-20 13:40:26 | 显示全部楼层
jun427 发表于 2012-9-19 21:12
间歇振荡是不正常,振荡应该是连续的,只有在测量电感时,当被测电感未接入时振荡停止。 ...

我怀疑是耦合电容10uF不正常造成的,由于受到安装位置限制,我把那个连接3脚的10uF 耦合电容换成贴片胆电容了,通过电路仿真发现只有10uF以上的电容才能引起震荡,否则就是方波,下面展示仿真结果。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-9-20 23:16:06 | 显示全部楼层
5IDIANZI 发表于 2012-9-20 13:40
我怀疑是耦合电容10uF不正常造成的,由于受到安装位置限制,我把那个连接3脚的10uF 耦合电容换成贴片胆电 ...

已经搞定了,实测这个电容只有1uF,更换为10uF的胆点解电容后振荡正常,连续的。唯一不满意的是我的振荡频率不稳定,有十几Hz的摆动,可能和我选择的谐振电容有关,我用的是一个涤纶电容,曾经换过1000pF的校正电容也不稳定,现在手里没有更好的电容了,不知道NP0的陶瓷电容稳定性如何,CBB电容又如何,云母电容价格太高了......现在不接测试电容的时候显示值在-0.1,0.3pF之间跳动,这个范围也能满足我的使用了。测量电解电容还是很稳定的。我觉得电感对频率稳定性影响不大,不过铁氧体工字磁芯的性能也不是很好,要是改成铁硅铝磁环性能也许能上一个层次。

出0入0汤圆

发表于 2012-9-22 18:46:20 | 显示全部楼层
jun427 发表于 2012-9-19 21:12
间歇振荡是不正常,振荡应该是连续的,只有在测量电感时,当被测电感未接入时振荡停止。 ...

谢谢楼主支持,这个是我仿制的作品,做工比较粗糙,见笑了。频率的最后两位跳的比较厉害,可能我用的件太烂了。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-10-6 02:32:25 | 显示全部楼层
感谢共享资料!抽空也做一个。

出0入0汤圆

发表于 2012-10-19 10:58:18 | 显示全部楼层
wxfhw 发表于 2009-4-8 18:05
好漂亮的制作!!!

    想请教 楼主:

一、量程分了多个挡,档位可以自动变化吗?如果自动,怎么设计?如果手动,如何估算被测元件的值?
二、如何测量回路是否谐振?
三、测量范围能否达到?
你这个设计是没有问题的,但实现方案可行性可能还有些问题。
   可以知道下吗? 上面是老师给的问题

出0入0汤圆

发表于 2012-10-19 11:01:49 | 显示全部楼层
一、量程分了多个挡,档位可以自动变化吗?如果自动,怎么设计?如果手动,如何估算被测元件的值?
二、如何测量回路是否谐振?
三、测量范围能否达到?
你这个设计是没有问题的,但实现方案可行性可能还有些问题。
   老师  请教你帮忙指导下  这个测量仪上面的问题能详细说说吗?   谢谢你

出0入0汤圆

发表于 2012-10-19 11:02:18 | 显示全部楼层
请教楼主

出0入0汤圆

发表于 2012-10-19 12:08:30 | 显示全部楼层
很强大,谢谢!

出0入0汤圆

发表于 2012-10-19 12:13:16 | 显示全部楼层
学习了!!!!

出0入8汤圆

 楼主| 发表于 2012-10-21 00:09:43 | 显示全部楼层
老高小童鞋 发表于 2012-10-19 11:01
一、量程分了多个挡,档位可以自动变化吗?如果自动,怎么设计?如果手动,如何估算被测元件的值?
二、如 ...


1,量程只有电解电容测量分了两档,需要手动转换,没想过要自动转换。如何估算被测元件值,用万用表测量电阻时怎么估算,这个也是一样的。
2.只要电路产生振荡,由于有谐振回路,输出的一定是当前的谐振频率。
3.测量范围能达到楼主位给出的范围。
这个设计思想不是我的,是来自国外的,当时看了觉得很好,就做了这个。如果你有更好的实现方案可以拿出来大家共同学习讨论。
谢谢

出0入0汤圆

发表于 2012-10-23 21:05:18 | 显示全部楼层
mark,谢谢分享.

出0入0汤圆

发表于 2012-10-28 17:53:33 | 显示全部楼层
jun427 发表于 2012-10-21 00:09
1,量程只有电解电容测量分了两档,需要手动转换,没想过要自动转换。如何估算被测元件值,用万用表测量 ...

  谢谢诶楼主  我正在画电路图  你用的元件是一般的还是稍好点的  做出的效果怎样  精度高吗

出0入8汤圆

 楼主| 发表于 2012-10-28 18:22:18 | 显示全部楼层
老高小童鞋 发表于 2012-10-28 17:53
谢谢诶楼主  我正在画电路图  你用的元件是一般的还是稍好点的  做出的效果怎样  精度高吗  ...

用的是普通元件,看C2的精度

出0入0汤圆

发表于 2012-10-28 20:32:04 | 显示全部楼层
jun427 发表于 2012-10-28 18:22
用的是普通元件,看C2的精度

  嗯  好的  谢谢你 我想做一个自己用 问了老师  他们也不是很了解    您有远见列表吗  

出0入0汤圆

发表于 2012-11-7 21:37:39 | 显示全部楼层
好强大!

出0入0汤圆

发表于 2012-11-8 13:18:03 | 显示全部楼层
请问楼主,我做出来的东西怎么测试时没得测试值出来啊!但是频率又可以显示!!

出0入0汤圆

发表于 2012-11-8 13:24:55 | 显示全部楼层
上传了图片,楼主麻烦您帮我分析一下这中情况会是什么原因,我调试了几天了!!

出0入0汤圆

发表于 2012-11-8 13:25:35 | 显示全部楼层
C:\Documents and Settings\Administrator\桌面\LC\20121108A011.jpg

出0入0汤圆

发表于 2012-11-8 16:17:06 | 显示全部楼层
有频率的读数,但是没有电容、电感大小的读数,但是电解电容又可以读取但是精度没那么高!!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-8 16:17:28 | 显示全部楼层
这个可以做成产品吧

出0入0汤圆

发表于 2012-11-8 17:10:14 | 显示全部楼层
请问以下楼主,按照您最原始的HEX中的程序,MEGA8中的熔丝应该如何设置啊!!!

出0入0汤圆

发表于 2012-11-8 17:20:26 | 显示全部楼层
jianjun42 发表于 2009-6-22 15:37
【147楼】 lfq1 ,熔丝位设置为外置晶振8M,其他的不用动

AVR_frighter如何设置成外置8M啊!!参数都是多少!!能否告知以下,谢谢!!!

出0入0汤圆

发表于 2012-11-8 17:26:49 | 显示全部楼层
qianhng 发表于 2009-8-13 13:27
根据楼主的原理对电路做了删减,只测电感 (原文件名:L_Meter.jpg)

请问您做的这个L1和C1分别是多大的啊!!我现在做的是MEGA8的,L1和C1是82UH和1800pf,我的能不能用你的HEX文件编译啊!!!

出0入0汤圆

发表于 2012-11-8 17:30:18 | 显示全部楼层
tangfree 发表于 2009-8-25 11:56
我的也做好了,上图。

(原文件名:LCCE-METER1.JPG)

兄弟,我的和你做的差不多,也是根据楼主的原理图来的,请问你的HEX文件能发我一份吗?  我的老是测试不了,但是频率又有显示,不知道是哪里出了问题!!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-8 19:10:15 | 显示全部楼层
sunny503 发表于 2010-3-8 20:00
今天热转印了一个楼主的LC表,PCB改动了一些地方,加上了驱动5V继电器用的PNP的8050三极管两个,和复位M8的 ...

兄弟,我做的和你的一样的,实物都一样,出现的问题也是和你的一样的, 你说你重新编译后可以正常测量了,请问你可不可以把修改后的HEX文件发我一份啊!加个好友咯QQ:2447993511详聊可以不?我都测试了几天了,但是一直没弄出来!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-8 19:33:48 | 显示全部楼层
jianjun42 发表于 2010-12-14 14:03
楼上的朋友,熔丝位只需要设置外置8M晶振,其它的不用设置

AVR_frighter如何设置外置8M啊!!!

出0入0汤圆

发表于 2012-11-8 20:02:50 | 显示全部楼层
mark  一下用M8制作电感、电容、电解电容测量仪表

出0入0汤圆

发表于 2012-11-8 20:44:21 | 显示全部楼层
yzl1978 发表于 2012-9-13 21:15
LZ看看怎么常显示乱码?

在测量电解时上面应该显示

兄弟,你的HEX文件能不能发我一份咯!我做的和你的一样,电解电容有示数,倒是测电容和电感的时候没有示数!!还有你的L1是不是82uh,C1是不是1800pf啊!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-9 12:16:23 | 显示全部楼层
本帖最后由 tangfree 于 2012-11-9 12:17 编辑
wzone001 发表于 2012-11-8 19:10
兄弟,我做的和你的一样的,实物都一样,出现的问题也是和你的一样的, 你说你重新编译后可以正常测量了 ...


每个人选择的参考电容不一样,所以需要修改后重新编译。我的电容是2000p的。
我的电感是150uh,可能也需要在程序里修正。时间太长不记得了。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-9 13:09:07 | 显示全部楼层
tangfree 发表于 2012-11-9 12:16
每个人选择的参考电容不一样,所以需要修改后重新编译。我的电容是2000p的。
我的电感是150uh,可能也需 ...

电感是150uH,电容是2000PF,那你的HEX文件里面的参数是这个不????我的是82uH的和1200pf,有没有源程序的代码啊!有的话方便发我一份不????

出0入0汤圆

发表于 2012-11-9 17:51:25 | 显示全部楼层
R1  R3  R17  R18 的电阻单位是K吗  还有R21的电阻值是多少  我正在做

出0入0汤圆

发表于 2012-11-10 11:04:15 | 显示全部楼层
wzone001 发表于 2012-11-9 13:09
电感是150uH,电容是2000PF,那你的HEX文件里面的参数是这个不????我的是82uH的和1200pf,有没有源程 ...





里面的2个参数根据需要修改

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-10 13:35:19 | 显示全部楼层
jun427 发表于 2009-4-7 16:37
确实是个古董,不过有时还得用,现在还没有新的可以替代.

  楼主  有很多电阻和电容看上去是直接是导线连接的啊   

出0入0汤圆

发表于 2012-11-12 21:25:22 | 显示全部楼层
arale 发表于 2009-4-26 01:25
哈哈,支持,我今天跑了半天电子城,终于把元件凑齐了,准备开工仿制。为了1800P的云母电容,腿都跑断了。 ...

   我想问下  你做的电容电感测量仪  用的是楼主的原理图吗  R27  和C14的值是多少

出0入0汤圆

发表于 2012-11-12 21:41:23 | 显示全部楼层
tangfree 发表于 2009-8-25 11:56
我的也做好了,上图。

(原文件名:LCCE-METER1.JPG)

  嗯  不错啊  我也在做  找不到云母电容  还有 那原理图里 R27和C14的值 不知道是多少啊

出0入0汤圆

发表于 2012-11-12 22:05:17 | 显示全部楼层
xjf20072608 发表于 2009-10-9 13:21
变小了,大家看看!!

这个你做出来了吗  精度怎样 我也想做一个

出0入0汤圆

发表于 2012-11-15 16:21:18 | 显示全部楼层
jun427 发表于 2009-4-9 11:15
更正:
   
    原理图中的R9=3k,R10=300,正确的为R9=2k,R10=200,程序是按R9=2k,R10=200计算结果的 ...

楼主您好,我的硬件做出来首先是按R9=3k,R10=300接上的,可以测试但是寄读不够,但是换成R9=2k,R10=200之后倒是不能正常测试了,请教您“程序是按R9=2k,R10=200计算结果的···”这句话在程序里面哪里有体现??不知能否将源程序发我一份,现在还在调试阶段,就是不能测试啊!!602093127@qq.com

出0入8汤圆

 楼主| 发表于 2012-11-15 17:48:23 | 显示全部楼层
wzone001 发表于 2012-11-15 16:21
楼主您好,我的硬件做出来首先是按R9=3k,R10=300接上的,可以测试但是寄读不够,但是换成R9=2k,R10=200之 ...

红色那一行
'/////外部中断,测电解电容/////

T1_isr:

   Stop Timer0

   Te = Te * 256
   Te = Te + Tcnt0                                          '定时器中断次数的和加上当前定时值
   Te = Te / 2                                              '时间/充电电阻=被测电容

   V1 = Str(te)
   Vl = Len(v1)

   If Portd.3 = 1 Then                                      '充电电阻R9接入,<500uF

       If Vl = 2 Then
          V1 = "NO"
       End If

       If Vl = 3 Then
          V1 = Mid(v1 , 1 , 3)                              '0.000uF
          V1 = Format(v1 , "0.000")
       End If

       If Vl = 4 Then
          V1 = Mid(v1 , 1 , 3)                              '0.00uF
          V1 = Format(v1 , "0.00")
       End If

       If Vl = 5 Then
          V1 = Mid(v1 , 1 , 3)                              '00.0uF
          V1 = Format(v1 , "0.0")
       End If

       If Vl = 6 Then
          V1 = Mid(v1 , 1 , 3)                              '000uF
       End If

       If Vl = 7 Then
          V1 = "  OL  "
       End If

   End If

出0入0汤圆

发表于 2012-11-15 20:27:18 | 显示全部楼层
不错,学习了

出0入0汤圆

发表于 2012-11-16 13:44:48 | 显示全部楼层
jun427 发表于 2012-11-15 17:48
红色那一行
'/////外部中断,测电解电容/////

不好意思楼主,还来麻烦您,我的R9和R10都换了,硬件电路也检查了无数遍了,但是就是不能尽心测试,测电解电容有反应,10uF的电解电容测试时是12uF有点误差,但是测瓷片电容和电感时压根就没得反应,我照了几张图片,望您有时间帮我看看会是哪里出错了,还有您的源程序代码我也付粘给您看看,看您的源程序是不是这个,如果我这里用还需要进行什么样的改动。板子做出来好久了,但是一直调试不出来,作品要交了,望您尽快帮我找找原因,谢谢,所有文件您的126邮箱我也发了一份!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入8汤圆

 楼主| 发表于 2012-11-16 18:49:42 | 显示全部楼层
wzone001 发表于 2012-11-16 13:44
不好意思楼主,还来麻烦您,我的R9和R10都换了,硬件电路也检查了无数遍了,但是就是不能尽心测试,测电 ...

这个好象没有自动校准过程,当仪表上电时有一个自动校准过程,大约有3秒钟时间,有继电器动作的声音,完成后显示如图示,

如果没有这个过程,很可能是继电器不动作,请检查你用的继电器是不是线圈电压5V,电阻170欧左右的,如果比较小50欧左右那就得更换,M8很难驱动,从你的图上看振荡频率也不对,很可能是没有完成自动校准过程,程序没问题,

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2012-11-21 17:07:14 | 显示全部楼层
哇,mark                       

出0入0汤圆

发表于 2012-11-21 17:36:51 | 显示全部楼层
20页终于看完了,看样子可以自己做一个试一试。

出0入0汤圆

发表于 2012-11-25 17:12:51 | 显示全部楼层
AVR的语言有些看不懂啊,也想做一个,看来要先了解下AVR的编程语言再来一步一步来翻译了啊

出0入0汤圆

发表于 2012-11-26 14:19:36 | 显示全部楼层
我想做一个玩玩

出0入0汤圆

发表于 2012-11-26 15:54:41 | 显示全部楼层
jun427 发表于 2009-4-7 16:37
确实是个古董,不过有时还得用,现在还没有新的可以替代.

  楼主  我已经做好了  但是调不出  不显示字幕  请楼主帮忙啊  那程序也有点问题  有好多地方时错的呀

出0入0汤圆

发表于 2012-11-29 16:41:11 | 显示全部楼层
翻出来了。真开源啊

出0入0汤圆

发表于 2012-11-29 17:20:23 | 显示全部楼层
mark

出0入0汤圆

发表于 2012-12-1 13:55:27 | 显示全部楼层
学习中,谢谢

出0入0汤圆

发表于 2012-12-1 14:56:47 | 显示全部楼层
MARK一下

出0入0汤圆

发表于 2012-12-18 14:54:38 | 显示全部楼层
jun427 发表于 2012-11-16 18:49
这个好象没有自动校准过程,当仪表上电时有一个自动校准过程,大约有3秒钟时间,有继电器动作的声音,完 ...

我换了继电器,开始等待3秒,继电器也有动作,但是还是和以前一样,只有频率显示,TEST频率有110963Hz左右,但是没有测试结果,而且还是没有初始化的那个界面

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2013-1-4 01:01:45 | 显示全部楼层
前辈你好,  有没有办法可以做成电感挡可以测量超过2H的呢?如果做成500H以内,就更好了,谢谢你

出0入8汤圆

 楼主| 发表于 2013-1-4 12:09:06 | 显示全部楼层
yangben 发表于 2013-1-4 01:01
前辈你好,  有没有办法可以做成电感挡可以测量超过2H的呢?如果做成500H以内,就更好了,谢谢你 ...

你好,用谐振法测大电感量大电容量不适合

出0入0汤圆

发表于 2013-1-4 13:17:46 | 显示全部楼层
jun427 发表于 2013-1-4 12:09
你好,用谐振法测大电感量大电容量不适合

谢谢,  但是,我要做大电感的情况下,请问有没有其他电路可以做呢?谢谢

出0入0汤圆

发表于 2013-1-17 16:00:24 | 显示全部楼层
很好,谢谢,收藏了!

出0入0汤圆

发表于 2013-1-24 11:47:43 | 显示全部楼层
留下记号

出0入0汤圆

发表于 2013-1-24 19:09:18 | 显示全部楼层
新手受教了~~~

出0入0汤圆

发表于 2013-1-24 20:39:47 | 显示全部楼层
谢谢,学习一下~~~~~~~~~~~~~~~~~

出0入0汤圆

发表于 2013-1-27 00:37:24 | 显示全部楼层
sunday151640 发表于 2012-6-11 08:57
我现在  程序 能 编译出来。也能通过 isp 下载,不过只能用isp上电,之后显示图片、还有开机的两段文字, ...

可以发给我一块你做的PCB电路板我们一起研究吗?顺丰到付即可,另外工程里面所需的macros.h你是用的哪个?我怎么没找到呢


下面是用IAR FOR AVR 5.11 FULL 设置生成HEX文件的方法,不熟悉的朋友可以参考一下

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

出0入0汤圆

发表于 2013-1-28 09:13:52 | 显示全部楼层
110942199 发表于 2013-1-27 00:37
可以发给我一块你做的PCB电路板我们一起研究吗?顺丰到付即可,另外工程里面所需的macros.h你是用的哪个 ...

给个地址 。 我发给你

出0入0汤圆

发表于 2013-1-28 10:26:57 | 显示全部楼层
本帖最后由 110942199 于 2013-1-28 10:33 编辑
sunday151640 发表于 2013-1-28 09:13
给个地址 。 我发给你


你有QQ吗?我们一起多研究一下,我想把继电器改成磁保持的,这样用电池供电,如果不开背光的话,我查诺基亚5110屏幕的资料,电流才还不到1MA,这样整机应该也就不到10MA的电流,再加上自动关机电路,完全可以做的更好,更智能更便携

另外他的这个测量电解电容的基准电压也需要改改,电阻分压做的基准会因为电源电压的下跌而发生很大变化,直接影响到测量的精度

还有他这个晶振是多少?我看原理图上没有标明,实物照片也看不太清楚。你那个不能正常显示会不会是因为晶振用的不对

出0入0汤圆

发表于 2013-1-28 10:45:05 | 显示全部楼层
110942199 发表于 2013-1-28 10:26
你有QQ吗?我们一起多研究一下,我想把继电器改成磁保持的,这样用电池供电,如果不开背光的话,我查诺基 ...

qq :630462339

出0入0汤圆

发表于 2013-2-1 05:59:33 | 显示全部楼层
qianhng 发表于 2009-8-13 13:27
根据楼主的原理对电路做了删减,只测电感 (原文件名:L_Meter.jpg)

老兄我也正为测量电感发愁呢 ,看你的电路图洞洞板了一个,下来你的烧录文件到M48V里面通电液晶屏显示上面一排方格,下面一排什么都没有,熔丝我也检查了我设置的是内8M的,电路图与我的实际洞洞板子焊接都一一核对了元件参数都一一核对了没有问题,显示一排方块问题出在哪了呢,是不是你上传的文件有错还是熔丝只能安你图那样是外4M的, 望赐教下,谢谢.
回帖提示: 反政府言论将被立即封锁ID 在按“提交”前,请自问一下:我这样表达会给举报吗,会给自己惹麻烦吗? 另外:尽量不要使用Mark、顶等没有意义的回复。不得大量使用大字体和彩色字。【本论坛不允许直接上传手机拍摄图片,浪费大家下载带宽和论坛服务器空间,请压缩后(图片小于1兆)才上传。压缩方法可以在微信里面发给自己(不要勾选“原图),然后下载,就能得到压缩后的图片】。另外,手机版只能上传图片,要上传附件需要切换到电脑版(不需要使用电脑,手机上切换到电脑版就行,页面底部)。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Archiver|amobbs.com 阿莫电子技术论坛 ( 粤ICP备2022115958号, 版权所有:东莞阿莫电子贸易商行 创办于2004年 (公安交互式论坛备案:44190002001997 ) )

GMT+8, 2024-3-29 21:34

© Since 2004 www.amobbs.com, 原www.ourdev.cn, 原www.ouravr.com

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