Jop, habs jetzt mit der 1Mhz Taktfrequenz probiert.

Und alles hat geklappt.

Fals es jemand interessiert, hier ist das Programm.

$regfile "m8def.dat"
$crystal = 1000000

Dim Winkel As Word
Const Reload = 63036
Winkel = 189

Config Portc.0 = Output
Config Portd.6 = Input
Config Portd.7 = Input


Portd.6 = 1
Portd.7 = 1


Config Timer1 = Timer , Prescale = 8
Timer1 = Reload

Enable Timer1
Enable Interrupts

On Timer1 Timerinterrupt


Do
If Pind.6 = 0 Then
If Winkel < 300 Then Incr Winkel
Waitms 20
End If



If Pind.7 = 0 Then
If Winkel > 75 Then Decr Winkel
Waitms 20
End If
Loop

Timerinterrupt:

If Pinc.0 = 1 Then
Portc.0 = 0
Timer1 = Reload + Winkel
Else
Portc.0 = 1
Timer1 = 65536 - Winkel
End If

Return

Zwar ohne Kommentare, aber das Programm ist ja noch überschaubar.

Also danke für die schnelle Hilfe.

Mfg Kif