Atmega48PA RS232 Problem

[A. B. (developer_x)]

Sehr geehrtes Forum,
ich habe vor einen Atmega48PA per RS232 mit dem
PC kommunizieren zu lassen. Ich verwende HTerm und AVR Studio.

Dazu habe ich Pin 2 (RXD) und Pin 3 (TXD) des Atmegas
mit meinem MAX232 Modul verbunden.

(Mein Max232 Modul ist ein Fertigbauteil, ich habe schon
zwei verschiedene Module verwenden, und die funktionieren
eigentlich)

Auf meinem MAX232 Modul gibt es sogar leds, die anzeigen ob
die Stromversorgung korrekt angeschlossen ist, und LEDs für RXD und TXD.

Nun habe ich nochmal nach diesem Tutorial und Code :
http://www.mikrocontroller.net/articles/AVR-Tutorial:_UART#Senden_von_Zeichen

Das Programm auf meinen Atmega geflashed. Wenn ich nun mein
Terminalprogramm öffne, die im Tutorial beschriebenen Einstellungen
vornehme, und dann die Stromverbindung für den Atmega anstelle,
kommen einfach keine Signale am PC an.

Der Atmega, so zumindest die LEDs von MAX232 Modul, sendet einfach
keine Signale.

Sorry, vielleicht überseh ich einfach eine Kleinigkeit, aber
ich weiß nicht woran es liegen sollte.

Danke für eure Hilfe,
m.f.G.: K.R.

[Oliver R. (orb)]

Hast Du RXD vom AVR mit RXD oder mit TXD von MAX232 verbunden?
Je nachdem wie der Entwickler gedacht hat, mußt Du die kreuzen.

[A. B. (developer_x)]

Nein ich habe sie nicht gekreuzt, müssten die LEDs aber nicht trotzdem 
blinken, oder müsste der PC dann nicht wenigstens Mist empfangen?

*Edit: Es funktioniert gekreuzt auch nicht.
Ich denke es liegt eher am Code.
Es ist ein Atmega48 PA. Der Atmega funktioniert auch einwandfrei.
Daran liegt es nicht. Ich vermute ein Softwareproblem.
Kann es daran liegen dass der Code für Atmega8 geschrieben ist?
(Sind doch eigentlich fast gleich ausgestattet auch von den
Bezeichnungen)

[Oliver R. (orb)]

Wenn 2 Ausgänge aufeinander liegen gewinnt einmal der Stärke und bei 2 
Eingängen passiert garnichts (außer daß vielleicht beide Unsinn 
einfangen).

Um zu testen, ob der Adapter funktioniert kannst Du den AVR mal 
weglassen und RXD und TXD verbinden. Dann muß alles was Du tipst wieder 
angezeigt werden und die LED syncron flackern.

[Thomas E. (thomase)]

Dann zeig doch deinen Code und verweise nicht auf ein Tutorial, in dem 
drinsteht, wie es richtig sein soll.

mfg.

[A. B. (developer_x)]

Also:
Erstmal danke für eure Hilfe. Wenn ich RXD und TXD verbinde, kommt 
dasselbe auch wieder am PC an, was abgesendet wurde.
Hardwaretechnisch steht soweit alles.

Mein Code:

.include "m8def.inc"
 
.def temp    = r16                              ; Register für kleinere Arbeiten
.def zeichen = r17                              ; in diesem Register wird das Zeichen an die
                                                ; Ausgabefunktion übergeben
 
.equ F_CPU = 4000000                            ; Systemtakt in Hz
.equ BAUD  = 9600                               ; Baudrate
 
; Berechnungen
.equ UBRR_VAL   = ((F_CPU+BAUD*8)/(BAUD*16)-1)  ; clever runden
.equ BAUD_REAL  = (F_CPU/(16*(UBRR_VAL+1)))      ; Reale Baudrate
.equ BAUD_ERROR = ((BAUD_REAL*1000)/BAUD-1000)  ; Fehler in Promille
 
.if ((BAUD_ERROR>10) || (BAUD_ERROR<-10))       ; max. +/-10 Promille Fehler
  .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!"
