BCD Stelle verdreht

OP #3147246
Lesenswert?

Hallo!

Hab da ein Problem mit der Auflösung eines Bytes in einen BCD Code.

Ich möchte eine Zweistellige anzeige ein Byte anzeigen. Also z.B. 12,
Stelle 1 = 1, Stelle 2 = 2. Das Problem ist, dass die Zahlen immer 
verdreht dargestellt werden. Also nicht 12, sondern 21.

Habe dafür in Bascom nachstehendes Programm geschrieben:


Dim Stelle1 As Byte
Dim Stellex As Byte

BCDZahla, b, c, d, sind die Ausgänge die auf das Treiber IC gehne
an Stellea und b sind die Anzeigen Angeschlossen.

do


Stellex = Makebcd(stelle1)

Bcdzahla = Stellex.0
Bcdzahlb = Stellex.1
Bcdzahlc = Stellex.2
Bcdzahld = Stellex.3

Stellea = 1
stelleb = 0

Bcdzahla = Stellex.4
Bcdzahlb = Stellex.5
Bcdzahlc = Stellex.6
Bcdzahld = Stellex.7

Stellea = 0
stelleb = 1




loop
end


Ich hoffe hab jetzt nicht wichtiges im Programm weg gelassen.

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren