Hallo,
ich versuche seit ner knappen Stunde rauszufinden warum der encoderbefehl in Bascom nicht funktioniert.
Also zum Problem:
Der Encoder hängt am Atmega8 mit A und B an Portd.2 und Portd.3 , also die Interruptpins. Alle Portc werden als Ausgänge verwendet (7 Segment) .
So jetzt schreibe ich in Bascom den Encoderbefehl und bekomme einen Haufen Fehlermeldungen. Also hab ich mal einfach alles systematisch rausgestrichen bis ich rausfand dass er die Deklarierung des Portc nicht mag. Kann ich das nicht umgehen? Ich hab schon alles fertig gelötet und will jetzt nicht den kompletten portc freiräumen . Ausserdem scheint er mir die Variable A und das B übel zu nehmen
Hier mal das Stück des Codes das ich meine:
Ps: Das ganze sollte ein Ostergeschenk werden, aber langsam sehe ich schwarz
Mfg,
Flo
ich versuche seit ner knappen Stunde rauszufinden warum der encoderbefehl in Bascom nicht funktioniert.
Also zum Problem:
Der Encoder hängt am Atmega8 mit A und B an Portd.2 und Portd.3 , also die Interruptpins. Alle Portc werden als Ausgänge verwendet (7 Segment) .
So jetzt schreibe ich in Bascom den Encoderbefehl und bekomme einen Haufen Fehlermeldungen. Also hab ich mal einfach alles systematisch rausgestrichen bis ich rausfand dass er die Deklarierung des Portc nicht mag. Kann ich das nicht umgehen? Ich hab schon alles fertig gelötet und will jetzt nicht den kompletten portc freiräumen . Ausserdem scheint er mir die Variable A und das B übel zu nehmen
Hier mal das Stück des Codes das ich meine:
Code:
$regfile = "m8def.dat"
$crystal = 8000000
'##############################################################################
'Einstellen der Segmentausgänge
'##############################################################################
A Alias Portc.5 'Hier sitzt der Wurm (Portc.x mag er nicht)
B Alias Portc.4
C Alias Portc.3
D Alias Portc.2
E Alias Portc.1
F Alias Portb.1
G Alias Portb.0
T1 Alias Portb.0
T2 Alias Portd.7
Config A = Output 'Hier ist Problem No.2
Config B = Output
Config C = Output
Config D = Output
Config E = Output
Config F = Output
Config G = Output
Config T1 = Output
Config T2 = Output
'##############################################################################
'Einstellen der Eingänge
'##############################################################################
Config Pind.2 = Input 'Encodereingänge
Config Pind.3 = Input
Config Pind.4 = Input 'Encodertaster
Portd.2 = 1
Portd.3 = 1
'###############################################################################
'Variabeln
'###############################################################################
Dim L_sekunden As Byte 'Ausgabewerte
Dim H_sekunden As Byte
Dim L_minuten As Byte
Dim H_minuten As Byte
Dim L_stunden As Byte
Dim H_stunden As Byte
Dim Temp_ziffer As Byte
Dim Ausgabe As Byte
Dim Stunden As Byte 'Eingestellte Werte
Dim Minuten As Byte
Dim Sekunden As Byte
Dim E As Byte
'##############################################################################
'Timer (wurden entfernt)
'##############################################################################
Do
E = Encoder(pinb.0 , Pinb.1 , Links , Rechts , 1)
Wait 1
Loop
Ps: Das ganze sollte ein Ostergeschenk werden, aber langsam sehe ich schwarz
Mfg,
Flo