.endif
 
    ; Stackpointer initialisieren
 
    ldi     temp, HIGH(RAMEND)
    out     SPH, temp
    ldi     temp, LOW(RAMEND)
    out     SPL, temp
 
    ; Baudrate einstellen
 
    ldi     temp, HIGH(UBRR_VAL)
    out     UBRRH, temp
    ldi     temp, LOW(UBRR_VAL)
    out     UBRRL, temp
 
    ; Frame-Format: 8 Bit
 
    ldi     temp, (1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0)
    out     UCSRC, temp
 
    sbi     UCSRB,TXEN                  ; TX aktivieren
 
loop:
    ldi     zeichen, 'T'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 'e'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 's'
    rcall   serout                      ; ...
    ldi     zeichen, 't'
    rcall   serout
    ldi     zeichen, '!'
    rcall   serout
    ldi     zeichen, 10
    rcall   serout
    ldi     zeichen, 13
    rcall   serout
    rcall   sync                        
    rjmp    loop
 
serout:
    sbis    UCSRA,UDRE                  ; Warten bis UDR für das nächste
                                        ; Byte bereit ist
    rjmp    serout
    out     UDR, zeichen
    ret                                 ; zurück zum Hauptprogramm
 
; kleine Pause zum Synchronisieren des Empfängers, falls zwischenzeitlich
; das Kabel getrennt wurde
 
sync:
    ldi     r16,0
sync_1:
    ldi     r17,0
sync_loop:
    dec     r17
    brne    sync_loop
    dec     r16
    brne    sync_1  
    ret

[Oliver R. (orb)]

Du solltest zumindest die
.include "m8def.inc"
in
.include "m48def.inc" oder .include "m48pdef.inc"
ändern.

[der alte Hanns (Gast)]

Einfach nur kopieren kann ins Auge gehen, wie schon mancher Minister 
erfahren musste.

Im Datenblatt des ATmega48 das Kapitel Register Summary anschauen und 
danach den Unterschied zwischen out und sts ergründen.

[A. B. (developer_x)]

Sorry, bin bisschen aus der Übung.
Ich werde mich da im Datenblatt nochmal einlesen und melde mich gleich 
zurück.

[Thomas E. (thomase)]

>     ldi     temp, (1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0)
URSEL hat da auch nichts verloren.

In C wäre das jetzt einfacher. Den Assemblercode musst du schon ein 
bisschen mehr umkrempeln. Vor allen Dingen sind die Adressen nicht mehr 
im I/O Space und daher nicht mehr mit out erreichbar.

mfg.

[der alte Hanns (Gast)]

Wobei nach dem Tipp von Oliver R. vermutlich der Assembler mit seinen 
Fehlermeldungen bereits in die richtige Richtung weisen wird.

[A. B. (developer_x)]

Mein Problem ist folgendes, und erinnert mich an die PWM Geschichte von 
mir:
Ich habe ein Tutorial, in welchem mir erklärt wird was ich machen soll. 
Sogar im Datenblatt ist eine Art Tutorial, interessant wird es dann 
aber, wenn selbst der Code aus dem Datenblatt von meinem AVR Studio 
nicht akzeptiert wird, und ich nirgendwo eine Tabelle mit Bezeichnugnen 
der ganzen Bytes finde.

Nun steh ich da und weiß nicht mehr weiter.

Z.B.:
http://www.atmel.com/images/doc2545.pdf
S.178, den Assembler Code zur Initialisierung
bei meinem AVR Studio wird gesagt, dass UBRRnH
nicht existiert (Undefined Symbol).

Hat jemand vielleicht ne gute Erklärung was ich machen könnte?

[spess53 (Gast)]

Hi

>Hat jemand vielleicht ne gute Erklärung was ich machen könnte?

Atmel hat da schöne Migration Notes. Auch eine vom Übergang vom ATMega8 
zu ATMega48/88/168.

MfG Spess

[der alte Hanns (Gast)]

Das 'n' steht für eine Ziffer, in diesem Fall wohl '0', denn wenn ich es 
richtig sehe, hat der ATmega48 nur einen USART, eben USART0.

[Thomas E. (thomase)]

K. R. schrieb:
> http://www.atmel.com/images/doc2545.pdf
> S.178, den Assembler Code zur Initialisierung
> bei meinem AVR Studio wird gesagt, dass UBRRnH
> nicht existiert (Undefined Symbol).
>
> Hat jemand vielleicht ne gute Erklärung was ich machen könnte?

Dir ist aber klar, daß "n" in diesem Fall für "0" steht und entsprechend 
ersetzt werden muß?

mfg.

