Fehler in der IN - Abfrage

Hallo alle AVRco-User,
hallo Rolf,

ein gutes, neues Jahr euch allen!

Nach den guten Wünschen habe ich noch ein kleines Problem beim IN Operator - im Falle von mehreren Bereichs-Abfragen. Je nach Variablen-Typ funktioniert die Abfrage korrekt - oder eben nicht. Das folgende Beispiel verdeutlicht es vielleicht:

[code]
lBy0 := 50;         // Byte-Variable
lWo := 1234;        // Word-Variable
lLW := 12345678;    // LongWord-Variable

if lBy0 In [1..3,49..51] Then
   SLIP_WriteStr('TXT|50 ist drin!');   // Abfrage landet hier - OK.
else
   SLIP_WriteStr('TXT|50 ist NICHT drin!');
endif;

if lWo In [1..3,1230..1239] Then
   SLIP_WriteStr('TXT|1234 ist drin!');
else
   SLIP_WriteStr('TXT|1234 ist NICHT drin!');   // Abfrage landet hier!!!! Nicht OK.
endif;

if lLW In [1..3,12345670..12345679] Then
   SLIP_WriteStr('TXT|12345678 ist drin!');
else
   SLIP_WriteStr('TXT|12345678 ist NICHT drin!');   // Abfrage landet hier!!!! Nicht OK.
endif;

if lLW In [12345670..12345679] Then
   SLIP_WriteStr('TXT|12345678 ist drin!');   // Abfrage landet hier. OK.
else
   SLIP_WriteStr('TXT|12345678 ist NICHT drin!');
endif;
[/code]

Dieser Code gibt folgende Ausgabe:

50 ist drin!
1234 ist NICHT drin!
12345678 ist NICHT drin!
12345678 ist drin!

Man sieht, daß es bei einer Byte-Variablen geht, bei Word oder Longword-Variablen jedoch nicht. Wenn aber z.B. nur ein einzelner Bereich beim LongWord abgefragt wird, dann geht es doch.

Ich hoffe, ich habe das Problem rübergebracht.

Grüße, Michael

Hallo Rolf,

darf ich dieses Thema noch einmal nach vorn holen? Es ist schon blöd, daß man immer dran denken muß, daß Bereichs-Abfrage mit (z.B.) Words zwar kompiliert werden, aber falsche Ergebnisse liefern.

Ich finde schon, daß die Zeilen

lWo := 1234;
if lWo In [1..3,1230..1239] Then...

ein True liefern sollten und kein False...

Gruß, Michael

Hallo Rolf,

da haben Sie ja gründlich abgeschaltet...
Eine Abfrage, die korrekt lief, wie z. B.

If lWord IN [$1234,$5678] Then

wird nach dem Update vom Compiler nicht mehr angenommen. Also Source wieder umschreiben... Es ging nur um mehrfache Bereichsabfragen, genau wie in den Beispielen am Threadanfang beschrieben. Die einfache Bereichsabfrage geht aber Gott sei Dank noch.

Sagen Sie einfach Bescheid, wenn Sie in das Thema noch einmal rein geschaut haben. Ich hab erst mal alles angepasst, also kein Problem mehr.

Jedenfalls haben Sie recht, es ist besser, daß etwas vom Compiler nicht übersetzt wird, wo es noch Problemchen gibt.

Grüße, Michael

Hallo Rolf,

ich habe ein eigenartiges Phänomen bei einer IN - Abfrage mit Float-Werten.
In einer Prozedur habe ich mit
Var
lFl : Float;

definiert. Wenn ich nun die Bereichsabfrage

lFl := 2.3;
If (lFl In [-5..5]) Then
WritelnFile('Im Bereich!', lBackupToFile);
Else
WritelnFile('Nicht im Bereich!', lBackupToFile);
EndIf;

laufen lasse, bekomme ich korrekterweise die Anwort "Im Bereich!". Soweit, so gut. Wenn ich aber nun die Logik und die Ausgabe-Texte umdrehe:

lFl := 2.3;
If Not (lFl In [-5..5]) Then
WritelnFile('Nicht Im Bereich!', lBackupToFile);
Else
WritelnFile('Im Bereich!', lBackupToFile);
EndIf;

dann bekomme ich seltsamerweise nicht die Ausgabe "Im Bereich", sondern "Nicht im Bereich!"
Da scheint etwas nicht zu stimmen.

Gruß, Michael