Alle Beiträge und Antworten
avrnix - 14.11.2007, 09:52
8Bit Wandlung - Erhöhung der Samplerate
'####################################################################
'# 8Bit AD-Wandler
'# von Dirk Milewski
'# Byte = GET8BITADC ( ADMUX Byte,ADCSR Byte)
'#####################################################################
$regfile = "M32def.dat" ' use the Mega8
$crystal = 16000000
$baud = 19200
Dim W As Word , P As Word , V As Word , Channel As Byte , I As Byte , Cols As Byte
Dim Ps As String * 3
Dim H As Byte , L As Byte
Declare Function Get8bitadc(byval Admux1 As Byte , Byval Adcsr1 As Byte) As Byte
Start Adc
Do
' W = Getadc(0)
H = Get8bitadc(&B01100000 , &B11101100)
Print "Spannung 8Bit:" ; H
Wait 1
Loop
End
Function Get8bitadc(byval Admux1 As Byte , Byval Adcsr1 As Byte) As Byte
'Admux = &B01100000
'Adcsr = &B11101100
Admux = Admux1
Adcsr = Adcsr1
Get8bitadc = Adch
End Function
Wigbert - 15.11.2007, 18:25
Hi Dirk,
Erklärung ein bisschen aus den Zusammenhang gerissen.
8 Bit(statt 10 Bit) bedeutet eine Auflösung von.....(Spünge in mV)?
Erhöhung der Samplerate von 40 Khz auf ...Khz?
avrnix - 15.11.2007, 20:16
Auslösung : AREF/256
Die Samplingrate steigt dadurch auf 1MHz , die Wandlung bleibt aber gleich 13 Takte .
beim 10Bit hat man eine Samplingrate von 50KHz ... ca max. 125 bis 200 KHz bei 10 Bit. Je nach Teiler.
Admux -> Kanaleinstellung -> siehe datenblatt
Adcsr -> ADC Einstellung -> siehe Datenblatt
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken