wert auf ±10 vergleichen wie ??

[Zardest]

Moin

Ich möchte in Bascom gerne einen wert auf ±10 genau vergleichen.Er darf nicht genau sein er muss toleranz haben (da der Motor etwas nachläuft) nun die frage wie mache ich das ??:confused::confused:

[BMS]

Ohne jemals Bascom verwendet zu haben, sieht das in Basic (z.B. BlitzPlus) ungefähr so aus:

If (Variable>Wert-10) And (Variable<Wert+10) Then
...
EndIf
Alternativ: Betrag der Differenz ist kleiner als 10 ( Blitzplus: If Abs(Variable-Wert)<10 Then )
Grüße, Bernhard

[Zardest]

Danke das ist es was ich brauche wird morgen sofort getestet :D

[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)