Analogwert Auswerten Bascom

[Matthias (Gast)]

Hallo hab ein kleines Problem

hab an einem Atmega 8535 ein Poti. Nun will ich eine Led ansteuern wenn 
das Poti eine bestimmte Stellung hat. Das geht auch. Jetzt sollte aber 
das Poti nicht nur bei einem Wert von z.B 256 leuchten, sonder wenn der 
Wert zwischen 240 und 260 liegt.

Leider weis ich jetzt nicht wie ich das in Bascom am besten 
Programmieren soll.

Danke für Eure Hilfe

Gruß Matthias

[Falk B. (falk)]

if (adc_wert>240 and adc_wert<260) then

[Wolf M. (atmega8535)]

Danke für die Antwort, aber leider geht das bei mir nicht.

Wenn der Wert X größer als 240 ist oder kleiner als 260 dann soll eine 
Led leuchten.


So sieht mein Programm aus

Do

Config Adc = Single , Prescaler = Auto , Reference = Internal

Start Adc

Config Portc = Output
Portc = 255



Dim W As Integer , Channel As Byte


'Analogwert einlesen

W = Getadc(1)
  Print "Channel 0 " ; " value " ; W
  'Incr Channel



'Analogwert 1


   If(w > 240 Or W < 260) Then
  Portc.0 = 0

End If





Loop

[Falk B. (falk)]

@ Wolf Matthias (atmega8535)

>Danke für die Antwort, aber leider geht das bei mir nicht.

Tjaaaa, das soll vorkommen.

>Wenn der Wert X größer als 240 ist oder kleiner als 260 dann soll eine
>Led leuchten.

Das sagtest du bereits.
Besser vielleicht so.

' EINMALIGE Konfiguration!

Config Adc = Single , Prescaler = Auto , Reference = Internal

Start Adc

Config Portc = Output
Portc = 255

Dim W As Integer , Channel As Byte

' HIER geht die Endlosschleife los
Do

'Analogwert einlesen

W = Getadc(1)
  Print "Channel 0 " ; " value " ; W
  'Incr Channel

'Analogwert 1
   If(w > 240 Or W < 260) Then
     Portc.0 = 0
   else 
     Portc.0 = 1
   End If
Loop

MfG
Falk

[Wolf M. (atmega8535)]

Danke für deine Antwort. Hab deinen Code Kopiert und bei mir eingefügt.
Leider bringt Bascom bei der If Anweisung eine Fehlermeldung.

Unkow statement [IF(W> 240 OR W < 260)then]

[Holger K. (krulli)]

Versuch es mal ohne Klammern
If W > 240 Or W < 260 Then

[Jürgen C (Gast)]

Hallo,
die Bedingung gröser 240 oder kleiner 260 ist immer wahr.
Ich glaube du meinst größer 240 und kleiner 260; diese Bedingung ist
nur im Bereich von 240 bis 260 wahr.

If W > 240 and W < 260 then

Ich habs jetzt noch nicht probiert, aber es sollte so gehen.