AVR Touchsensor mit Powerdown

[LED_Go! (Gast)]

Hey Forum!

ich baue einen mobilen Aufbau: Attiny13 an einem GreenCap, der über eine 
kleine Solarzelle geladen wird. Der Attiny13 steuert eine LED und etwas 
Beschaltung, damit das Ganze bis 0,9V runter funktioniert.

Bisher habe ich Versionen gebaut, die bei Dunkelheit einfach angehen und 
Leuchten, bis die Spannung zu niedrig wird. Jetzt möchte ich, dass die 
LED leuchtet, sobald jmd eine Metallfläche berührt oder in die Nähe 
kommt.
Ich habe nun eine Frage bezüglich des Codes.

Dieser einfache Code in Bascom funktioniert super:

'DarlingtonStufe (2fach) an Pinb.3!


$regfile = "attiny13.dat"
$crystal = 1200000
$hwstack = 32                                               ' default use 32 for the hardware stack
$swstack = 10                                               'default use 10 for the SW stack
$framesize = 10
Declare Sub Blitz
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Portb.0 = Output
Config Portb.3 = Input
'Pinb.3 = 1                                                   ' Achtung kein Pull-up!

Dim Messergebnis As Word

Do
Sbi Adcsra , 7
Messergebnis = Getadc(3)
cbi adcsra,7
If Messergebnis > 500 Then                                  'Achtung >!
Gosub Blitz
End If
Loop


Blitz:

Portb.0 = 1
Waitms 100


Return


End

Um Strom zu sparen,möchte ich jetzt gerne die Main-Loop nach dem Messen 
des Wertes am Sensor-Pin schlafen legen. Der Watchdog soll dann alle 2 
Sekunden wecken und es wird erneut gemessen und wieder in Power-down 
gegangen.
Habe es also mal so versucht:

[code:]

'[...]

Config Watchdog = 2048

Enable Interrupts
Stop Ac
Start Adc
Start Watchdog

Do

sbi adcsra,7
Messergebnis = Getadc(3)
cbi adcsra,7
If Messergebnis > 500 Then
Gosub Blitz
End If
Powerdown
Loop


Blitz:
Stop Watchdog

Portb.0 = 1
Waitms 100
sbi adcsra,7
Messergebnis = Getadc(3)
cbi adcsra,7
If Messergebnis > 500 Then
Goto Blitz
End If
Start Watchdog
Powerdown

Return

End
[/code]

Leider funktioniert dieser Code aber nur in einer geerdeten Schaltung 
(Entwicklungsboard-Umgebung) und nicht in der mobilen ungeerdeten 
Schaltung.
Weiß jemand von den Profis Rat, wie man so etwas doch realisieren kann?

[Knut B. (Firma: TravelRec.) (travelrec)]

Sowas macht man nicht mit dem ADC, sondern mit einem Touch-Algorithmus 
und ein paar passiven Bauteilen.


Beitrag "qtouch - sekt oder selters"