atmega8 anfängerprogramm

[techboy]

Ich hab mit Bascommal etwas herumexperimentiert und bin bis hieher gekommen, nun zu meiner Frage:
Funktioniert dieses Programm?
Was ist falsch in diesem programm??


Programm::

$regfile = M8def.dat
$crystal = 7372000
$baud = 9600
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Dim I As Byte
I = 1to 2
Dim T As Byte
T = 2 To 4
Dim U As Byte
U = 4to 6

Config Pina.3 = Output
Config Pina.4 = Output
Config Pina.5 = Output

Porta.3 = I
Porta.4 = T
Porta.5 = U
Do
Loop

[mx3]

Was möchtest du genau machen?
I = 1to2 ??
wenn du die Variable I von 1 bis 2 hochzählen wilst,
gehört sie in eine For Next Schleife.

Dim I As Byte

For I = 1 to 2
Next i

Gruß,MX3

[Alter Knacker]

und zwischen DO und LOOP gehört der code rein, also die schleifen.
gruss knacki

[techboy]

Danke für die verbesserung gibt es sonst noch was??

[teslanikola]

einselne Pins konnen nicht den wert 2 haben, da musste schon den ganzen port nemen z.B. Porta = 2
porta.0 = 0 oder porta.0 = 1
pina.0 = Input

[techboy]

Ich verstehe nicht ganz was du meinst..???
In meinem Programm steht nirgends portd.0=2....!!!!

[uwegw]

ja aber in den variablen I, T und U, die du auf die ausgänge ausgibts...

[gandalf]

Hallo Attila,

schau mal folgenden Thread an:

https://www.roboternetz.de/phpBB2/viewtopic.php?t=8043

als Antwort von uwegw auf das Lauflicht von teslanikola sind hier mal die Pegel der Ports einzeln beschrieben. Vieleicht wirds dann etwas klarer.

Nachtrag: Zum Einstieg empfehle ich http://www.rowalt.de

Gruß Bernd (Gandalf

[techboy]

Vielen dank für den link !!!
Ich werde das programm morgen ausbessern..

[gandalf]

Hallo Attilla.

Auf http://www.qsl.net/pa3ckr/index.html gibts eine gute Einführung in Bascom und die Programmierung. Ist zwar auf Englisch, kann ich trotzdem nur empfehlen.