wert auf ±10 vergleichen wie ??

[Zardest]

Danke das ist es was ich brauche wird morgen sofort getestet

[kask]

wird nicht gehen.
eher soo..

Dim i as Integer

i = soll - 10
if wert < i then
i = soll + 10
if wert > i then
...
end if
end if

oder

Dim i as Integer

i = soll - wert
if i > 10 or i < -10 then
...
end if

edt: Bascom kann leider nur in einer zeile vergleichen oder EINE rechnung ausführen.

[radbruch]

Oder so vielleicht:

Dim Soll As Integer , Ist As Integer , Temp As Integer

If Soll > Ist Then
   Temp = Soll - ist
Else
   Temp = Ist - soll
End If
If Temp > 10 Then Print "Abstand ist größer als ±10"

(ungetestet)