AVR verstehen...

[king-sixXx]

Das Proggi sieht so aus:

$crystal = 4000000
$baud = 9600

Dim A As Integer
     A = 0
Do

Print "6"

     A = A + 1

Loop Until A = 10

End

[bertl100]

Das sind die wichtigsten drei Zeilen damit was passieren kann.
regfile ist die Definitionsdatei wo die Assemblerroutinen stehen.

$regfile = "m8def.dat"
$crystal = 4000000
$baud = 9600

[/fliph]

[bertl100]

Dann klappts auch mit dem Nachbarn!!

[king-sixXx]

reicht es wenn ich auf diese m8def.dat Datei verweise, oder muss ich in der Datei auch noch was eintragen?

[bertl100]

kopiere meinen code einfach und häng dein file darunter, also

Dim A As Integer
A = 0
Do

Print "6"

A = A + 1

Loop Until A = 10

End

[king-sixXx]

Hab ich gemacht, aber meine Nachbarn sind wenig kontaktfreudig...
Aber eine kleine Änderung gibt es:

[bertl100]

probier mal nen anderen code

$regfile = "m8def.dat"
$crystal = 4000000
$baud = 9600

 Print "Hallo Chef! " 

wait 1

do 

print "Test "
waitms 200
loop

end

[bertl100]

bist du sicher, dass du beim Terminal die richtige Baudrate eingestellt hast??
9600

[king-sixXx]

keine Chance...
Hallo Chef will auch nicht. Die Ausgabe diesemal:

[viereck]Tep[viereck]

[bertl100]

funktionierts mit der Simulation??
Das heißt in Bascom der rote Button (Simulate Program)