[A. B. (developer_x)]

Und womit denn?

Ich habe '_', '0', 'A', 'B' versucht, nichts funktioniert.
Sorry aber diese Erklärungen finde ich nicht gerade sinnvoll,
man kann nicht einfach hingehen, einen Code hinklatschen, ohne
ein einziges Mal zu erklären was n ist, bzw. womit es zu ersetzen ist.

Im gesamten Kapitel kommt es als Index in allen Bezeichnungen vor,
aber nirgendwo wird gesagt, was es ist.

Sorry, aber was soll ich denn da einsetzen?

[der alte Hanns (Gast)]

Welche Fehlermeldungen kommen denn, wenn Sie das 'n' durch '0' ersetzen?

[spess53 (Gast)]

Hi

>Sorry, aber was soll ich denn da einsetzen?

Das was im Datenblatt steht.

MfG Spess

[Thomas E. (thomase)]

K. R. schrieb:
> Und womit denn?
>
> Ich habe '_', '0', 'A', 'B' versucht, nichts funktioniert.
> Sorry aber diese Erklärungen finde ich nicht gerade sinnvoll,
> man kann nicht einfach hingehen, einen Code hinklatschen, ohne
> ein einziges Mal zu erklären was n ist, bzw. womit es zu ersetzen ist.
>
> Im gesamten Kapitel kommt es als Index in allen Bezeichnungen vor,
> aber nirgendwo wird gesagt, was es ist.
>
> Sorry, aber was soll ich denn da einsetzen?

"0".

Aus RXC im UCSRA-Register wird RXC0 im UCSR0A-Register.

mfg.

[A. B. (developer_x)]

der alte Hanns schrieb:
> Welche Fehlermeldungen kommen denn, wenn Sie das 'n' durch '0'
> ersetzen?

C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(30): error: 
Undefined symbol: UBRR0H

[der alte Hanns (Gast)]

Dann sind Sie vermutlich nicht dem Hinweis von Oliver R. gefolgt, dieses 
aber ist unabdingbar.

[Thomas E. (thomase)]

K. R. schrieb:
> der alte Hanns schrieb:
>> Welche Fehlermeldungen kommen denn, wenn Sie das 'n' durch '0'
>> ersetzen?
>
> C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(30): error:
> Undefined symbol: UBRR0H

Falsche xxdef.inc ?

mfg.

[Hans O. (piwibit)]

Oliver R. schrieb:
> Du solltest zumindest die
> .include "m8def.inc"
> in
> .include "m48def.inc" oder .include "m48pdef.inc"
> ändern.

^^^^^^^^
Das geändert? weil beim ATmega8 gibt es kein UBRR0H

MfG
Hans

[A. B. (developer_x)]

Natürlich habe ich das schon geändert.

Also das ist im Moment mein Verstümmelter Code,
und ich weiß gar nicht so recht was jetzt konkret
eingesetzt werden soll, weil, wenn ich das durch 0
ersetze kommen da Fehlermeldungen wie vorhin beschrieben.

.include "m48def.inc"
 
.def temp    = r16                              ; Register für kleinere Arbeiten
.def zeichen = r17                              ; in diesem Register wird das Zeichen an die
                                                ; Ausgabefunktion übergeben
 
.equ F_CPU = 1000000                            ; Systemtakt in Hz
.equ BAUD  = 9600                               ; Baudrate
 
; Berechnungen
.equ UBRR_VAL   = ((F_CPU+BAUD*8)/(BAUD*16)-1)  ; clever runden
.equ BAUD_REAL  = (F_CPU/(16*(UBRR_VAL+1)))      ; Reale Baudrate
.equ BAUD_ERROR = ((BAUD_REAL*1000)/BAUD-1000)  ; Fehler in Promille
 
.if ((BAUD_ERROR>10) || (BAUD_ERROR<-10))       ; max. +/-10 Promille Fehler
  .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!"
.endif
 
    ; Stackpointer initialisieren
 
    ldi     temp, HIGH(RAMEND)
    out     SPH, temp
    ldi     temp, LOW(RAMEND)
    out     SPL, temp

;;;;;;;;;;;;;;;;;;;;;;;;;;;

 ; Set baud rate
  out UBRR0H, HIGH(UBRR_VAL)
  out UBRR0L, LOW (UBRR_VAL)
 ; Enable receiver and transmitter
  ldi r16, (1<<RXEN0)|(1<<TXEN0)
  out UCSR0B,r16
 ; Set frame format: 8data, 2stop bit
  ldi r16, (1<<USBS0)|(3<<UCSZn0)
  out UCSR0C,r16

