Microcontroller 8051 Programm Problem

[J&J (Gast)]

include reg_52.pdf

  code at 0

      sjmp  init          ;springe zu init
        
      org 03h            ;Einsprungadresse Externer Interrupt 0
      sjmp  ISR_EX0
      org 0bh            ;Einsprungadresse Timer Interrupt 0
      sjmp  ISR_T0
      org 13h            ;Einsprungadresse Externer Interrupt 1
      setb TR0
      ;sjmp  ISR_EX1
      org 1bh            ;Einsprungadresse Timer Interrupt 1
      sjmp  ISR_T1

  
init:    setb  EA            ;Globale Interruptfreigabe 
      setb  EX0          ;Freigabe Ext. Interrupt 0
;      setb  EX1          ;Freigabe Ext. Interrupt 1    
      setb  ET0          ;Freigabe Timer Interrupt 0    
      setb  ET1          ;Freigabe Timer Interrupt 1    
      mov  TMOD,#00010001b  ;T1/T0 Modus 1: 16 Bit-Timer ohne nachladen    
      mov   TCON,#00000101b  ;EX1/EX0 bei abfallender Flanke, Timer ausgeschalten    
      setb  P3.7          ;Aktiviere linke 7-Segment-Anzeige    
      clr  P3.6          ;Deaktiviere rechte 7-Segment-Anzeige    
      mov  R0,#255        ;setze Register R0 auf 255;    
      mov   P2,#0          ;lösche 7-Segment-Anzeige
      mov  R1,#40d        ;setze Register R1 auf 40(dezimal)    
      mov  TH1,#11111111b    ;setze TH1 auf 11111111(binär)    
      mov  TL1,#11111111b    ;setze TL1 auf 11111111(binär)
haupt:   sjmp haupt          ;Programm wiederholt endlos "nichts"

ISR_EX0:
;      clr  EX0          ;deaktiviere Schalter für Ext. Interrupt 0
;      clr  EX1          ;deaktiviere Schalter für Ext. Interrupt 1
      cjne  R0,#15,hoch      ;obere Grenze der möglichen Töne
      reti              ;return
hoch:    inc  R0            ;Erhöhe R0 um 1
      acall AusEX01        ;springe zu Unterprogramm AusEX01
      reti

ISR_EX1:
;      clr  EX0          ;deaktiviere Schalter für Ext. Interrupt 0
;      clr  EX1          ;deaktiviere Schalter für Ext. Interrupt 1
      cjne  R0,#1,runter    ;untere Grenze der möglichen Töne
      reti              ;return
runter:  mov  A,R0          ;Erniedrige R0 um 3
      subb  A,#3          ;"
      mov  R0,A          ;"
      acall AusEX01        ;springe zu Unterprogramm AusEX01
      reti

AusEX01:
;      mov  DPTR,#seg7code    ;setze Datenpointer an symbolische Adresse seg7code
;      mov  A,R0          ;Kopiere R0 in Akkumulator
;      movc  A,@A+DPTR      ;lade seg7code in den Akku
;      mov  P2,A          ;Ausgabe Tonkennung
  mov P2,R0
      mov  DPTR,#tcode      ;setze Datenpointer an symbolische Adresse tcode
      mov  A,R0          ;Kopiere R0 in Akkumulator
      movc  A,@A+DPTR      ;lade tcode in den Akku
      mov  TH0,A          ;lade Reloadwert in TH0
      inc  R0            ;erhöhe R0 um 1
      mov  A,R0          ;Kopiere R0 in Akkumulator
      movc  A,@A+DPTR      ;lade tcode in den Akku
      mov  TL0,A          ;lade Reloadwert in TL0
      setb  TR0          ;starte Timer 0(Tonausgabe)
      setb  TR1          ;starte Timer 1
      ret              ;return
  

ISR_T0:
  clr TR0
  mov  DPTR,#tcode
      mov  A,R0          ;Kopiere R0 in Akkumulator
      movc  A,@A+DPTR      ;lade tcode in den Akku
      mov  TL0,A          ;lade Reloadwert in TL0
      dec  R0            ;erniedrige R0 um 1
      mov  A,R0          ;Kopiere R0 in Akkumulator
      movc  A,@A+DPTR      ;lade tcode in den Akku
      mov  TH0,A          ;lade Reloadwert in TH0
      inc  R0            ;erhöhe R0 um 1
  setb TR0
      cpl  P2.0          ;Invertiere P2.0(Tonerzeugung)
      reti              ;return
  

ISR_T1:
      mov  TL1,#11111111b    ;setze TH1 auf 11111111(binär)
      mov  TH1,#11111111b    ;setze TL1 auf 11111111(binär)
      djnz  R1,loop0        ;Erniedrige R1 um 1; wenn nicht 0, springe zu Marke "loop0"
      clr  TR0          ;stoppe Timer 0(Tonausgabe)
      clr  TR1          ;stoppe Timer 1
;      setb  EX0          ;aktiviere Schalter für Ext. Interrupt 0
      setb  EX1          ;aktiviere Schalter für Ext. Interrupt 1
      mov  R1,#40d        ;setze Register R1 auf 40(dezimal)
loop0:  reti



seg7code:
  DB 01101100b
  DB 01111110b
  DB 11101100b
  DB 11101000b
  DB 11101110b
  DB 11111010b
  DB 11011010b
  DB 01101100b 

