PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : wert auf ±10 vergleichen wie ??



Zardest
11.12.2012, 18:20
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
11.12.2012, 19:57
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
11.12.2012, 20:27
Danke das ist es was ich brauche wird morgen sofort getestet :D

kask
11.12.2012, 21:56
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
11.12.2012, 23:24
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)