;;;;;;;;;;;;;;;;;;;;;;;;;;;

loop:
    ldi     zeichen, 'T'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 'e'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 's'
    rcall   serout                      ; ...
    ldi     zeichen, 't'
    rcall   serout
    ldi     zeichen, '!'
    rcall   serout
    ldi     zeichen, 10
    rcall   serout
    ldi     zeichen, 13
    rcall   serout
    rcall   sync                        
    rjmp    loop
 
serout:
    sbis    UCSRA0,UDRE0                  ; Warten bis UDR für das nächste
                                        ; Byte bereit ist
    rjmp    serout
    out     UDR0, zeichen
    ret                                 ; zurück zum Hauptprogramm
 
; kleine Pause zum Synchronisieren des Empfängers, falls zwischenzeitlich
; das Kabel getrennt wurde
 
sync:
    ldi     r16,0
sync_1:
    ldi     r17,0
sync_loop:
    dec     r17
    brne    sync_loop
    dec     r16
    brne    sync_1  
    ret

Fehlermeldungen

AVRASM: AVR macro assembler 2.1.42 (build 1796 Sep 15 2009 10:48:36)
Copyright (C) 1995-2009 ATMEL Corporation

C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(2): Including file 'C:\Program Files (x86)\Atmel\AVR Tools\AvrAssembler2\Appnotes\m48def.inc'
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(17): error: Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(30): error: Invalid register
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(31): error: Invalid register
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(34): error: Operand 1 out of range: 0xc1
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(36): error: Undefined symbol: UCSZn0
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(37): error: Operand 1 out of range: 0xc2
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(60): error: Undefined symbol: UCSRA0
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(63): error: Operand 1 out of range: 0xc6
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(79): No EEPROM data, deleting C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.eep

Assembly failed, 8 errors, 0 warnings

[der alte Hanns (Gast)]

'... out of range' heißt in unserem Zusammenhang 'out' durch 'sts' 
ersetzen.
'Undefined symbol' weist meist auf einen Tippfehler hin.

>  ldi r16, (1<<USBS0)|(3<<UCSZn0)
Was bedeutet dieses?

UCSR0A liegt beim 48er im extended IO, also muss
> serout:
>    sbis    UCSRA0,UDRE0                  ; Warten bis UDR für das nächste
>                                          ; Byte bereit ist
>    rjmp    serout
komplett umgeschrieben werden.

[Thomas E. (thomase)]

K. R. schrieb:
> Undefined symbol: UCSRA0

Das Register heisst UCSR0A.

Der Atmega48 hat ein paar grössere Verwandte, die mehrere USARTs haben. 
Um das konform zu gestalten, hat man bei dem die "0" da eingefügt. Nur 
derjenige, der die Namen für die Interruptvektoren festgelegt hat, ist 
bei dem Meeting, in dem das besprochen wurde, offenbar abwesend gewesen. 
Die Interruptvektoren heissen daher z.B. USART_RX. Das nur mal am Rande.

mfg.

[der alte Hanns (Gast)]

> bei dem Meeting, in dem das besprochen wurde, offenbar abwesend gewesen.

Es menschelt eben überall.

[A. B. (developer_x)]

Also, einige Probleme habe ich lösen können, andere wiederum nicht.

Ich habe neben den ganzen Problemen eine Frage:
Welche Taktfrequenz hat denn ein 48PA Standardmäßig? Ich habe nie was 
umgestellt oder nen externen Quarz.

.include "m48def.inc"
 
.def temp    = r16                              ; Register für kleinere Arbeiten
.def zeichen = r17                              ; in diesem Register wird das Zeichen an die
                                                ; Ausgabefunktion übergeben
 
.equ F_CPU = 4000000                            ; Systemtakt in Hz
.equ BAUD  = 9600                               ; Baudrate
 
; Berechnungen
.equ UBRR_VAL   = ((F_CPU+BAUD*8)/(BAUD*16)-1)  ; clever runden
.equ BAUD_REAL  = (F_CPU/(16*(UBRR_VAL+1)))      ; Reale Baudrate
.equ BAUD_ERROR = ((BAUD_REAL*1000)/BAUD-1000)  ; Fehler in Promille
 
