Nabend, ich glaube ich bin ein wenig voran gekommen. Ich bin Soweit das ich die Pulse von der Frequenz anzeigen lassen kann.
Das Programm sieht jetzt soweit aus:
Code:
'Frequenzmessen

'---------------------------------
'Deklaration
'---------------------------------

$regfile = "m16DEF.DAT"
$crystal = 16000000


'---------------------------------
'Initialiserung:
'---------------------------------

Config Porta = Input
Config Portb = Input
Config Portc = Output
Config Portd = Output


Dim Pulse As Byte

Enable Timer0                                     'Timer0 An
Config Timer0 = Counter , Edge = Rising           'Config von Timer0

On Ovf0 Tim0_isr                                  'Interrupt bei Overflow AN

Enable Interrupts                                 'Interrupts An

Tcnt0 = 0                                         'TCNT0 auf Null gesetzt

'---------------------------------
'Hauptprogramm:
'---------------------------------
Do
Portd = Tcnt0                                     'Ausgabe von TCNT0 an PortD

Loop

'---------------------------------
'Interrupt
'---------------------------------
Tim0_isr:
Pulse = Tcnt0
Timer0 = 0                                        'Timer0 wird zurückgesetzt
Return
 End
Das Problem an dem ich jetzt hänge ist das ich die Pulse nur ein Zeit X messen darf und dann müsste eigentlich ich mit einer kleinen Rechnung wissen was für eine Frequenz anliegt.

Habt ihr ein Tipp für mich?

lg TRyan