µC stürzt ab

[Sam (Gast)]

Hi

Ich steh wieder mal vor einem Problem. Mein kleines Program funktioniert 
nicht. Ich hab schon viel überlegt, warum, und habe auch eine kleine 
Sicherheitsabfrage eingebaut, aber es funktioniert nicht. Das Prg grhört 
zu einem VU-Meter mit 10 Leds (so ne Zeile 7*gr-3*rt). AUfjedenfall 
leuchten alle Leds recht schwach und es geht garnichts mehr. Ich bin mir 
nicht sicher aber ich glaube es passiert beim anschlag. also beim Wert 
1023 vom ADC. Aber durch nachrechnen komm ich nicht auf einen ungültigen 
Wert.
1023 + 1 = 1024
Log2(1024) = 10
2 ^ 10 = 1024
1024 - 768 = 256
256 - 1 = 255 -> invertiert 0

Der Ausgang wird invertiert, da ich sonst die Leitung überkruzen müsste.
Und ja man könnte das sich mit dem Log sparen, aber so kann ich davor 
eine Zahl zw. 1 und 10 angeben und sie wird ausgegeben.

Hier der Code:

$regfile = "m8def.dat"
$crystal = 8000000

Dim Ad As Word
Dim Temp As Single
Dim Pb As Byte

Config Portd = Output
Config Portb.0 = Output
Config Portb.1 = Output
Portb = 255 - 31
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Portb = 0
Portd = 0
Waitms 100

Do

Ad = Getadc(0)

'Linear Method
'Ad = Ad / 94

'Expotential Method
Ad = Ad + 1 'Log 0 is imposible
Temp = Ad
Temp = Log(temp)
Temp = Temp / Log(2)
Ad = Temp

'LED Routine: Ad ^= On Leds
Ad = 2 ^ Ad

Pb = 0
If Ad = 512 Then
Ad = Ad - 256
Pb = 1
End If
If Ad = 1024 Then
Ad = Ad - 768
Pb = 3
End If

If Ad > 256 Then
'µC should never be here
Do

Toggle Portd
Waitms 100

Loop

End If

Ad = Ad - 1
Portd = 255 - Ad
Portb = 3 - Pb

Loop

[holger (Gast)]

>Ich bin mir nicht sicher aber ich glaube es passiert beim anschlag.

Dann werd dir sicher. Alle LEDs einzeln nacheinander setzen bis
das Programm abkackt. Also ohne ADC ohne log() usw.

[spess53 (Gast)]

Hi

Log -> natürlicher Logarithmus.

MfG Spess

[Sam (Gast)]

spess53 schrieb:
> Log -> natürlicher Logarithmus.

Die Basis ist doch egal ich teil doch dadurch wieder:

Log_b(a) = Log(a) / Log(b)

verrückt!
Jetzt funktioniert es obwohl ich nachdem alle Tests funktionierten 
dasselbe Programm wieder draufgemacht hab.

Keine AHnung warum.

[Sam (Gast)]

Leider nur eine Falschmeldung. Anderes Progamm gleiches Problem: Die 
Leds leuchten ganz schwach. Kann es sein, dass der ADC einen Quarz will 
(ich hab ihn mit 8Mhz intern laufen). Oder sollte ich noch ein paar 
Fusebits setzen?
Ich hab bisher:

SPIEN
BOOTSZ1
BOOTSZ0
SUT0
CKSEL 0,1,3

[Karl H. (kbuchegg)]

Sam schrieb:
> Leider nur eine Falschmeldung. Anderes Progamm gleiches Problem: Die
> Leds leuchten ganz schwach. Kann es sein, dass der ADC einen Quarz will

Nein

> (ich hab ihn mit 8Mhz intern laufen). Oder sollte ich noch ein paar
> Fusebits setzen?
> Ich hab bisher:

BODEN kann nicht schaden

[Sam (Gast)]

Toll! Darauf hätte ich früher kommen können!!!
Der 9V Block hatte nur noch 5V + Spannungsregler kann das nichts werden.
Ich dachte bei der sparsamen SChaltung kann das nicht der Fall sein. 
Tja, Kontrolle ist halt besser.
Sorry für eure Bemühungen.

[Sam (Gast)]

Rein von der Theorie her kann mir jemand zu dem Vumeter tipps geben? Ist 
es besser wenn man ihn linear oder expotentiell steuert?