.if ((BAUD_ERROR>10) || (BAUD_ERROR<-10))       ; max. +/-10 Promille Fehler
  .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!"
.endif
 
    ; Stackpointer initialisieren
 
    ldi     temp, HIGH(RAMEND)
    out     SPH, temp
    ldi     temp, LOW(RAMEND)
    out     SPL, temp

;;;;;;;;;;;;;;;;;;;;;;;;;;;

 ; Set baud rate
  out UBRR0H, HIGH(UBRR_VAL)
  out UBRR0L, LOW (UBRR_VAL)
 ; Enable receiver and transmitter
  ldi r16, (1<<RXEN0)|(1<<TXEN0)
  sts UCSR0B,r16
 ; Set frame format: 8data, 2stop bit
  ldi r16, (1<<USBS0)|(3<<UCSZn0)
  sts UCSR0C,r16

;;;;;;;;;;;;;;;;;;;;;;;;;;;

loop:
    ldi     zeichen, 'T'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 'e'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 's'
    rcall   serout                      ; ...
    ldi     zeichen, 't'
    rcall   serout
    ldi     zeichen, '!'
    rcall   serout
    ldi     zeichen, 10
    rcall   serout
    ldi     zeichen, 13
    rcall   serout
    rcall   sync                        
    rjmp    loop
 
serout:
    sbis    UCSR0A,UDRE0                  ; Warten bis UDR für das nächste
                                        ; Byte bereit ist
    rjmp    serout
    sts     UDR0, zeichen
    ret                                 ; zurück zum Hauptprogramm
 
; kleine Pause zum Synchronisieren des Empfängers, falls zwischenzeitlich
; das Kabel getrennt wurde
 
sync:
    ldi     r16,0
sync_1:
    ldi     r17,0
sync_loop:
    dec     r17
    brne    sync_loop
    dec     r16
    brne    sync_1  
    ret

AVRASM: AVR macro assembler 2.1.42 (build 1796 Sep 15 2009 10:48:36)
Copyright (C) 1995-2009 ATMEL Corporation

C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(2): Including file 'C:\Program Files (x86)\Atmel\AVR Tools\AvrAssembler2\Appnotes\m48def.inc'
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(30): error: Invalid register
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(31): error: Invalid register
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(36): error: Undefined symbol: UCSZn0
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(60): error: Operand 1 out of range: 0xc0
C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.asm(79): No EEPROM data, deleting C:\Users\user\Desktop\AVR RS232 Tests\RS232_Test_1.eep

Assembly failed, 4 errors, 0 warnings

Übrigstens bin ich da anscheinend nicht der einzige, der ein Problem mit 
diesem Chaos hat:
http://www.roboternetz.de/community/threads/45300-Atmega48-Uart-Wahnsinn

Danke für eure Hilfe bis jetzt

[A. B. (developer_x)]

*Update
Ich habe jetzt mal in die m48def.inc geschaut,
und da habe ich UCSZn0 in UCSZn00 umbenannt.

Der Fehler is schonmal weg.

[Hans (Gast)]

Natürlich habe ich das schon geändert

Die erste Fehlermeldung sagt wohl, das die Datei nicht
gefunden werden konnte.

MfG
Hans

[der alte Hanns (Gast)]

Ausgeliefert wird er mit 1 MHz.

Und die Zeile
>  ldi r16, (1<<USBS0)|(3<<UCSZn0)
ist noch immer da.

Dass Sie den Code nach serout: umschreiben müssen, haben Sie 
mitbekommen?

> und da habe ich UCSZn0 in UCSZn00 umbenannt.
> Der Fehler is schonmal weg.
Definitiv nicht, Sie sind etwas von der Rolle.

[Thomas E. (thomase)]

K. R. schrieb:
> *Update
> Ich habe jetzt mal in die m48def.inc geschaut,
> und da habe ich UCSZn0 in UCSZn00 umbenannt.
>
> Der Fehler is schonmal weg.

Das sind noch 2:

  out UBRR0H, HIGH(UBRR_VAL)
  out UBRR0L, LOW (UBRR_VAL)

mfg.

[Thomas E. (thomase)]

