Hallo,
ich bin am verzweifeln: Ich muß ein parr Taster mit meinem AVR abfragen, Entprellen nicht nötig. Ist in Bascom auch kein Problem, dachte ich bis jetzt. Das hier ist mein Testprogramm, es funktioniert NICHT.
$regfile = "m8def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 8000000
Config Portd.5 = Output
Config Portd.6 = Output
Config Portd.7 = Output
Config Pind.2 = Input
Config Pind.3 = Input
Config Pind.4 = Input
Portd.2 = 1
Portd.3 = 1
Portd.4 = 1
Do
Portd.5 = Pind.2
Portd.6 = Pind.3
Portd.7 = Pind.4
Loop
End
Ich habe andere Programme getestet, andere Chips getestet, andere Routinen getestet. Ergebnis: Nicht das, was ich wollte. Bei einem Tiny2313 funktionierte keine Abfrage, aber Interrupt waren teilweise möglich, und er kann auch zuverlässig LEDs zum Blinken bringen oder programmiert werden. Der MEGA8 und MEGA 16 fragten die Tasten ab, aber wenn ich sie drücke, blinken die LEDs. Das ganze fandt auf dem Pollin Atmel Evaluationsboard statt.
Warum geht das nicht? Ich weiß nicht mehr weiter...
MFG und auf Hilfe hoffend...
P.S.: Ist Bascom schuld? Falsche Programmierung etc? PonyProg? Kabel? ...
Hi,
wenn du einzelne Pins auf Input oder Output umstellst heißt es immer "PIN"
Also statt:
Config Portd.5 = Output
Config Portd.6 = Output
Config Portd.7 = Output
mal probieren:
Config Pind.5 = Output
Config Pind.6 = Output
Config Pind.7 = Output
Gruß
Christopher
Werd ich machen, aber steht es nicht immer überall anders?! Auch im Wiki? Die Ausgänge scheinen ja auch zu funktionieren, die LEDs blinken ja... Trotzdem danke!
Nein, hilft nicht. Ändert auch den HEX-Code nicht, das kann es nicht sein...
MFG
Ich kenne Bascom ja nicht, aber bei CONFIG handelt es sich doch sicher darum, einem Port-Pin einen festen Namen zuzuweisen, oder ? Und PORTD und PIND sind doch ziemlich sicher reservierte Token in Bascom, oder etwa nicht ?
Es muss doch auch in Bascom einen "Compiler-Lauf" geben. Und ich würde wetten, dass dieser einen, oder sogar mehrere Fehler ausgibt. Sicher würde es helfen, die Meldung dieses "Compiler-Laufs" hier mal reinzusetzen.
Gruß, Andreas
Nein, keine Fehler. Und z.B. "Config Portd = Output" heißt nur, dass man den Port als Ausgang definiert. Das muß schon so...
Man kann auch irgenwas mit DDRC oder so schreiben, kommt aufs gleiche raus...
MFG
möglichkeit nr1:
hat das wirklich keine auswirkungen ?
z.b. bei Pind.2, einmal heißt es pind.2, dann zeilen später wieder portd.2 und zum schluß hiterm "=" zeichen ists wieder pind.2 , du benennst das selbe 2 mal um.
Ist es in der "m8def.dat" so drinn das das pind das selbe ist wie portd ?
möglichkeit nummer 2:
wenn es egal ist wie man bennent , dann ist es wenn ich das programm richtig interpretiere , dann ist es egal was an input kommt, da du es später eh alles auf 1 setzt, somit wertest du gar kein ausgang aus
gruß
Hi,
beim konfigurieren eines kompletten Ports heißt es "PORT" :
config porta = output
config porta = input
Beim konfigurieren eines Pins heißt es dann "PIN" :
config pina.0 = output
config pina.0 = input
Bei lesen eines als Eingang konfigurierten Ports / Pins heißt es immer "PIN":
a=Pina
if pina.0=1 then
Aber die internen Pullups werden, bei einem auf Input geschaltetetn Pin mit "PORT" eingeschaltet
Porta.0=1
Beim schreiben eines als Ausgang konfigurierten Ports / Pins heißt es dann wieder "PORT"
Porta=255
Porta.0=1
Leicht verwirrend
Vielleicht solltest du mal die Pullups einschalten ?
(Hier wieder mit "PORT" ! )
Portd.2 = 1
Portd.3 = 1
Portd.4 = 1
Uuups, übersehen, das hast du ja schon...
Gruß
Christopher
Also sollte das Programm dann doch jetzt so aussehen, oder ?
Wobei D5, D6, und D7 im Ruhezustand "1" sein müssten (wegen der Pullups) und nur durch eine Verbindung von D2, D3 oder D4 nach Masse ihren Zustand ändern ...Code:$regfile = "m8def.dat" $framesize = 32 $swstack = 32 $hwstack = 32 $crystal = 8000000 Config Pind.5 = Output Config Pind.6 = Output Config Pind.7 = Output Config Pind.2 = Input Config Pind.3 = Input Config Pind.4 = Input Portd.2 = 1 Portd.3 = 1 Portd.4 = 1 Do Portd.5 = Pind.2 Portd.6 = Pind.3 Portd.7 = Pind.4 Loop End
also ich hab mir mal die Wiki durchgelesen und ich würd das so versuchen :
$regfile = "m8def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 8000000
Config Portd.5 = Output // stimmt laut Wiki
Config Portd.6 = Output
Config Portd.7 = Output
Config Pind.2 = Input // stimmt laut Wiki
Config Pind.3 = Input
Config Pind.4 = Input
Portd.2 = 1 // das ist doch um die pullups zu setzten oder ?
Portd.3 = 1
Portd.4 = 1
Taster1 Alias Pind.2
Taster2 Alias Pind.3
Taster3 Alias Pind.4
Ding1 Alias Portd.5 // ding ist einfach ein name
Ding2 Alias Portd.6
Ding3 Alias Portd.7
Do
if taster1=0 then
Ding1=1
else
Ding1 = 0 '
endif
if taster2=0 then
Ding2=1
else
Ding2 = 0 '
endif
if taster3=0 then
Ding3=1
else
Ding3 = 0 '
endif
Waitms 100
loop
End
alles hinter // sind komments
Berechtigungen
Zitieren
Lesezeichen