Bytes aus einem Array in eine Word-Variable

Zitat:

---

Zitat von robby-fant

stringzahl1=CHR(var) 'var ist der ascii-code-wert eines buchstaben(zahl "1" zb ist auch ein buchstabe), ascii-tabelle mit google suchen,stringzahl1 ist ein string der länge 1 (ohne returnzeichen usw).

gesamtstring=stringzahl1 + stringzahl2...

wordwert=val(gesamtstring)

---

Viele Wege führen nach Rom....
(Mein Weg ist schöner erklärt und auch in andere Basic Versionen portierbar)

Du musst bedenken nur kurze Fetzen sind nicht besonders Hilfreich, mach doch (nicht für mich) einen leserlichen Code draus.
Dann können auch andere Progrmmieranfänger dies besser vestehen

Darwin, so ganz leer kann xString ja nicht sein:

Dim Xstring As String * 20
Dim Xbyte(21) As Byte At Xstring Overlay

wenn ich etwas ins Array schreibe, müsste das doch auch im String liegen, oder habe ich da nen Denkfehler ??

Daniel

Zitat:

---

Zitat von Larek

Darwin, so ganz leer kann xString ja nicht sein:

Dim Xstring As String * 20
Dim Xbyte(21) As Byte At Xstring Overlay

wenn ich etwas ins Array schreibe, müsste das doch auch im String liegen, oder habe ich da nen Denkfehler ??

Daniel

---

Schau doch mal nach was mit "PRINT Xstring" rauskommt....
Real am Prozessor nicht im Simulator, also eine RS232 Verbindung mit Terminal muss es schon sein, dann kannst Du mit gewissheit sagen was drin steht.

Mit Overlay' s habe ich noch nicht gearbeitet.
Könnte es sein dass im Overlay nur die Adresse des Strings drin steht und nicht der String an sich?

...

Ich hab grad mal in der Anleitung nachgelesen, Scheint tatsächlich so zu sein, wenn Du mit Overlay arbeitest, dann wird hiermit die Adresse bzw. die Speicherzelle definiert nicht die Variable an sich.

Ist was für RUNAWAY (Fortgeschrittene) Programmierung :-b


Auf jeden Fall so wie Du das da machen willst klappt es nicht (so wie duc dachtest).

Schau Dir mal die DIM Syntax an und die Beispiele dazu.

Zitat:

---

..wenn ich etwas ins Array schreibe, müsste das doch auch im String liegen, ..

---

Das ist korrekt. Auf diese Weise kann man am besten byte-weise beliebige andere Feldtypen verschicken und empfangen

Variante string byteweise lesen:

Code:

---

DIM mystring as string * 20

DIM adr as word
DIM einbyte as byte
  mystring = "Hello, world"
  adr = varptr(mystring)
  do Loop
    einbyte = INP(adr)
    if einbyte = 0 then exit do
    print chr(einbyte);
    incr adr
  next
  print

---

Schreiben geht ähnlich mit "OUT" (-->Help)

Vorteil: du mußt nicht alle Felder doppelt definieren

Leute, mancht den Jungen doch nicht verrückt mit Dingen, die ihr kaum versteht.
Erwollte ganz einfach 5Byte als eine Zahlenreihe in Word umwandeln.