tcode:
DB 00000000b, 11111111b;  DB 00001110b, 11101000b ;c3
  DB 00001101b, 01001001b ;d3
  DB 00001011b, 11010110b ;e3
  DB 00010110b, 01010010b ;f3
  DB 00001001b, 11110111b ;g3
  DB 00001000b, 11100000b ;a3
  DB 00000111b, 11101000b ;h3
  DB 00000111b, 01110100b ;c4

Vermutlicher Fehler beim nachladen der Timer kann uns jemand 
weiterhelfen ?

[J&J (Gast)]

Vermutlicher Fehler beim nachladen der Timer kann uns jemand 
weiterhelfen ?

[Rufus Τ. F. (rufus)]

Du hättest die Fehlerbeschreibung weglassen können, oder einfach nur 
schreiben "geht nicht".

So aber können wir gar nicht genug raten, was Dein Problem nun sein mag 
... Spielverderber!

--

Mit anderen Worten: Ein wenig mehr Mühe solltest Du Dir bei Deiner 
Fehlerbeschreibung schon machen. Du könntest beispielsweise beschreiben, 
was Du meinst, was Dein Programm machen sollte und warum, und was Du 
stattdessen wahrnimmst, und wie Du das diagnostiziert hast.

Hier über 3 kByte Assemblerquelltext hinzurotzen mit einer sechs Wörter 
langen "Fehlerbeschreibung" ... nee, das kommt nicht gut an.

[Hans (Gast)]

J&J schrieb:
> include reg_52.pdf

Eine PDF in das Programm einzubinden gefällt den Assembler bestimmt 
nicht.

[Kaj (Gast)]

doppel post
Beitrag "Assembler 8051 Programm funktioniert nicht wie gewollt"

[Günther B. (binaerguenther)]

Assembler hat generell keine Probleme damit PDF-Dateien einzubinden. Ich 
persönlich verwende auch die reg_52.pdf und es funktioniert ohne 
Probleme.

[Reinhard D. (decimalreinhard)]

Kaj schrieb:
> doppel post
> Beitrag "Assembler 8051 Programm funktioniert nicht wie gewollt"

Du musst wohl blind auf beiden Augen sein. Es sind zwei komplett andere 
Quelltexte...

[Marc V. (Firma: Vescomp) (logarithmus)]

J&J schrieb:
> Vermutlicher Fehler beim nachladen der Timer kann uns jemand
> weiterhelfen ?

 Wenn aus #tcode ein 16bit Wert gelesen wird, aber Pointer darauf
 nur einmal erhöht wird, passiert so etwas.

[Reinhard D. (decimalreinhard)]

Marc V. schrieb:
> Wenn aus #tcode ein 16bit Wert gelesen wird, aber Pointer darauf
>  nur einmal erhöht wird, passiert so etwas.

Im #tcode sind doch 8bit Werte, die gelesen werden?
wo sollte dann darin der Fehler liegen?

[Marc V. (Firma: Vescomp) (logarithmus)]

Reinhard D. schrieb:
> Im #tcode sind doch 8bit Werte, die gelesen werden?
> wo sollte dann darin der Fehler liegen?

 Da wird zweimal ein 8bit Wert ausgelesen, der Pointer darauf aber
 nur einmal erhöht.
 Es wird zwar auf anderer Stelle im Programm Pointer erhöht und auch
 um 3 verkleinert, aber da wird einem schwindelig von hoch- und
 runterspringen.
 Werte für TH und TL werden aus Nirwana geholt.
 So macht man das nicht.

[Peter D. (peda)]

J&J schrieb:
> acall AusEX01        ;springe zu Unterprogramm AusEX01
> mov  A,R0          ;Kopiere R0 in Akkumulator
> dec  R0            ;erniedrige R0 um 1

Solche sinnlosen Kommentare sollte man sich schenken.

Beschreibe doch erstmal den grundsätzlichen Funktionsablauf und was das 
Programm überhaupt machen soll.
Im allgemeinen fällt einem dabei oft schon der Fehler auf.

[Lothar M. (Firma: Titel) (lkmiller) (Moderator)]

Hans schrieb:
> Eine PDF in das Programm einzubinden gefällt den Assembler bestimmt nicht.
Dem Assembler ist die Datei-Extension egal. Du kannst auch eine 
EXE-Datei einbinden, wenn sie sinnvollen Assemblertext enthält. Hier 
heißt PDF vermutlich "Pre-Defined-Functions" oder sowas ähnliches.

Reinhard D. schrieb:
> Du musst wohl blind auf beiden Augen sein.
Das ist aber ein Bummerang zusammen mit der gewagten These:
> Es sind zwei komplett andere Quelltexte...
Sie sind ganz offensichtlich zu mindestens 50% so gleich, dass sie den 
selben Vater und die selbe Mutter haben. Warum setzt J&J und du euch 
nicht zusammen und diskutiert das gleich nach dem Unterricht mal durch? 
Dabei lernt man einiges...

[nemesis... (Gast)]

Beitrag #4602282 wurde von einem Moderator gelöscht.

Lothar M. schrieb:

Warum hast du denn meinen Post gelöscht? War der Hinweis auf den
Debugger falsch? Beantworte doch bitte mal diese Frage ohne Umschweife.