Keiner der mir helfen kann?

Ich habe das ganze jetzt so:
Code:
$regfile = "2313def.dat"                                    'ATmega8-Deklarationen
$crystal = 4000000                                          'Quarz: 4 MHz

Config Pinb.3 = Output
Burst Alias Portb.3

On Timer1 Ontimer1
Config Timer1 = Timer , Prescale = 1
Enable Interrupts

Portb.3 = 1
Do
  Enable Timer1
  Waitms 3
  Disable Timer1
  Portb.3 = 1
  Waitms 1000
Loop

End

Ontimer1:
  Timer1 = 65485
  Toggle Burst
Return
Ist der Code so in Ordnung? Es soll immer nach einer Sekunde gemessen werden.