hallo,
hier ist der code:
Code:
Stop Timer1

A = 0
Cls
Do

Locate 1 , 1
Lcd "Leistung in Watt"
Locate 2 , 1
Lcd "......Scan......"

Loop Until Pina.0 = 0

Start Timer1
Waitms 500

Do
If Pina.0 = 0 Then
Waitms 300
B = A
A = 0

B = 36000 / B
Cls
End If


Locate 1 , 1
Lcd "Momentanleistung"
Locate 2 , 1
Lcd "   " ; B ; " Watt"


Loop


Isr_von_timer1:
Timer1 = 53036
A = A + 1
Return
das funktioniert im Prinzip schon.
mit einer Taschenlampe kann ich einen Impuls auslösen, nur nicht mit der Diode des Zählers.
Wie kann ich es am einfachsten schaffen?
wie funktioniert der Komparatoreingang (-das klingt mir am einfachsten) und wie müsste ich ihn beschalten?