Binär => Integer

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

Hubsi

Betreff: Binär => Integer

BeitragFr, Jan 02, 2004 13:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo zusammen.

Folgendes Problem: Ich möchte einen binären Wert (gespeichert in einer String-Variable) zu einem Integer wandeln. Jetzt hab ich ein wenig rumgespielt und das einzige was bisher funktioniert hat, ist das:
Code: [AUSKLAPPEN]
wert=%00110100

Nun habe ich diesen binären Wert aber in einem String und damit gehts nicht Sad
Kennt jemand eine Lösung?
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

Jan_

Ehemaliger Admin

BeitragFr, Jan 02, 2004 13:38
Antworten mit Zitat
Benutzer-Profile anzeigen
mit mid und chr?

mid einen einzellnen Buchstaben raus nehmen und dann mit Chr bestimmen ob 1-0 und dann selber ausrechnen

so, was anderes fällt mir nicht ein!
between angels and insects

Xenon

BeitragFr, Jan 02, 2004 13:46
Antworten mit Zitat
Benutzer-Profile anzeigen
hab weil mir fad war die Funktion geschrieben, mit Beispiel

Code: [AUSKLAPPEN]
a = %10100101101001
b = BinStrToInt("10100101101001")

Print a
Print b
WaitKey
End


End


Function BinStrToInt(binstr$)
   Local a=0
   Local l = Len(binstr$)
   For i=0 To l-1
      a = a + (2^i)*Int(Mid(binstr$, l-i, 1))
   Next
   Return a
End Function

Hubsi

BeitragFr, Jan 02, 2004 17:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Das geht ja super! Vielen, vielen Dank Very Happy Ein Eintrag in die Credits ist Dir sicher Wink
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group