Probleme mit Shiftout

[for_ro]

Mosi Alias Porta.0
...
Mosi = Daten

Hallo Flo,
mit diesen Befehlen schickst du nicht den Inhalt der Variable "Daten" seriell auf den Ausgang PortA.0, sondern der Porta.0 wird auf Daten.0 gesetzt.
Du schreibst im Titel, dass du Probleme mit Shiftout hast, benutzt es aber nicht. Warum?

[rauf81]

Oh mein Fehler.
Programm Nr Zwei sollte natürlich so aussehen:

$regfile = "m16def.dat"
$crystal = 16000000

Ddra = &B11111111

Mosi Alias Porta.0
Sck Alias Porta.1
Ss Alias Porta.2

Dim Daten As Byte



Daten = &B01010101

Do

Shiftout Mosi , Sck , Daten
Set Ss
Reset Ss

Loop


End

Sorry

Also wenn ich das aufspiele dann sollte doch jedes zweite LED an sein.
Es blinkt aber nur QA also die erste LED.

Grüße Flo

[rauf81]

OK

Ich habe das Problem gelöst.

SCLR noch auf VCC gelegt und nun geht es.

Grüße Flo

[rauf81]

Was ich aber noch nicht verstehe:

Also ich schiebe &B00000001 in Schieberegister LED 1 leuchtet.
Dann &B00000010 Sollte doch LED 2 leuchten ?? aber es leuchtet LED 1

Warum ist das so und wie kann ich den Fehler beheben...

Grüße Flo