ATMega328P Timer1 beeinflusst Timer0 Interrupt

[Holger (Gast)]

Moin,

im Rahmen eines größeren Projektes bin ich auf ein Problem gestoßen, 
welches ich nicht lösen kann.

Ich habe daher mein Projekt eingedampft um das Problem zu verdeutlichen. 
Dieses Programm soll nun auch nicht einen wissenschaftlichen Anspruch 
haben sondern nur das Problem aufzeigen.

Also mit Timer0 sowie zwei Registern erzeuge ich Perioden von ca. 10 
Sekunden Länge. Während dieser Zeit werden drei Register hochgezählt. 
Dies geschieht in der Schleife loop.

Nach ca. zehn Sekunden werden die Zählerwerte ausgegeben.


Als Taktquelle dient ein eingelaufener OCXO mit 10 MHz (9.99999964 MHz).

HTerm_Output_1.PNG zeigt nun, den Output in HTerm. Nach der vierten 
Ausgabe sind die Zählerstände stabil.

Nun zum Problem: Wenn ich diese beiden Zeilen einfüge,

  ;*************************
  ldi      temp0, (1<<CS12)
  sts      TCCR1B, temp0
  ;*************************

dann wird ja lediglich für Timer1 die Taktquelle ausgewählt. Es ist 
übrigens egal, welchen Teiler man wählt.

Aber, dann läuft das eigentliche Programm nicht mehr "rund", wie man in 
HTerm_Output_2.PNG sehen kann. Schaut man sich das länger an, dann 
scheinen die Werte zu oszillieren. Ich meine fast schon sägezahnähnlich 
...

Woran kann das liegen?


Gruß
Holger

.include "m328Pdef.inc"

.DEF temp0      = r16
.DEF temp1      = r17
.DEF temp2      = r18
.DEF temp3      = r19
.DEF temp4      = r20
.DEF temp5      = r21
 
.equ F_CPU = 10000000

.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

.cseg
 
.org 0x0000
     jmp    start

.org OVF0addr
   jmp   timer0_overflow_interrupt

start:
    ;Stackpointer initialisieren 
    ldi     temp0, HIGH(RAMEND)
    out     SPH, temp0
    ldi     temp0, LOW(RAMEND)
    out     SPL, temp0
   
    ;Baudrate einstellen
    ldi     temp0, HIGH(UBRR_VAL)
    sts     UBRR0H, temp0
    ldi     temp0, LOW(UBRR_VAL)
    sts     UBRR0L, temp0
 
    ;Frame-Format: 8 Bit
    ldi     temp0, (1<<USBS0)|(1<<UCSZ00)|(1<<UCSZ01)
    sts     UCSR0C, temp0
 
  ;TX, RX und RX-Interrupt aktivieren
    ldi     temp0, (1<<TXEN0)
  sts     UCSR0B, temp0

  clr    temp0                
  clr    temp1
  clr    temp2
  clr    temp3
  clr    temp4
  clr    temp5
  
  ;TIMER0-stopp
  ldi     temp0, (0<<CS02)|(0<<CS01)|(0<<CS00)
  out     TCCR0B, temp0
  
  ;TIMER0-Overflow-Interrupt-Disable
  ldi     temp0, (0<<TOIE0)
  sts     TIMSK0, temp0
  
  ;TIMER0 auf 0 setzen
  clr     temp0
  sts     TCNT0, temp0
  





  ;*************************
  ldi      temp0, (1<<CS12)
  sts      TCCR1B, temp0
  ;*************************






  ;TIMER0-Prescaler 1024
  ldi     temp0, (1<<CS02)|(1<<CS00)
  out     TCCR0B, temp0

  ;TIMER0-Overflow-Interrupt-Enable
  ldi     temp0, (1<<TOIE0)
  sts     TIMSK0, temp0

  ;TIMER0 auf 0 setzen
  clr     temp0
  sts     TCNT0, temp0

  sei
  
loop:
  inc    temp3
  tst    temp3
  brne  loop

  inc    temp4
  tst    temp4
  brne  loop

  inc    temp5
  rjmp  loop
  
timer0_overflow_interrupt:
  inc    temp1
  cpi    temp1, 38
  brne  timer0_overflow_interrupt_end
  clr    temp1
  
  inc    temp2
  cpi    temp2, 10
  brne  timer0_overflow_interrupt_end

  ;TIMER0-Prescaler 0
  ldi     temp0, (0<<CS02)|(0<<CS00)
  out     TCCR0B, temp0
  
  mov    temp0, temp5
  rcall  serout_raw
  mov    temp0, temp4
  rcall  serout_raw
  mov    temp0, temp3
  rcall  serout_raw
  ldi    temp0, 13
  rcall  serout_raw
  ldi    temp0, 10
  rcall  serout_raw
  
  clr    temp2
  clr    temp3
  clr    temp4
  clr    temp5

  ;TIMER0 auf 0 setzen
  sts     TCNT0, temp0

  ;TIMER0-Prescaler 1024
  ldi     temp0, (1<<CS02)|(1<<CS00)
  out     TCCR0B, temp0

timer0_overflow_interrupt_end:
  reti 
  
serout_raw:
  push  temp1

serout_raw0:
  lds    temp1, UCSR0A            ;Warten bis UDRE0 für das nächste
                        ;Byte bereit ist
  sbrs  temp1, 5              ;UDR0  
            
    rjmp    serout_raw0

  sts     UDR0, temp0
  pop    temp1
    ret                      ;zurück zum Hauptprogramm

[holger (Gast)]

>Woran kann das liegen?

Warum sicherst du beim Eintritt in den Interrupt das
Statusregister nicht?

[Karl M. (Gast)]

Hallo,

man muss außerdem noch Fragen, warum auch die verwendeten Register, 
neben dem SRRG, in der ISR nicht gesichert werden?

Warum verwendet man keine Hochsprache ?
Dadurch kommt man schneller ans Ziel und kann einen Code besser warten 
und verstehen.

Über Datentypen und deren Arithmetik muss man sich auch keine weiteren 
Gedanken, hier Programmcode, machen.