Schieberegister programmieren ?

Hallo Leute !

Ihr hattet mir mal vor einiger Zeit (1-2 Jahre) den Tipp gegeben, ein Schieberegister als I/O-Lösung zu nehmen, um mit
weniger Leitungen am Userport mehr rauszuholen, also seriell statt parallel. Nun ist es bei mir konkret und ich frage mich,
wie ich das programmieren müsste ? Ich habe mich für 74595 IC's entschieden. Hier benötige ich ja 3 Leitungen, um das
technisch umzusetzten. Jetzt meine Frage :

wie stelle ich es in Basic (ich kann leider nur Basic) an, einen 8-Bit Zustand (also das was das IC später ausgeben soll)
in den IC einzuschreiben ? Wie drösele ich das auf ? Beispiel : der Ausgang soll 01100001 (134) ausgeben. Die "134" muss
ich ja nun vom 8-Bit-Ausdruck in eine serielle Folge zerlegen ? Wie mache ich das im Programm ?

LG
Cat

Quote from oneBitman

den wert, in dem fall jetztmal 134 würd ich auf alle bits prüfen und die dann verwenden.

also zb. zuerst mal

Hi !

Genau darum geht es mir - den Wert "X", der evtl auch irgendwo eingelesen wird, umwandeln in eine serielle Folge aus 8 Bit...
Die Chip-Programmierung mal aussen vor. Das löse ich irgenwie unabhängig - soweit möglich.
Gibt es eine generelle Formel ein 8-Bit Wort in eine 8-Bit (serielle) Folge zu wandeln ?

LG
Cat

Ok !

Das klingt gut...
Ich werde mal ein bisschen rumtüffteln und probieren.

Danke erstmal...!

üüüääähhh...ich blicke noch nicht durch :

Was meinst du genau mit "rem adresse der gespeicherten Zahl"

Sorry. Stehe etwas auf dem Schlauch...!?

Also z.B. der Wert ist 134, der an den Ausgang des Schiebers als paralleler Wert wieder an den Ausgängen 0-7
zur verfügung stehen soll, aber seriell rein soll -wie sieht Dein Terminus dann aus , wenn der Ausgang z.B.
Userport Leitung PB0 wäre , also Adresse 56577,1 (PB0=1) oder Bit 0 in Adresse 56577 auf "ON", der die Einzel-
bits in den Schieber schreiben soll...? Ich verstehe "poke adresse,zahl" in Zeile 0 nicht so richtig...

LG
Cat

Ich nehme nochmal die 134 als Wert, schreibe diesen Wert in die Variable W.

Dann also so :

10 W=134
20 a= 1
30 for b = 1 to 8
40 poke 56577,peek(W) and a
50 a = a + a
60 next b

Oder ?

Quote from oneBitman

poke 49152,WERT

hmmm, das kenne ich so nicht.
Kann ich das einfach in die Adresse schreiben ?
Ich würde ja in meinem Fall sowieso auch den Eingang auslesen

Z.B. so : EIN = PEEK (56577) und hätte ja somit den Wert eh in der Variablen "EIN"
stehen und kann so ja auch PEEK(EIN) verarbeiten , oder ?

Ok wusste ich (nicht mehr) mit der Adresse 49152- aber ich erinnere mich, dass man früher,
wenn man den Zeichensatz verändert hat , dort auch den alten hin verschoben hat (oder so)
um dann den neuen "auf zu setzen"...ok.

Aber wieso kann ich den Wert, den ich mit Peek in die Variable EIN lese nicht speichern ?
Er steht doch in der Variablen EIN (oder jeder beliebigen) zur verfügung ? Wenn dann alles
in den Schieber geschrieben ist, kann der Wert der Variablen ruhig wieder verschwinden ,
tut er ja eh, weil dann wieder ausgelesen wird...Ich brauch den Wert ja nur für 1 Zyklus...

Quote from CotS

10 W=134
20 a= 1
30 for b = 1 to 8
40 ? peek(W) and a
50 a = a + a
60 next b

Ich habe es mal so in Vice eingegeben und raus kommt

0
0
0
0
16
32
0
0

keine Ahnung ob das hinhaut ? Das wäre ja 48 ?

Ahhhhh.... moment !!!

ready.
list

10 poke 49152,134
20 a= 1
30 for b = 1 to 8
40 print peek(49152)and a
50 a = a*2
60 next b
ready.
run
0
2
4
0
0
0
0
128

Sieh an - habe es verstanden !!

Quote from oneBitman

aber du kannst nicht von 56577 lesen (peek) und dann dort wieder hinpoken

Natürlich nicht, ohne vorher Datenrichtung von Eingabe auf Ausgabe zu Poken , also 56579,255, usw...
Aber darum, was dazwisch passiert geht es auch nicht. Jetzt habe ich es erstmal so , das ich die Zahl "X" in Ihre einzelnen Bits
zerlegt habe...was mir noch nicht klar ist, wie man jetzt das in Form von "01100001" in den Schieber bekommt...Da wäre jetzt ja
noch ein Routine nötig , die das umwandelt - also wieder so wie am anfang " IF "Variable">0 THEN "Ausgangsleitung an"--->nächstes Bit--->usw.
Wobei "Variable" dann Als Variable aus Teil eins beispielhaft dienen soll...Also eigentlich IF PEEK (49152) AND A >0 THEN "Ausgangsleitung an...",
setzt ein Bit am Schieber, usw...um bei den Werten und Variablen von grade zu bleiben

Quote from cbmhardware

Nein. Es sollen doch 1,2,4,8 ... usw. getestet werden. Spätestens bei Bit 2 wäre bei Multiplikation der Fehler drin. 4x4 ist 16 , also wird niemals 8 (Bit 3) getestet und so fort ...

Sorry, hatte mich vertipp (copy/paste)... da war das A=A*2 reingerutscht...Sollte mit A=A+A laufen...
In Vice klappts...

LG
Cat

Aber A=A+A sollte doch identisch mit A=A*2 sein...

ADD AX,AX ist ja ebenfalls identisch mit SHL AX,1

1. A=1+1 / A=1*2
2. A=2+2 / A=2*2
3. A=4+4 / A=4*2
4. A=8+8 / A= 8*2
5. A=16+16 / A=16*2
.
.
.
.

EDIT: Mist zu langsam