Druckbare Version
Achsooooooooo...also ist der Befehl "cp ZL, tmp" gar nicht unnütz, denn er speichert sich dass dann, wenn nen Übertrag sein muss und dieses nutzt er dann bei cpc?
Na denn is klar :)
So, nun muss ich nur noch rausfinden, wie ich wieder prüfe, ob er am Anfang ist. *grübel*
na klar Z zeiger ist eine 16 Bit Zahl und da muß Low und High geprüft weden, nicht nur die hälfte stell Dir mal vor Du willst wissen ob 1000 und 1001 gleich sind und schaust Dir nur die ersten Ziffern an, und zu deinem Problem, überlege wo Du ankommen willst, wo liegt Dein erster Ton ? (also in diesem Falle der letzte)
wenn Du den letzten haben wolltest hast Du geprüft, od der zeiger schon bei ((ton * 2) +laenge) lag und anders rum? vielleicht bei (ton *2) ups....
Ich lasse Dich jetzt damit alleine, übe mal mit den cp cpc sub sbc und add adc Befehlen .
Gute Nacht
Gruß Sebastian
YES!! \:D/
Geht nun endlich :)
Hier der komplette Code:
Musste allerdings bei der Prüfung, ob der erste Ton wieder erreicht ist eine 1 abziehen, sonst hät er einen Ton zu früh aufgehört.Code:;Programm
;CDurTonleiter rauf spielen
.include "m8def.inc"
.def tmp = r16 ;Mein Universallregister
.def tonwert = r17 ;aktueller Wert für den Ton
.def tonleiterEnde = r18 ;Hier wird gespeichert, ob die Tonleiter schon
;bis zu Ende gespielt wurde
.def lpm_reg = r0 ;Mein lpm-Register
.equ Summer = PB2 ;Summer an B.2
.equ time0 = 256-255 ;Timer0 für die Tonleiter
.equ time1 = 65536-1800 ;Damit wird der Timer1 vorgeladen, für die Sekunde
.equ daten_laenge = 7 ;Anzahl der Werte
.org 0x000
rjmp reset ;Interruptvektor "reset:"
.org OVF1addr
rjmp pruefSek ;Interruptvektor "pruefSek:"
.org OVF0addr
rjmp timerSummer ;Interruptvektor "timerSummer:"
reset:
;Stack einrichten
ldi tmp, HIGH(RAMEND) ;HIGH-Byte der obersten RAM-Adresse
out SPH, tmp
ldi tmp, LOW(RAMEND) ;Low-Byte der obersten RAM-Adresse
out SPL, tmp
;Timer Register für Ton werden belegt, hier Timer 0
ldi tmp, (1<<CS02) ;Prescaler ist 256
out TCCR0, tmp ;Register TCCR0 ist für den Prescaller zuständig
ldi tmp, time0 ;Hier wird der Timer vorgeladen
out TCNT0, tmp
;Timer Register für Sekunde werden belegt, hier Timer 1
ldi tmp, (1<<CS12) | (1<<CS10) ;Prescaler ist 1024
out TCCR1B, tmp
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1 Sekunde (10000) speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
ldi tmp, (1<<TOIE0) | (1<<TOIE1);Hier werden Interrupts nach Timer0 Überlauf eingeschaltet
out TIMSK, tmp ;Register TIMSK ist dafür zuständig
;Z-Register mit DB "tonleiter1" füllen
ldi ZH, HIGH(tonleiter1 * 2)
ldi ZL, LOW(tonleiter1 * 2)
sbi DDRB, Summer ;B.2 als Ausgang
sbi PORTB, Summer ;B.2 auf HIGH stellen
ldi tonleiterEnde, 0b00000000 ;tonleiterEnde auf 0 stellen
sei ;Interrupts zulassen
;Die Hauptschleife, die sich immer wiederholt und den Tonwert neu einliest
main:
lpm ;Daten von tonleiter1: holen
mov tonwert, lpm_reg ;erstes Byte in tmp verschieben - ersten Tonwert speichern
rjmp main ;immer wieder zurück zu main springen
;Läuft Timer1 über, so wird erstmal geprüft, ob der letzte Ton
;erreicht ist und der Timer1 wird neu vorgeladen
pruefSek:
push tmp ;tmp sichern
in tmp, SREG
push tmp ;SREG sichern
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1 Sekunde speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
lpm ;Daten von tonleiter1: holen
sbrc tonleiterEnde, 0 ;Ist tonleiterEnde = 0?
rjmp subtrahiereZ ;Wenn tonleiter = 1, dann subtrahiere Z um 1
addiereZ:
adiw ZL, 1 ;Z um 1 erhöhen
rjmp pruefSek2 ;zu "pruefSek2:" springen
subtrahiereZ:
sbiw ZL, 1 ;Z um 1 erniedrigen
pruefSek2:
ldi tmp, LOW ((tonleiter1 * 2) + daten_laenge) ;vergleiche LOW-Byte
cp ZL, tmp
ldi tmp, HIGH ((tonleiter1 * 2) + daten_laenge) ;vergleiche HIGH-Byte
cpc ZH, tmp
brne pruefTonrueckwaerts ;zu "pruefTonaus:" springen
sbr tonleiterEnde, 1 ;Hilfsvariable.1 auf 1 setzen
pruefTonrueckwaerts:
sbrc tonleiterEnde, 1 ;Ist tonleiter.1 = 0?
rjmp regwiederholen ;Wenn NEIN, dann zu "regiwederholen:"
;Wenn JA, dann prüfen, ob erster Ton
;wieder geladen wurde
prueftonaus:
ldi tmp, LOW (tonleiter1 * 2 - 1) ;vergleiche LOW-Byte
cp ZL, tmp
ldi tmp, HIGH (tonleiter1 * 2 - 1) ;vergleiche HIGH-Byte
cpc ZH, tmp
brne regwiederholen
ldi tmp, (0<<CS02) ;JA -> Timer0 abstellen
out TCCR0, tmp
regwiederholen:
pop tmp
out SREG, tmp ;SREG wiederholen
pop tmp ;tmp wiederholen
reti
;Läuft Timer0 über, so wird B.2 umgeschaltet, sodass Ton
;aus dem Summer zu hören ist
timerSummer:
push tmp ;tmp sichern
in tmp, SREG
push tmp ;SREG sichern
sbis PINB, Summer ;ist B.2 = 1?
rjmp timerSummer1 ;NEIN -> spring zu "timerSummer1:"
cbi PORTB, Summer ;JA -> setze B.2 auf 0
rjmp timerSummer2 ;springe zu "timerSummer2:"
timerSummer1:
sbi PORTB, Summer ;B.2 auf 1 setzen
timerSummer2:
out TCNT0, tonwert ;Timer0 neu vorladen
pop tmp ;SREG wiederholen
out SREG, tmp
pop tmp ;tmp wiederholen
reti
;Das sind die Werte, womit der Timer0 (Tonleiter-Timer) vorgeladen wird
;Anzahl der Wert muss GERADE sein
tonleiter1:
.db 256-55, 256-49, 256-44, 256-41, 256-37, 256-33, 256-29, 256-27
Wäre nett, wenn mir noch eine sagen könnte, ob er nun immer noch so unübersichtlich ist.
Und ein Bedenken hab ich noch. Meine Interruptroutine für Timer1, also wo er zu "pruefSek" springt, ist die nicht zu lang?
Werd ich machen, danke.Zitat:
Zitat von izaseba
Gruß
Thomas
Guten Morgen ;)
Bin ja mal gespannt, was als nächstes kommt. Hab auch noch gelesen, dass man Daten auf dem EPROM speichern kann oder auch auf dem RAM. Bin mal gespannt, ob wir das auch noch machen werden.
Najo, wenn hier heut nicht grgoßartiges läuft, werd ich denk ich mal ein Lauflicht programmieren und evtl. dann noch eine Ampel.
Gruß
Thomas
Moin!
Tu das!Zitat:
Najo, wenn hier heut nicht grgoßartiges läuft, werd ich denk ich mal ein Lauflicht programmieren und evtl. dann noch eine Ampel.
Je mehr Du praktisch versuchst etwas selbstständig zu erarbeiten, desto besser wirst Du!
Gruß Flori
Jup. Das Lauflicht geht ja, aber siehe selbst ;)
https://www.roboternetz.de/phpBB2/viewtopic.php?t=11730
Hallo Zusammen,
ich acker gerade das Tutorial durch! *puh* *schwitz*
leute ich bekomm die Krise wegen dem hier: *g*
das kennt ihr schon!! *gg* ich freu mich schon wenn das verstanden habe!!Code:ldi temp , LOW ((daten * 2) + daten_laenge) ; vergleiche LOW-Byte
cp ZL , temp
ldi temp , HIGH ((daten * 2) + daten_laenge) ; vergleiche HIGH-Byte
cpc ZH , temp
Gruß Michi
Ohja, das ist ein sehr kompliziertes Thema.
Les dir mal das Gespräch von gestern abend von Sebastian und mir durch. Das hier nochmal zu erklären bringt es glaube ich nicht. Wenn du dann noch fragen hast, dann kannst du sie immer noch stellen.
Gruß
Thomas
Ja denkst du was ich seit mehr als ner Stunde mache!!! *g*
Ich versuch es erstmal alleine hinzubekommen!
Gruß Michi
Ja, also ich finde, besser als es Sebastian mir erklärt hat, kann man es schon gar nicht mehr. Ich habs dabei verstanden und ich bin ja auch net der Schlauste ;)
Schaffste schon.
Gruß
Thomas
auf welcher Seite hier ist das? blick da nimmer so ganz durch! ich such gerade auf Seite 13/14 das ist aber von Samstag!
Gruß Michi
Auf Seite 20 in der Mitte fängt es an.
Gruß
Thomas
So, nun erstmal was essen.
Danke!! Da wird es besser erklärt als auf Seite 13/14!!
Gruß Michi
Hallo,
wie kann ich im Simulator schauen was in den egistern r16 und SREG passiert?
Gruß Michi
Wie du den Sumulator startest, weißt du?
Einfach auf den blauen Pfeil oben klicken oder Debug -> Start Debugging.
Dann brauchst du das Fenster "Workspace", wenn das noch nicht da ist, klicke auf View -> Workspace.
Hier siehst du oben die Register und SREG ist unter I/O Atmega8 (oder was du eben hast) -> CPU versteckt.
Gruß
Thomas
Hi,
des isch ja cool!!!
hab ne Frage:
bei diesen Zeilen:
ist ((tonleiter1 * 2) + daten_laenge) doch immer gleich, oder?Code:ldi tmp, LOW ((tonleiter1 * 2) + daten_laenge) ;vergleiche LOW-Byte
cp ZL, tmp
ldi tmp, HIGH ((tonleiter1 * 2) + daten_laenge) ;vergleiche HIGH-Byte cpc ZH, tmp
Gruß Michi
Ja, das ist eine oben festgelegte Konstante, also konstant, immer gleich!Zitat:
ist ((tonleiter1 * 2) + daten_laenge) doch immer gleich, oder?
Willst du wissen, ob:
((tonleiter1 * 2) + daten_laenge)
immer den gleichen Wert hat? Jo, dort ändert sich nichts. Es ändert sich immer nur das Z-Register, dass dann auf einen anderen Wert zeigt.
So, nun aber wirklich essen *g*
Gruß
Thomas
[edit]
Da war der Florian schneller ;)
danke danke!!
Ich glaube ich hab es verstanden!
Die Zeile:
ldi tmp, LOW ((tonleiter1 * 2) + daten_laenge) ;vergleiche LOW-Byte
und die Zeile:
ldi tmp, HIGH ((tonleiter1 * 2) + daten_laenge) ;vergleiche HIGH-Byte
sind nur dazu da das Register tmp wieder mit der Adresse des letzten Bytes von Daten zu füllen!
Und cp ZL, tmp und cpc ZH, tmp vergleichen die aktuelle Adresse mit der Endadresse wenn die gleich ist dann wird das Z Bit gesetzt und mit breq ende springt das Programm zu Ende! Ich hoffe meine Theorie stimmt so!
Gruß Michi
@Michi, ich freue mich, daß Du das verstanden hast, es wird langsam mit den 16 Bit Zahlen...
@Thomas, es freut mich auch, daß Du Dir selber Aufgaben ausdenkst, Übung macht den Meister, wie der Florian schon sagte.
Wie ist das mit dem Lauflicht ? wie lange muß es Raus aus der Steckdose sein?
Gruß Sebastian
@Sebastian: Das weiß ich ja eben nicht genau, hab nochmal genau untersucht. Also es kam auch vor, dass ich länger gewartet habe (halbe Minute) und das es dann trotzdem nicht ging, also die rote LED leuchtet dann einfach.
je länger ich warte, desto wahrscheinlicher ist es, dass es dann wieder funktioniert.
Denkst du, dass an meinem Board etwas kaputt ist?
Gruß
Thomas
Hi,
freut mich auch dass ich es verstanden habe!! Es was einfacher als ich dachte!! Stimmt das jetzt auch was ich da geschrieben habe? Was glaub ich mein Problem war: Ich dachte der Ausdruck (tonleiter1 * 2) wird von Byte zu Byte größer was ja eben falsch ist! Ich denk mal ihr benutzt den Ausdruck damit man später nur daten_laenge verändern und nicht überall im Code wo ldi tmp, LOW ((tonleiter1 * 2) + daten_laenge) und ldi tmp, HIGH ((tonleiter1 * 2) + daten_laenge) vorkommt! Assembler macht langsam echt Spaß! Damit lernt man echt was über den Controller! Und nicht solche Highlevel Befehle wie bei Bascom!
Gruß Michi
Hmmm, hört sich komisch an, ich hab mir das Myavr Board angeguckt, finde die Resetbeschaltung etwas komisch ohne Pullup Widerstand einfach an dem Parport....
oder habe ich da was an den Augen ?
Was ich tippe, daß da noch ein Kondensator geladen ist, und der Mega weiterhin läuft.
Ich würde mal folgendes versuchen:
1 Stück Draht und wenn der Stecker gezogen ist !!!!! einfach die zwei Anschlüße von C6
kurzschließen, vielleicht hilft das.
Aber ich übernehme keine Haftung, wenn was ist!
Aber glaub gar nicht, dass wir schon am Ende sind ;) So wie ich das sehe, gibt es noch sooooooooooo viele Befehle *g*
Gruß
Thomas
nein der Bleibt konstant, das einzigste was sich verändert ist der Z zeiger, aber nur nach adiw oder sbiw !Zitat:
freut mich auch dass ich es verstanden habe!! Es was einfacher als ich dachte!! Stimmt das jetzt auch was ich da geschrieben habe? Was glaub ich mein Problem war: Ich dachte der Ausdruck (tonleiter1 * 2) wird von Byte zu Byte größer was ja eben falsch ist!
Da hast Du recht, man muß sich aber vor den Augen halten, welche Leistung dieZitat:
Assembler macht langsam echt Spaß! Damit lernt man echt was über den Controller! Und nicht solche Highlevel Befehle wie bei Bascom!
Bascom Entwickler erbracht haben, damit aus einem Eizeiler, Maschinencode entsteht.
Es ist auch manchmal ganz nützlich über den Tellerrand zu schauen!
Gruß Sebastian
Ich hab bei PortC eh nur von 0 - 5. Wüsste also eh nicht, welche ich da genau verbinden soll. Ich denk, ich lass das lieber, nicht dass da wirklich noch was kaputt geht, dann wende ich mich lieber gleich an den Support, dann sind die wenigstens schuld und ich bekomm nen neues, falls es kaputt geht :lol:Zitat:
Zitat von izaseba
Kann man das denn vlt. irgendwie Softwaremäßig lösen?
Komisch ist ja auch, dass es nicht bei jedem Programm ist.
Gruß
Thomas
:-& ich meinte eigentlich Kondensator 6 und nicht PortC :-sZitat:
Ich hab bei PortC eh nur von 0 - 5
dann lass das wirklich lieber, und frag bei Myavr nach, ich schaue mir das Programm von Dir an.
P.S. bei einem Lauflicht sind die Befehle lsl register, lsr register, rol register, ror register, vielleicht noch swap register sehr nützlich, schade daß Du nur 3 LED's hast.
Schaue Dir die Befehle an und dann wirst Du sehen, wie einfach ein Lauflicht gemacht wird,
also sim an,ein register mal mit 10101010 beladen, und schauen was passiert, andere Werte auch ausprobieren !
Gruß Sebastian
Edit: achja und schön SREG und Carry dabei beobachten !!!
dann sagst Du uns hier was rol und ror machen :-)
Ok, hab grad ne mail an Support geschrieben, scheinen ja sehr nett zu sein :)
Mal schaun, was dann als Antwort kommt. Die Befehle hab ich ja noch nie gehört, werd sie mir gleich anschauen, muss also meine Ampel noch ein wenig warten ;)
Gruß
Thomas
Hey, die Befehle gefallen mir :)
Hab das nun auch gleich umgesetzt:
Funktioniert alles wunderbar. Mit diesem Code hab ich auch nicht mehr das Problem, dass ab und zu das Lauflicht nicht mehr geht. Ich kann das Netzteil an und ausschalten wie ich will, das Lauflicht geht immer.Code:;Dieses Programm produziert ein Lauflicht. Jede halbe Sekunde geht die
;nächste LED an.
;Das Programm läuft in einer Endlosschleife durch.
.include "m8def.inc"
.equ time1 = 65536-1800 ;Damit wird der Timer1 vorgeladen, für die halbe Sekunde
.def tmp = r16 ;Mein Universallregister
.def statusLED = r17 ;In diesem Register wird gespeichert, welche LED gerade leuchtet
.org 0x000
rjmp reset ;Interruptvektor "reset:"
.org OVF0addr
rjmp hSekEnde ;Interruptvektor für Timer0 Überlauf, hier springt
;das Programm hin, wenn der Timer überläuft
reset:
;Stack einrichten
ldi tmp, HIGH(RAMEND) ;HIGH-Byte der obersten RAM-Adresse
out SPH, tmp
ldi tmp, LOW(RAMEND) ;LOW-Byte der obersten RAM-Adresse
out SPL, tmp
ldi tmp, 0b11111111
out DDRB, tmp ;PortB als Ausgang
ldi statusLED, 0b00000010
out PORTB, statusLED ;Am Anfang soll LED1 leuchten
;Timer Register für halbe Sekunde werden belegt, hier Timer1
ldi tmp, (1<<CS12) | (1<<CS10) ;Prescaler ist 1024
out TCCR1B, tmp
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1/2 speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
ldi tmp, (1<<TOIE1) ;Hier werden Interrupts nach Timer1 Überlauf eingeschaltet
out TIMSK, tmp ;Register TIMSK ist dafür zuständig
sei ;Interrupts zulassen
main:
rjmp main ;Immer wieder die main durchlaufen
;Jede halbe Sekunde wird geprüft, welche LED an ist und dementsprechen die
;nächste LED angemacht. Die aktuelle wird dabei natürlich ausgeschaltet
hSekEnde:
push tmp ;tmp-Register auf Stack sichern
in tmp, SREG
push tmp ;SREG auf Stack sichern
;TIMER1 wird neu geladen
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1 Sekunde speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
cpi statusLED, 0b00001000 ;Leuchtet die 3. LED?
breq wiederholen ;Wenn JA...
lsl statusLED ;Wenn NEIN, Register "statusLED" mit 2 multiplizieren
;dadurch verschieben sich alle Bits um 1 nach link ->
;nächste LED blinkt
rjmp ende
wiederholen:
ldi statusLED, 0b00000010 ;Wieder erste LED leuchten lassen
ende:
out PORTB, statusLED ;nächste LED leuchtet
pop tmp
out SREG, tmp ;SREG wiederherstellen
pop tmp ;tmp wiederherstellen
reti ;springe wieder dahin, wo du hergekommen bist
Komisch naja...ich hab dem Support ja meinen Code mitgeschickt, vlt. ist ja daran doch was nicht in Ordnung. :-k
PS: Hab durch die neuen Befehle 8 Zeilen gespart :) Hört sich wenig an, aber bei Assembler muss man ja "sparsam" sein ;)
:-kZitat:
Assembler muss man ja "sparsam" sein
:-)
Nebenbei hast Du auch gelernt, wie man Multiplikation und Division durch zwei im Assembler
macht .
Ich schäme mich diese Frage zu stellen, aber wie bekomme ich ein 16 Bit Register definiert? Hier erstmal der Code, vlt. verstehst du es dann besser:
Diese beide Zeilen:Code:;Dieses Programm produziert ein Lauflicht. Jede halbe Sekunde geht die
;nächste LED an.
;Das Programm läuft in einer Endlosschleife durch.
.include "m8def.inc"
.equ time1 = 65536-1 ;Damit wird der Timer1 vorgeladen, für die halbe Sekunde
.def tmp = r16 ;Mein Universallregister
.def statusAmpel = r17 ;Hier wird gespeichert, welche Lampen grad leuchten
.def zeitwert = r18 ;Hier wird der Wert gespeichert, mit dem der Timer1 vorgeladen wird
.def lpm_reg = r0 ;Mein lpm-Register
.org 0x000
rjmp reset ;Interruptvektor "reset:"
.org OVF0addr
rjmp zeitum ;Interruptvektor für Timer0 Überlauf, hier springt
;das Programm hin, wenn der Timer überläuft
reset:
;Stack einrichten
ldi tmp, HIGH(RAMEND) ;HIGH-Byte der obersten RAM-Adresse
out SPH, tmp
ldi tmp, LOW(RAMEND) ;LOW-Byte der obersten RAM-Adresse
out SPL, tmp
ldi tmp, 0b11111111
out DDRB, tmp ;PortB als Ausgang
ldi statusAmpel, 0b00000010
out PORTB, statusAmpel ;Am Anfang LEDrot an
;Timer Register für halbe Sekunde werden belegt, hier Timer1
ldi tmp, (1<<CS12) | (1<<CS10) ;Prescaler ist 1024
out TCCR1B, tmp
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1/2 speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
ldi tmp, (1<<TOIE1) ;Hier werden Interrupts nach Timer1 Überlauf eingeschaltet
out TIMSK, tmp ;Register TIMSK ist dafür zuständig
;Z-Register mit DB "timerwerte" füllen
ldi ZH, HIGH(timerwerte * 2)
ldi ZL, LOW(timerwerte * 2)
sei ;Interrupts zulassen
main:
rjmp main ;Immer wieder die main durchlaufen
zeitum:
push tmp ;tmp auf Stack sichern
in tmp, SREG
push tmp ;SREG auf Stack sichern
cpi statusAmpel, 0b00000010 ;Ist rot an?
breq rotgelban ;JA -> gelb dazuschalten
cpi statusAmpel, 0b00000110 ;Ist rot UND gelb an?
breq gruenan ;JA -> grün anmachen
cpi statusAmpel, 0b00001000 ;Ist grün an?
breq gelban ;JA -> gelb anmachen
;Wenn alle drei Rechnungen != 0 ergeben, dann ist gelb an
rotan:
sbiw ZL, 1 ;nimm den vorherigen Wert aus der db (lange Zeit)
ldi statusAmpel, 0b00000010 ;rot an
rjmp ende
rotgelban:
adiw ZL, 1 ;nimm den nächsten Wert aus der db (kurze Zeit)
ldi statusAmpel, 0b00000110 ;rot und gelb an
rjmp ende
gruenan:
sbiw ZL, 1 ;nimm den vorherigen Wert aus der db (lange Zeit)
ldi statusAmpel, 0b00001000 ;grün an
rjmp ende
gelban:
adiw ZL, 1 ;nimm den nächsten Wert aus der db (kurze Zeit)
ldi statusAmpel, 0b00000100 ;gelb an
ende:
lpm ;Wert aus der db in r0 schreiben
mov zeitwert, lpm_reg ;den aktuellen Zeitwert aus r0 lesen
;TIMER1 wird neu geladen
ldi tmp, HIGH(time1) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(time1) ;für die 1 Sekunde speichern ->
out TCNT1L, tmp ;"TCNT1H" und TCNT2L"
out PORTB, statusAmpel ;Ampel richtig umschalten
pop tmp ;SREG vom Stack holen
out SREG, tmp
pop tmp ;tmp vom Stack holen
reti ;spring dahin zurück, wo du hergekommen bist
timerwerte:
.db 65536-7200, 65536-1800
muss ich noch ändern. Anstelle von time1 muss zeitwert rein, aber da zeitwert kein 16Bit Register ist, gibts Probleme.Zitat:
ldi tmp, HIGH(time1)
ldi tmp, LOW(time1)
Bitte nicht hauen :( *gg*
Ich weiß ja, dass ich für ein 16 Bit Register 2 8 Bit Register brauche, weiß aber leider nicht, wie ich die miteinander verbinde und vor allem, wie ich dann dort eine 16 Bit Zahl einlese. Geht sicher nicht so einfach wie mit dem Timer1, oder?
Gruß
Thomas
Hi Leute,
bin bald auf dem aktuellen Stand *freu* wisst ihr dass dieser Thread bei der Statistik auf Platz 1 ist!!
[schild=11 fontcolor=000000 shadowcolor=C0C0C0 shieldshadow=1]Glückwunsch[/schild]
bis jetzt hab ich alles verstanden!! *freu*
Gruß Michi
Hallo Thomas,
ich weiß daß es schwer ist Tutorials zu lesen, aber Du hast Dir den Tutorial von
www.avr-asm-tutorial.net nicht angetan!
Lese Dir Aufmerksam Kapitel Register/Pointerregister durch.
Und gib acht was dort zu .db und .dw steht.
Gruß Sebastian
Edit:
@Michi, Ich freue mich, daß Du auch gut vorankommst!
Wenn ich eben fragen darf, welches Board benutzt Du ?
Ich krieg das nicht hin :(
Ich muss doch die Register r24 und r25 benutzen, oder?
Aber ich weiß nicht, wie ich das verwenden soll.Zitat:
Anwendbar sind die beiden Befehle auf die Registerpaare X, Y und Z sowie auf das Doppelregister R24/R25, das keinen eigenen Namen hat und auch keinen Zugriff auf RAM- oder sonstige Speicher ermöglicht. Es kann als 16-Bit-Wert optimal verwendet werden.
Das funktioniert ja nicht.Code:.def zeitwertL = r24
.def zeitwertH = r25
[....]
lpm ;Wert aus der db in r0 schreiben
mov zeitwertL, lpm_reg ;den aktuellen Zeitwert aus r0 lesen
mov zeitwertH, lpm_reg
;TIMER1 wird neu geladen
ldi tmp, HIGH(zeitwertH) ;Für den Timer1 (16Bit) benötigen
out TCNT1H, tmp ;wir 2 Register, in denen wir den Wert
ldi tmp, LOW(zeitwertL) ;für die 1 Sekunde speichern ->
out TCNT1L, tmp
Es ist doch richtig, dass lpm_reg, also r0, ein 16 Bit Register ist, oder? Also das in r0 eine 16 Bit-Zahl gespeichert ist. Mit meinen zwei "mov"-Befehlen bewirke ich da relativ wenig befürchte ich. Das kann doch nicht so schwer sein ](*,)
Thomas #-o
Zitat:
Ich muss doch die Register r24 und r25 benutzen, oder?
Muß ich noch was dazusagen ?Zitat:
Doppelregister R24/R25, das keinen eigenen Namen hat und auch keinen Zugriff auf RAM- oder sonstige Speicher ermöglicht.
#-o #-oZitat:
Es ist doch richtig, dass lpm_reg, also r0, ein 16 Bit Register ist, oder
Lese Tutorial Register/was?
#-o #-oZitat:
Also das in r0 eine 16 Bit-Zahl gespeichert ist
Wer hat Dir das gesagt ?
:-k :-k ich habe es gehofft, aber scheinbar ist es so.Zitat:
Das kann doch nicht so schwer sein
Ich dachte, weil in r0 immer der aktuelle Wert aus der db steht, und da stehen ja nun 16 Bit Werte drinne.Zitat:
#-o #-oZitat:
Also das in r0 eine 16 Bit-Zahl gespeichert ist
Wer hat Dir das gesagt ?
:(
Das heißt, ich brauche einen zweiten Pointer-Register? Aber denn kann ich ja dann auch nicht mit r0 füllen, wenn in r0 anscheinend schon das falsche steht :(
Und wer hat Dir das gesagt ?Zitat:
und da stehen ja nun 16 Bit Werte drinne.
Wozu einen Zweiten Pointerregister ?Zitat:
Das heißt, ich brauche einen zweiten Pointer-Register?
zu Deinem Vorhaben, ich habe Dir schon gesagt, Schaue im tutorial nach .db und .dw
vergess den Quatsch mit R24 u. R25 und zweitem Pointerregister,
Ich helfe Dir diesmal nicht, da kommst Du selber drauf, sonst lernst Du das nie...
Das Tutorial beinhaltet Antworten auf alle Deine Fragen.
Gruß Sebastian
:( Ich schaffs leider wirklich nicht.
Nehmen wir mal das hier:
In zeitwert steht dann 227, obwohl da eigentlich 61936 (65536-3600) stehen müsste.Code:lpm
mov zeitwert, lpm_reg
Hab jetzt rausgefunden, dass ich anstelle von db dw nehmen muss. Denn nur mit dw kann man Werte über 8Bit speichern (stimmt das denn wenigstens?)Code:timerwerte:
.dw 65536-7200, 65536-3600
Aber wie ich diese eben auslesen kann, wird aus dem Tutorial nicht wirklich klar.
Ich kann anstelle von dem hier:
hinschreiben, was ich will, nichts geht.Code:ldi tmp, HIGH(HIGH (timerwerte * 2))
out TCNT1H, tmp
ldi tmp, LOW(LOW (timerwerte * 2))
out TCNT1L, tmp
Ich weiß, dass ich "HIGH(timerwerte * 2))" in beiden Zeilen durch etwas ersetzen muss. Eigentlich durch einen 16 Bit Register, oder? Aber ich hab ja keinen außer dem Z-Register.
Und das hier geht ja nicht:
Mir wäre es doch auch lieber, wenn du mir dabei nicht hilfst, aber ich weiß nimmer, was ich da noch ändern soll.Code:ldi tmp, HIGH(ZH)
Gruß
Thomas
Thomas, Du tust mir wirlich leid, ich weiß nicht, wie ich dir das sonst erklären kann :frown:
Schade, daß Du soweit wohnst sonst würde ich Dich einladen und wir könnten das in ruhe durchgehen O:)
Schau mal hier
Es kann in einem Register nicht 61936 stehen!, das habe ich Dir doch gestern gesagt, ALLEZitat:
In zeitwert steht dann 227, obwohl da eigentlich 61936 (65536-3600) stehen müsste.
Register beinhalten 8 Bits
16 Bit stehen ja in zwei Registern!
wenn Du Deine 61936 auslesen willst mußt Du dein ZPointer auf die erste adresse einstellen also z.B.
daten:
.dw 61936
ldi ZH,HIGH(daten *2)
ldi ZL,LOW(daten *2)
jetzt kommt ein lpm
und was steht im Tutorial ?
und was steht im R0 ?Zitat:
.DW 12345,6789 ; zwei Worte
......
Beim Lesen per LPM erscheint übrigens das niedrigere Byte der 16-Bit-Zahl zuerst!
das niedrigere Byte der 16-Bit-Zahl
also das low Byte von daten (hier von 61936 weil der ZPointer auf sie zeigt)
wenn Du sie jetzt verschiebst nach z.B. zahlLOW(von mir unbenanter Register)
hast Du die hälfte schon drin.
jetzt adiw ZL,1
hiermit gehen wir im .dw ein Byte weiter... jetzt zeigt der Zpointer auf die andere hälfte der Zahl
und was steht dann im R0 nach einem lpm ? das HighByte von daten also von 61936
das kannst Du auch von mir aus nach zahlHIGH schieben und dann hast Du Deine 16Bit Zahl aus dem Speicher ausgelesen.... sollte im .dw noch ein Komma stehen und eine zweite Zahl wirst Du wohl nach einem erneutem adiw ZL,1 wohl bei dieser Zahl landen und der Vorgang widerholt sich , genau so bei einer dritten fünften... 1000 Zahl .
Du mußt Dir in klarem sein, daß es keine 16 Bit Register gibt!! auch der ZPointer ist kein 16 Bit Register, es ist ein Registergespann ZL und ZH also 2 Register.
Edit:
WICHTIG !
Auszug aus dem Dattenblatt Seite 77:
Muß man unbedingt beachten, sonst kommt dabei nur mißt raus!Zitat:
To do a 16-bit write, the High Byte must be written before the Low Byte.
For a 16-bit read, the Low Byte must be read before the High Byte
Ich hoffe, daß es jetzt verstanden wurde :-k
Spiel das im sim durch, gucke, wo der Zeiger hinzeigt, was er ausliest, und soweiter,
es wird schwer sein die 16 Bits zu zerschlagen, mach das genauso wie ich dir das gestern gesagt habe, wandle eine 16Bit zahl (die Du im .dw stehen hast)in binär um mache schnitt damit Du 2x 8 Bit hast rechne aus was das für dezimale werte sind,
und beobachte, was er Dir mit lpm in den R0 lädt, aber bedenke Low zuerst!
Gute Nacht[/quote]
Das wär natürlich das Highlight :)Zitat:
Schade, daß Du soweit wohnst sonst würde ich Dich einladen und wir könnten das in ruhe durchgehen
Aber ich denk, nun hab ich das verstanden. Mit ein wenig Routine noch bekomm ich das schon auf die Reihe *zuversichtlich sei*
Nun liest er die Werte wenigstens schonmal aus (glaub ich zumindest).
Aber die Zeitabstände stimmen noch nicht so ganz, muss ich dann nochml am Tage schauen, ich werd nu auch erstmal ins Bett gehen.
Danke schonmal :)
Hätts sonst wirklich nicht hinbekommen :(
Gruß und Gute Nacht
Thomas