Oh, wie peinlich!
Ich hatte das so:
wollte denCode:$regfile = "At26def.dat" $crystal = 8000000 '----------------Timer config--------------------------- Config Timer0 = Timer , Prescale = 256 Enable Timer0 Enable Interrupts On Ovf0 Tim0_isr '----------------- RS232 Config ------------------ Open "coma.5:9600,8,n,1" For Output As #1 Dim Timervar As Integer Stop Timer0 Start Timer0 Do Print #1 , Timervar Waitms 500 Loop Tim0_isr: Incr Timervar Return End
Stop Timer0 Löschen
Start Timer0 lassen.
habs genau umgekehrt gemacht.
Es läuft leider trotzdem nicht.[/quote]







Zitieren

Lesezeichen