Miten siis onnistuu simppelisti 16-bit binääri jonon konevertointi desimaaliksi.
Esim1.
Input=0100000000000000
Output=2
Esim2.
Input=0000000000000001
Output=32768
Miten tämä onnistuu helpolla VB6:ssä?
Binäärin konvertointi decimaaliksi
Häviäjä
8
669
Vastaukset
- le coder
http://forums.aspfree.com/asp-free-lounge-32/vbulletin-permissions-92428.html
etsi tuolta BinaryToInt. Oletan että tuo input on stringi. Muutenhan siinä ei ole järkeä
Noissa esimerkeissäsi on binaari väärin päin:
Esim esim2:
0000000000000001 on 1 eikä 32768
Ellei siten kyseessä ole jokin sairas systeemi jossa bitit on väärin päin.- Häviäjä
Tiedän kyllä, että ensimmäinen bitti kuuluu olla normaalisti vasemmalla, mutta tähän systeemiin on ilmeisesti käännetty bitit enemmän ihmisen luettavaan muotoon eli eka bitti on vasemmalla.
Mutta sillä nyt ei ole tässä merkitystä, kunhan saan tuon konversion aikaan oikein joka tapaukseesa. - häviäjä toden totta
Häviäjä kirjoitti:
Tiedän kyllä, että ensimmäinen bitti kuuluu olla normaalisti vasemmalla, mutta tähän systeemiin on ilmeisesti käännetty bitit enemmän ihmisen luettavaan muotoon eli eka bitti on vasemmalla.
Mutta sillä nyt ei ole tässä merkitystä, kunhan saan tuon konversion aikaan oikein joka tapaukseesa.vb onkin täydellinen valinta häviäjille
- Häviäjö
häviäjä toden totta kirjoitti:
vb onkin täydellinen valinta häviäjille
Niin otsikko kertoo kaiken
- le coder
Häviäjä kirjoitti:
Tiedän kyllä, että ensimmäinen bitti kuuluu olla normaalisti vasemmalla, mutta tähän systeemiin on ilmeisesti käännetty bitit enemmän ihmisen luettavaan muotoon eli eka bitti on vasemmalla.
Mutta sillä nyt ei ole tässä merkitystä, kunhan saan tuon konversion aikaan oikein joka tapaukseesa.No ellei kyseessä ole persialainen tai Hebrew:n kieleinen systeemi jossa kirjoitetaan oikealta vasemalle, en tuota ymmärrä. tai sitten jollakulla on mennyt endianess käsitys sekaisin (sehän ei tarkoita bittejä vaan tavuja).
Neuvoisin vielä tarkistamaan tavujärjästyksen. - dfgthjukl
häviäjä toden totta kirjoitti:
vb onkin täydellinen valinta häviäjille
Osaatkohan ainuttakaan kieltä.
- kooklella
Yllättäen googlella löytyi seuraava:
http://www.devx.com/vb2themax/Tip/18959
Pitää vaan muutella lukeminen toisessa järjestyksessä.- xxxxx
Ilmeisesti voidaan olettaa kyseessä olevan binääriluku, joten ei tarvitse käsitellä kuin nollia ja ykkösiä.
Näin tekisin sen itse:
For i=1 to len(BinääriLuku$)
DesLuku=DesLuku val(mid$(BinääriLuku$,i,1))*2^(i-1)
next i
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Porvarimedia: Räsänen vei Lindtmanilta pääministerin paikan
Lisäksi suomalaiset ovat innostuneet tuhlaaman, koska kuluttavat inflaation verran enemmän rahaa. Eikö porvarimedialla572794Ruotsi laskee jälleen bensaveroa, Riikka irvailee tumput suorana
Euron bensa oli persujen vaalilupaus, mutta kohta alkaa olla kolmosella alkavia litrahintoja. Meanwhile in Sverige: "362409SE TAPAHTUI - Pekka Aittakumpu: Avioero
Perussuomalaisten kansanedusta Pekka Aittakumpu käy parhaillaan avioero prosessia. Aittakumpu on siviiliammatiltaan past911667Anita ei saanut Heikkiä pihalle
Kemijärven kaupunginvaltuusto ei tehnyt tietoisesti laitonta päätöstä. Heikki johtaa kaupunginhallitusta yhäkin.851295Martina Aitolehden rinnalla nähty Matias Petäistö yllättää - Uusi aluevaltaus TV:ssä!
Matias Petäistö on tuttu Erikoisjoukot-realityn tiukkana kouluttajana. Hän on myös tuttu näky Martina Aitolehden parina,301129Emotionalisuuden puute.
Joillain ihmisillä ei vain ole sitä "jotain". Heille kaikki täytyisi "vääntää" rautalangasta. Mutta heistä ei vaan o155821Sait mut mies heikoksi
Yllätti tämä asia nyt kyllä. Olet ollut mielessä koko ajan. Ei riitä pelkkä kevät nyt syyksi. Veit jalat alta. Pannaan m80754Ei ole vaikea päättää kumpi
Hän on vaimomateriaalia. Sinä olet vain tuollainen pieni kiusankappale.. Revi siitä.52696Ymmärrätkö jo nyt, että
Vetäytyminen ei kannattanut? Asioista pitäis puhua rauhassa hyvässä hengessä eikä lakasta maton alle. Yhdeltä ihanalt44672- 43655