'Werte über RS232 Senden:
If Pinc.3 = 0 Then
Portb.3 = 1 'Led umschalten zur kontrolle
For Zähler = 1 To 200 Step + 1 'Zähler hochzählen
Print "Wert " ; Zähler ; ": " ; Wert(zähler) 'und Wert senden
Waitms 10
Next
End if
Else
Portb.3 = 0 'Led umschalten zur kontrolle


Jede weite Antwort kostet eine flasche 'plöp'

Den Rest Code habe ich nicht anbesehen.

Gento