[过节无大牛 菜鸟来闲逛]发个BASCOM的过采样实例程序，供各位批评指正！

keanu131

M128的10bit ADC过采样到14bit，实测数据非常稳，推荐各位使用！

1. $regfile = "m128def.dat"
   
2. $crystal = 8000000
   
3. $baud = 9600
   
4. 
   
5. '$sim
   
6. 
   
7. Config Adc = Single , Prescaler = Auto , Reference = Internal
   
8. On Adc Adc_isr
   
9. Enable Adc
   
10. Enable Interrupts
    
11. 
    
12. Dim W As Word , V As Long , Y As Single , I As Word , S As String * 5
    
13. I = 0
    
14. V = 0
    
15. Cursor Off Noblink
    
16. Cls
    
17. Lcd "  ADC:     /16384"
    
18. Lowerline
    
19. Lcd "  VOL:"
    
20. 
    
21. Do
    
22. Start Adc
    
23. Idle
    
24. Stop Adc
    
25. If I = 256 Then
    
26.       Shift V , Right , 4
    
27.       Y = V / 16384
    
28.       Y = Y * 2.56
    
29.       Locate 1 , 7
    
30.       S = Str(v)
    
31.       S = Format(s , "     ")
    
32.       Lcd S
    
33.       Locate 2 , 7
    
34.       Lcd Y
    
35.       I = 0
    
36.       V = 0
    
37. End If
    
38. Loop
    
39. End
    
40. 
    
41. Adc_isr:
    
42. W = Getadc(0)
    
43. V = V + W
    
44. I = I + 1
    
45. Return
    

复制代码

浩祺心

实践出真知啊。顶楼主。

benli

再过采样也没啥用，自欺欺人的事情，换高位的AD才是王道。

jimmy_xt

看不出如何提高分辨率的……

---------------------------------------------------------
来源是AVR121，atmel官方的应用参考。
中文版：http://wenku.baidu.com/view/be2a46ddad51f01dc281f154.html

阳光999

Y = V / 16384
Y = Y * 2.56

这个可以换成 Y = V / 6400

keanu131

这个可以换成 Y = V / 6400
阳光999 发表于 2012-10-2 15:43 https://www.yleee.com.cn/images/common/back.gif

   干活的是这几句

1. Shift V , Right , 4
   
2. Y = V / 16384
   
3. Y = Y * 2.56

复制代码

在ADC满足过采样条件下进行以上处理可以增加有效数字的位数，具体请看百度文库上的一篇文章。
写成除以6400可以减少程序行数，但明显会减弱可读性。照这个写个13bit的，应该就非常好改，这也是我比较喜欢bascom的原因之一。

阳光999

回复 6# keanu131


  可读性是另外一回事，除以一个大数再乘上一个数带来的误差也要考虑

gw168sh

过采样是否可以这样理解
10bit  1024份 2.5v基准 十比一分压，量程0-25V，2500/1024= 每份2.44mv

通过调整分压，改为量程0-12.5v，满幅还是2.5v输入
即 1250/1024= 每份1.22mv
这样精度提高一倍，是否这样就叫过采样？

gw168sh

刚百度一下，过采样没这么简单哈。要叠加白噪声进去，四种白噪声怎么加进去呢，而且要求精度很高
用PWM，DA？

keanu131

过采样是否可以这样理解
10bit  1024份 2.5v基准 十比一分压，量程0-25V，2500/1024= 每份2.44mv

通过调 ...
gw168sh 发表于 2012-10-2 23:27 https://www.yleee.com.cn/images/common/back.gif

   前提里面最重要一项是原始ADC采样有大于1lsb的抖动，则可通过多次采样平均消除随机噪声，提高信号的分辨率。基准一直是2.56没有变化。