2 Bytes zu word zusammenfassen ?

[dl1akp]

Hallo,

ich habe den 10bit Wert des ADC in eine word-Variable geschrieben und mit HIGH und LOW in die beiden Bytes geteilt. dann das ganze in EEPROM zwischen gespeichert.

Nun lese ich die beiden Bytes wieder aus.
Aber wie kann ich daraus wieder ein Word machen??

Kann mir da mal jemand einen Tip geben?

Vielen Dank im Voraus
dl1akp

[Rofo88]

Dim A As Byte , B As Byte
Dim X As Word



X = A * 256
X = X + B

[python_rocks]

Nun lese ich die beiden Bytes wieder aus.
Aber wie kann ich daraus wieder ein Word machen??

Hallo dl1akp!

Dim my_word as Word at $60
Dim b1 as Byte at $60 OVERLAY
Dim b2 as Byte at $61 OVERLAY

B1 = 255
B2 = 255

Print My_word       '65535

mfg
Gerold
:-)

[Rofo88]

und so gehts nach python_rocks-Methode aber ohne direkte Adressierung

Dim My_word As Word
Dim B1 As Byte At My_word Overlay
Dim B2 As Byte At My_word + 1 Overlay

[python_rocks]

At My_word + 1 Overlay

Hallo Rofo88!

So etwas habe ich immer schon gesucht. Danke! :-)

mfg
Gerold
:-)

[MeckPommER]

Das geht? Cool !! THX!!!

Muss ich mir merken, erleichtert einem doch einiges beim Zahlenschubsen.

Gruß MeckPommER

[DerMaddin]

Hi Jungs,

noch besser ist es, Bitoperationen zu benutzen. Die gehen sogar noch schneller als Addition und natürlich viel schneller als Multiplikation :-D

Result = (Highbyte << | LowByte;

Mfg, der Maddin

[DerMaddin]

oohh.... kann man sich vor Smilies schützen?
Hier nochmal ohne Smilie:

Result = ( Highbyte << 8 ) | LowByte;

[Rofo88]

Ob das Bascom so mitmacht...und mit Overlay gehts ganz ohne Rechnen und Schieben

[DerMaddin]

Das geht in Bascom nicht? Ja, ich bin C Progger. Aber ... wenn Bascom DAS nicht kann..... böööh.... dann nehmts nich
Dann natürlich sry für den Spam