der alte Hanns schrieb:
> Ausgeliefert wird er mit 1 MHz.
>
> Und die Zeile
>>  ldi r16, (1<<USBS0)|(3<<UCSZn0)
> ist noch immer da.
>
> Dass Sie den Code nach serout: umschreiben müssen, haben Sie
> mitbekommen?
>
>> und da habe ich UCSZn0 in UCSZn00 umbenannt.
>> Der Fehler is schonmal weg.
> Definitiv nicht, Sie sind etwas von der Rolle.

Gott sei Dank muss man sich C um so einen Scheiss nicht kümmern. Das 
musste jetzt einfach mal gesagt werden.

mfg.

[spess53 (Gast)]

Hi

>Übrigstens bin ich da anscheinend nicht der einzige, der ein Problem mit
>diesem Chaos hat:
>http://www.roboternetz.de/community/threads/45300-...

Haben nur Leute, die nicht Lesen können oder wollen:

http://www.atmel.com/Images/doc2553.pdf

MfG Spess

[der alte Hanns (Gast)]

serout:
    lds   temp,UCSR0A
    sbrs  temp,UDRE0
   rjmp   serout
    sts   UDR0,zeichen
   ret

Den Rest, Tippfehler &c., können Sie sicher alleine.

[A. B. (developer_x)]

So alle Fehler behoben (mit F_CPU=4000000), aber es kommt immer noch 
nichts an, eine Idee woran es liegen könnte?
(Die LED flackert trotzdem nicht)

Wenn ich F_CPU auf 1000000 setze, dann funktioniert es nicht, weil der 
Compiler dann natürlich folgende Zeile ausspuckt:
.error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit
geht es nicht.

Was soll ich da machen?

.include "m48def.inc"
 
.def temp    = r16                              ; Register für kleinere Arbeiten
.def zeichen = r17                              ; in diesem Register wird das Zeichen an die
                                                ; Ausgabefunktion übergeben
 
.equ F_CPU = 1000000                            ; Systemtakt in Hz
.equ BAUD  = 9600                               ; Baudrate
 
; Berechnungen
.equ UBRR_VAL   = ((F_CPU+BAUD*8)/(BAUD*16)-1)  ; clever runden
.equ BAUD_REAL  = (F_CPU/(16*(UBRR_VAL+1)))      ; Reale Baudrate
.equ BAUD_ERROR = ((BAUD_REAL*1000)/BAUD-1000)  ; Fehler in Promille
 
.if ((BAUD_ERROR>10) || (BAUD_ERROR<-10))       ; max. +/-10 Promille Fehler
  .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit zu hoch!"
.endif
 
    ; Stackpointer initialisieren
 
    ldi     temp, HIGH(RAMEND)
    out     SPH, temp
    ldi     temp, LOW(RAMEND)
    out     SPL, temp

;;;;;;;;;;;;;;;;;;;;;;;;;;;
/*
 ; Set baud rate
  out UBRR0H, HIGH(UBRR_VAL)
  out UBRR0L, LOW (UBRR_VAL)
 ; Enable receiver and transmitter
  ldi r16, (1<<RXEN0)|(1<<TXEN0)
  sts UCSR0B,r16
 ; Set frame format: 8data, 2stop bit
  ldi r16, (1<<USBS0)|(3<<UCSZ00)
  sts UCSR0C,r16
*/
;;;;;;;;;;;;;;;;;;;;;;;;;;;

    ; Baudrate einstellen
 
    ldi     temp, HIGH(UBRR_VAL)
    sts     UBRR0H, temp
    ldi     temp, LOW(UBRR_VAL)
    sts     UBRR0L, temp
 
    ; Frame-Format: 8 Bit
 
    ldi     temp, (1<<7)|(1<<2)|(1<<1)
    sts     UCSR0C, temp
 
   ldi    temp, UCSR0B
  ldi    temp, (1<<TXEN0)
   sts   UCSR0B, temp
   // sts     UCSR0B,TXEN0                  ; TX aktivieren
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;

loop:
    ldi     zeichen, 'T'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 'e'
    rcall   serout                      ; Unterprogramm aufrufen
    ldi     zeichen, 's'
    rcall   serout                      ; ...
    ldi     zeichen, 't'
    rcall   serout
    ldi     zeichen, '!'
    rcall   serout
    ldi     zeichen, 10
    rcall   serout
    ldi     zeichen, 13
    rcall   serout
    rcall   sync                        
    rjmp    loop
 
