Hallo liebe Leute
Ich bin Bascomneuling und habe ein kleines Problem mit den zusammenrechnen von Variablen.
Hier mein Code:
$regfile = "m8def.dat".dat "
$crystal = 1000000
Config Pind.4 = Input
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Dim Druck As Word
Dim Impulslaenge As Word
Dim Raus As Word
Do
Bitwait Pind.4 , Reset
Pulsein Impulslaenge , Pind , 4 , 0
Impulslaenge = Impulslaenge
Getadc(0) = Druck
Impulslaenge + Druck = Raus
If Raus <= 2500 Then
Portb.1 = 1 : Waitms 1 : Portb.1 = 0
Elseif Raus > 2500 And Raus <= 10000 Then
Portb.1 = 1 : Waitms 5 : Portb.1 = 0
Elseif Raus > 10000 And Raus <= 15000 Then
Portb.1 = 1 : Waitms 10 : Portb.1 = 0
End If
Loop
Ich möchte die Variable Impulslaenge und Druck addieren
und in Raus speichern.
Kann mir jemand weiterhelfen?
Lesezeichen