kann keine eingänge abfragen .. w00t

[Julian]

Hallo !!

aus irgendeinem grund kann ich keinen einzigen eingang an meinem mega 8 abfragen ..

$regfile = "m8def.dat"
$crystal = 16000000
$baud = 19200

Config Pinc.3 = Input
Set Portc.3

Do

If Portc.3 = 1 Then Print "1"
If Portc.3 = 0 Then Print "0"
Waitms 100
Loop

End

ich bekomm immer eine eins ausgegeben, auch wenn ich den pin an masse anlöte .. das der pin auch der richtige is sehe ich daran, das er wenn ich reset drücke auf gnd geht uns solbald das prgramm startet auf eins geht .. vorrausgesetzt er is nicht gerade an gnd angelötet ... ich hab auch schon einen anderen mega 8 probiert aber selbes problem ...

im kühnel Buch machen die auch keine akrobatischen verwindungen um einen pin abzufragen, also was is da bloß los !?

[plusminus]

Also ich bin noch nicht so lange dabei, aber mit C...

Muss man nicht PINC.x abfragen ?

überprüfen mal ... ob wirjlich 16Mhz...

m8def.dat --> ATMega8 ?!? --> 16MHz

[Mehto]

Kann es sein das auch bei Bascom PinC und nicht PortC abgefragt werden muss? (sind zwei verscheidene Register)

Viele Grüße,
Mehto

[Julian]

@ plusminus .. was is mit m8def.dat --> ATMega8 ?!? --> 16MHz gemeint ?? .. das is der may zulässige quarz !?!?

@ Metho .. ich glaub das is es .. werds gleich probieren .. danke !

[plusminus]

DU gibst die Datei für deinen ATMega8 an.

Schau mal ob du den mit 16MHz takten kannst / getaktet hast... (intern haben die meist ca 1MHz)

[Julian]

na ja .. wenn ich eine mega 8 verwende und eine 16 mhz quarz verwende dann sollt ich das auch tun .. oder? .. und dazu musste ich bei erstamliger benutzung des prozessors auch die fuses entsprechend programieren ...

wenn das nicht geklappt hätte, bzw falsch wäre würde ich im terminal fenster ja außerdem nur müll sehen .. wenn überhaut was kommen würde !

[PicNick]

If Pinc.3 = 1 Then Print "1"
If Pinc.3 = 0 Then Print "0"

[Ringo]

End if fehlt!

Hast du unten keine Fehlermeldung bekommen?

[PicNick]

End if fehlt!

Hast du unten keine Fehlermeldung bekommen?

Vermutlich nicht. In einer Zeile

If muh = "KUH" THEN PRINT "MUHKUH"

brauchst du kein end if

[franzl]

hallo,
es ist wie picnick schon gesagt hat du musst pinc.3 schreiben und nicht portc.3. bei Bascom werden eingänge immer mit pin angesprochen und ausgänge mit port.
mfg franzl