serout:
   // sbis    UCSR0A,UDRE0                ; Warten bis UDR für das nächste
                                        ; Byte bereit ist
  ldi temp, UCSR0A
    sbrs temp, UDRE0

    rjmp    serout
    sts     UDR0, zeichen
    ret                                 ; zurück zum Hauptprogramm
 
; kleine Pause zum Synchronisieren des Empfängers, falls zwischenzeitlich
; das Kabel getrennt wurde
 
sync:
    ldi     r16,0
sync_1:
    ldi     r17,0
sync_loop:
    dec     r17
    brne    sync_loop
    dec     r16
    brne    sync_1  
    ret

[Thomas E. (thomase)]

K. R. schrieb:
> So alle Fehler behoben (mit F_CPU=4000000), aber es kommt immer noch
> nichts an, eine Idee woran es liegen könnte?
> (Die LED flackert trotzdem nicht)
>

Das ist ja nun kompletter Unsinn.

> Wenn ich F_CPU auf 1000000 setze, dann funktioniert es nicht, weil der
> Compiler dann natürlich folgende Zeile ausspuckt:
> .error "Systematischer Fehler der Baudrate grösser 1 Prozent und damit
> geht es nicht.
>
> Was soll ich da machen?

Setz die Baudrate auf 4800 und aktiviere das U2X0-Bit in UCSR0A. Damit 
verdoppelst du die Geschwindigkeit und hast wieder 9600. Aber dann passt 
der Teiler besser.

mfg.

[spess53 (Gast)]

Hi

>Was soll ich da machen?

Dann setze die Baudrate auf 4800. 9600Bd geht halt mit 1MHz nicht.

MfG Spess

[A. B. (developer_x)]

Ich habe mal die Baudrate auf 4800 gesetzt und dasselbe auch in HTERM 
gemacht, anstatt mein U2X0-Bit in UCSR0A zu setzen.

Aber trotzdem sendet mein Atmega nichts.

[der alte Hanns (Gast)]

Legen Sie vorläufig diese Berechnungen still und nehmen Sie die Werte 
aus dem Datenblatt Examples of Baud Rate Setting:

    ldi   temp,high(12)    ; 9600 Bd bei 1 MHz mit U2X0=1
    sts   UBRR0H,temp
    ldi   temp,low(12)
    sts   UBRR0L,temp
    ldi   temp,(1<<U2X0)
    sts   UCSR0A,temp

und weiter sollten Sie schreiben:
    ldi   temp,(1<<USBS0)+(1<<UCSZ01)+(1<<UCSZ00)
    sts   UCSR0C,temp
anstelle dieser Bitraterei bei UCSR0C.

Nebenbei:

> Dann setze die Baudrate auf 4800. 9600Bd geht halt mit 1MHz nicht.

Das stimmt so nicht ganz, siehe oben.

[der alte Hanns (Gast)]

>  ldi temp, UCSR0A
>  sbrs temp, UDRE0

Das haben Sie aber nicht von mir!

[der alte Hanns (Gast)]

Eine geschlagene halbe Stunde ohne Reaktion ?! - Ich geh' schlafen.

Kann mich aber doch nicht enthalten, bei allem Verständnis, Reinhard Mey 
zu zitieren:
"Ich übe den Fortschritt, und das nicht faul,
nehme zwei Schritt auf einmal und fall aufs Maul."

[A. B. (developer_x)]

der alte Hanns schrieb:
>>  ldi temp, UCSR0A
>>  sbrs temp, UDRE0
>
> Das haben Sie aber nicht von mir!

Wie soll man das denn sonst lösen?

der alte Hanns schrieb:
> Eine geschlagene halbe Stunde ohne Reaktion ?! - Ich geh'
> schlafen.
>
> Kann mich aber doch nicht enthalten, bei allem Verständnis, Reinhard Mey
> zu zitieren:
> "Ich übe den Fortschritt, und das nicht faul,
> nehme zwei Schritt auf einmal und fall aufs Maul."

Danke für Ihr Engagement, aber ich kann bedauerlicherweise erst morgen 
weiterarbeiten, ich muss zur Arbeit.

