Habe es mal so versucht:

Code:
$regfile = "2313def.dat"
$crystal = 10000000
$baud = 9600

Dim Hi As Byte
Dim Lo As Byte
Dim Zeit As Byte

Config Pind.2 = Output

Config Timer1 = Timer , Prescale = 1

Enable Interrupts
On Timer1 Icnr
Enable Timer1
Timer1 = 65526
Hi = 1
Lo = 1

Do

    Input "High x mal 1us: " , Hi
    Input "Low x mal 1us: " , Lo

Loop



Icnr:

Incr Zeit

If Zeit = Hi Then

Swap Hi , Lo

Zeit = 0
Portd.2 = Not Pind.2

End If

Timer1 = 65526

Return
Laut sim geht die meiste Zeit beim Return drauf. Hat glaub ich was mit dem sichern der Register zu tun. Da war mal was mit NOSAVE, was ich aber erst mal genauer betrachten muß. Denke, daß es die Lösung ist!