Ich hab's im Gesamtcode die Variablenausgabe("Print Sensor_rechts") rot markiert. In diesem Modul tritt der Fehler auf:
Code:
'Fahrt Funktionen
Sub Neue_pos()
Print Sensor_rechts
If Sensor_links >= 700 Then
If Sensor_rechts >= 700 Then
If Pos > 5 Then
Pos = 8
Else
Pos = 0
End If
End If
If Sensor_rechts < 700 And Sensor_rechts >= 10 Then
Pos = 7
End If
If Sensor_rechts < 10 Then
Pos = 6
End If
Elseif Sensor_links < 700 And Sensor_links >= 10 Then
If Sensor_rechts < 10 Then
Pos = 5
End If
If Sensor_rechts >= 700 Then
Pos = 1
End If
Else
If Sensor_rechts < 10 Then
Pos = 4
End If
If Sensor_rechts >= 10 And Sensor_rechts < 700 Then
Pos = 3
End If
If Sensor_rechts >= 700 Then
Pos = 2
End If
End If
Print "Pos in Neue_pos(): " ; Pos
End Sub
Lesezeichen