der alte Hanns schrieb:
> Legen Sie vorläufig diese Berechnungen still und nehmen Sie die
> Werte
> aus dem Datenblatt Examples of Baud Rate Setting:
>
>     ldi   temp,high(12)    ; 9600 Bd bei 1 MHz mit U2X0=1
>     sts   UBRR0H,temp
>     ldi   temp,low(12)
>     sts   UBRR0L,temp
>     ldi   temp,(1<<U2X0)
>     sts   UCSR0A,temp
>
> und weiter sollten Sie schreiben:
>     ldi   temp,(1<<USBS0)+(1<<UCSZ01)+(1<<UCSZ00)
>     sts   UCSR0C,temp
> anstelle dieser Bitraterei bei UCSR0C.
>
> Nebenbei:
>
>> Dann setze die Baudrate auf 4800. 9600Bd geht halt mit 1MHz nicht.
>
> Das stimmt so nicht ganz, siehe oben.
Ich werde morgen versuchen den Schritten zu folgen

Danke!

[spess53 (Gast)]

Hi

>> Nebenbei:

>>> Dann setze die Baudrate auf 4800. 9600Bd geht halt mit 1MHz nicht.

>> Das stimmt so nicht ganz, siehe oben.
>Ich werde morgen versuchen den Schritten zu folgen

Bei 1MHz bekommst du bei 9600Bd einen Fehler von 7%. Mit Double Speed 
kommst du auf (theoretische) 0,2%. Allerdings mit verminderter 
Störsicherheit.

Wenn dein 1MHz-Takt vom internen RC-Oszillator kommt, wird das ganze eh 
zum Vabanquespiel. Kann (manchmal) funktionieren oder auch (manchmal) 
nicht.

MfG Spess

[Thomas E. (thomase)]

spess53 schrieb:
> Hi
>
>>> Nebenbei:
>
>>>> Dann setze die Baudrate auf 4800. 9600Bd geht halt mit 1MHz nicht.
>
>>> Das stimmt so nicht ganz, siehe oben.
>>Ich werde morgen versuchen den Schritten zu folgen
>
> Bei 1MHz bekommst du bei 9600Bd einen Fehler von 7%. Mit Double Speed
> kommst du auf (theoretische) 0,2%. Allerdings mit verminderter
> Störsicherheit.
>
> Wenn dein 1MHz-Takt vom internen RC-Oszillator kommt, wird das ganze eh
> zum Vabanquespiel. Kann (manchmal) funktionieren oder auch (manchmal)
> nicht.

Nein. Das funktioniert sehr zuverlässig. Sofern man die Bedingungen, 
unter denen der Oszillator werkskalibriert ist, einigermassen einhält.
Daß es ohne Neukalibrierung über den gesamten Temperatur- und 
Spannungsbereich nicht funktioniert, ist klar.

mfg.

[der alte Hanns (Gast)]

K. R. schrieb:
> der alte Hanns schrieb:
>>>  ldi temp, UCSR0A
>>>  sbrs temp, UDRE0
>>
>> Das haben Sie aber nicht von mir!
>
> Wie soll man das denn sonst lösen?

Sie sollten korrekt kopieren: ich hatte lds geschrieben, nicht ldi (da 
UCSR0A=C0 und UDRE0=5, wird die Schleife nie verlassen).


spess53 schrieb:
> Wenn dein 1MHz-Takt vom internen RC-Oszillator kommt, wird das ganze eh
> zum Vabanquespiel. Kann (manchmal) funktionieren oder auch (manchmal)
> nicht.

Schon, spess53, aber wir wären ja bereits froh gewesen, wenn K.R. 
irgendeine Reaktion auf dem Monitor gesehen hätte.

[wendelsberg (Gast)]

K. R. schrieb:
> Übrigstens bin ich da anscheinend nicht der einzige, der ein Problem mit
> diesem Chaos hat:
> http://www.roboternetz.de/community/threads/45300-Atmega48-Uart-Wahnsinn
>
> Danke für eure Hilfe bis jetzt

Das hier ist wiedermal ein schoenes Beispiel fuer jemanden, der 
offensichtlich nicht zu Ende gelesen hat.
Im verlinkten Thread lag es eben gerade nicht an "diesem Chaos", sondern 
wie so oft sass die Fehlerursache vor dem Computer.

wendelsberg

[A. B. (developer_x)]

Funktioniert jetzt alles :D

[A. B. (developer_x)]

Nur die Geschwindigkeit ist auf 9600 Baud gedrosselt.
Wenn ich dieses eine Bit setze, damit der Chip doppelt so schnell 
arbeitet,
klappt das nicht, aber egal.