Assemblerprogram Blackout?

[Jo T. (Gast)]

Hallo,
ich bin am Verzweifeln, nur jede zweite Schleife wird abgearbeitet.
Ich will ein DCC-Signal generieren.
Bitte schau mal ein Programmierer nach oder testet.
Ich habe eine Schleifenverlängerung eingebaut, so dass PB1 deutlich 
sichtbar blinkt, aber nur 6 mal. Wo liegt mein Fehler?
Danke für die Mühe.
Guten Tag!
Hier das Testprogramm:

.include "tn13def.inc" 
.def   A      = r16 
.def   i      = r19 
        sbi    ddrb,0     ;out-pwm (immer an)
        sbi    ddrb,1     ;out-dir
        sbi    ddrb,2     ;
        cbi    ddrb,3     ;dcc-in  H-aktiv
        cbi    ddrb,4     ;schalter  L-aktiv
        ldi    A,113    ;8620Hz bei 1sen  
        out OSCCAL, A   
  cbi pinb,0    ; Vorsicht beim Einschalten, AnalogFahrt
  sbi pinb,0      ; drv8801 wird benutzt
pr11:   ldi i,12    ; Preambel
pre:  
  ldi A,8   
  rcall Pause
  sbi pinb,1
  ldi A,8   
  rcall Pause
  cbi pinb,1
  dec i
   brne pre
loop:
  rjmp loop  ; zum Testen Endlosschleife

Pause: 
      ldi   r24,255
      ldi   r25,55
innen: 
      sbiw r24,1
      brne  innen
kurzPause:  dec A
      brne Pause
ret

[Peter D. (peda)]

Editiere Deinen Beitrag und benutze die Formatierung.

[Peter II (Gast)]

warum geht du nicht einfach mit dem Debugger durch?

[spess53 (Gast)]

Hi

>  sbi pinb,1   !!!!!!!!!!!!!
>  ldi A,8
>  rcall Pause
>  cbi pinb,1   !!!!!!!!!!!!!

MfG Spess

[Karl H. (kbuchegg)]

Bist du sicher, dass du am PINB Register rumfummeln willst und nicht am 
PORTB?

[Jo T. (Gast)]

Ja danke Karl Heinz,
sbi pinb,1 ergibt wie gewünscht 12x Blinken.
pinb wird nur beim Lesen benutzt.
Das ich so 3 Jahre AVR-Programmierung geschafft habe,
u.a. mit IR-Empfangsprogramm und PWM-Motorsteuerung.
Nochmal Danke und Guten Abend.

[der alte Hanns (Gast)]

>pinb wird nur beim Lesen benutzt.
Nicht ganz, und ist dieses nicht gerade der Grund für das 6-mal Blinken:
However, writing a logic one to a bit in the PINx Register, will result 
in a toggle in the corresponding bit in the Data Register.

[kogitsune (Gast)]

  rcall Pause

Stack initialisiert?

[Fred S. (kogitsune)]

Oops, unangemeldet. Jetzt nicht mehr...

[Grüner (Gast)]

Wo is

reset_vector:
  ldi temp,high(ramend) ;Stackpointer RAMend, Stack geht nach unten!
  out SPH,temp
  ldi temp,low(ramend)
  out SPL,temp

des?
Dann würde ich Dir gleich mal empfehlen so einen Blödsinn mit einer 
Schleife nicht zu schreiben. Sondern einen Timer zu benutzen der ist 
frei Scallierbar und dder µC schläft wärend der ganzen Zeit.

Timer aufziehen
Timer starten
Int ena
init_sleep:
  ldi temp,(1<<SE)  ;Sleep Enable
  out MCUCR,temp
clv ;clear carry
sei ;Global Int ena!!! Wichtig sonst geeht das ganze nicht.
TimInt Einsprung hart mit rjmp auf (siehe nächste Zeile)
Int in einem Register Markieren (sonst weist ja nicht welcher gekommen 
ist)
(bei nur einem kleinen Programm ist das nicht notwendig aber wenn Du 
z.B. mehrere Int hast dann immer Markieren und dann per Liste die jenige 
Routine ausführen die der jeweilige Int erfordert.)

call Routine
ret

sleep ;Zzzzzz

MfG
Grüner