www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 

Bascom pretvorba iz Word v zaporedje bitov

 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Zabavna elektronika
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
Makaron
Član
Član



Pridružen-a: Sob 21 Jan 2006 20:12
Prispevkov: 25
Aktiv.: 0.11

PrispevekObjavljeno: Sre Dec 15, 2010 10:23 am    Naslov sporočila:  Bascom pretvorba iz Word v zaporedje bitov Odgovori s citatom

Kako v Bascomu najenostavneje pretvoriti spremenljivko word, v kateri je neko decimalno število (npr.500) v zaporedje bitov, torej v več posameznih bitnih spremenljivk ali pa polje bitov.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
rudiP
Član
Član



Pridružen-a: Tor 07 Avg 2007 15:30
Prispevkov: 1235
Aktiv.: 5.67
Kraj: KOPER

PrispevekObjavljeno: Sre Dec 15, 2010 10:38 am    Naslov sporočila:   Odgovori s citatom

deklariraš tako in imaš vse na razpolago !

dim a as word
dim b(2) as byte at a overlay

_________________
Lep pozdrav iz Kopra Rudi
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Makaron
Član
Član



Pridružen-a: Sob 21 Jan 2006 20:12
Prispevkov: 25
Aktiv.: 0.11

PrispevekObjavljeno: Sre Dec 15, 2010 10:45 am    Naslov sporočila:   Odgovori s citatom

Hvala za odgovor. Bi lahko mogoče malo pojasnil pomen tega drugega stavka?
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Makaron
Član
Član



Pridružen-a: Sob 21 Jan 2006 20:12
Prispevkov: 25
Aktiv.: 0.11

PrispevekObjavljeno: Sre Dec 15, 2010 11:29 am    Naslov sporočila:   Odgovori s citatom

Zakaj imajo bitne spremenljivke v naslednji kodi vrednost 0?

Dim Adrpm As Word
Adrpm = 600

Dim Bit1 As Bit At Adrpm Overlay 'MSB of Byte1
Dim Bit2 As Bit At Adrpm Overlay
Dim Bit3 As Bit At Adrpm Overlay
Dim Bit4 As Bit At Adrpm Overlay
Dim Bit5 As Bit At Adrpm Overlay
Dim Bit6 As Bit At Adrpm Overlay
Dim Bit7 As Bit At Adrpm Overlay
Dim Bit8 As Bit At Adrpm Overlay
Dim Bit9 As Bit At Adrpm Overlay
Dim Bit10 As Bit At Adrpm Overlay
Dim Bit11 As Bit At Adrpm Overlay
Dim Bit12 As Bit At Adrpm Overlay
Dim Bit13 As Bit At Adrpm Overlay
Dim Bit14 As Bit At Adrpm Overlay
Dim Bit15 As Bit At Adrpm Overlay
Dim Bit16 As Bit At Adrpm Overlay 'LSB of Byte1
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
rudiP
Član
Član



Pridružen-a: Tor 07 Avg 2007 15:30
Prispevkov: 1235
Aktiv.: 5.67
Kraj: KOPER

PrispevekObjavljeno: Sre Dec 15, 2010 7:31 pm    Naslov sporočila:   Odgovori s citatom

Napiši malo več kaj želiš početi z biti tega word-a.
_________________
Lep pozdrav iz Kopra Rudi
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Vlado
Član
Član



Pridružen-a: Sre 03 Mar 2004 21:35
Prispevkov: 563
Aktiv.: 2.37
Kraj: Ljubljana

PrispevekObjavljeno: Čet Dec 16, 2010 10:35 am    Naslov sporočila:   Odgovori s citatom

Citiram:
Zakaj imajo bitne spremenljivke v naslednji kodi vrednost 0?

Dim Adrpm As Word
Adrpm = 600

Dim Bit1 As Bit At Adrpm Overlay 'MSB of Byte1
Dim Bit2 As Bit At Adrpm Overlay
Dim Bit3 As Bit At Adrpm Overlay


Pravilno bi bilo:
Dim Bit1 As Bit At Adrpm.1 Overlay
. . . .
. . . .

Pa prvi bit začneš z ničlo in ne z enko, ali pa :
Dim Bit1 As Bit At Adrpm.0 overlay

Vlado
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
vilko
Član
Član



Pridružen-a: Pet 13 Feb 2004 10:26
Prispevkov: 3362
Aktiv.: 14.18
Kraj: Dragomer

PrispevekObjavljeno: Čet Dec 16, 2010 2:58 pm    Naslov sporočila:   Odgovori s citatom

Makaron je napisal/a:
Zakaj imajo bitne spremenljivke v naslednji kodi vrednost 0?

Dim Adrpm As Word
Adrpm = 600

Dim Bit1 As Bit At Adrpm Overlay 'MSB of Byte1
Dim Bit2 As Bit At Adrpm Overlay
Dim Bit3 As Bit At Adrpm Overlay
Dim Bit4 As Bit At Adrpm Overlay
Dim Bit5 As Bit At Adrpm Overlay
Dim Bit6 As Bit At Adrpm Overlay
Dim Bit7 As Bit At Adrpm Overlay
Dim Bit8 As Bit At Adrpm Overlay
Dim Bit9 As Bit At Adrpm Overlay
Dim Bit10 As Bit At Adrpm Overlay
Dim Bit11 As Bit At Adrpm Overlay
Dim Bit12 As Bit At Adrpm Overlay
Dim Bit13 As Bit At Adrpm Overlay
Dim Bit14 As Bit At Adrpm Overlay
Dim Bit15 As Bit At Adrpm Overlay
Dim Bit16 As Bit At Adrpm Overlay 'LSB of Byte1


Tvoji biti imajo sicer različna imena, a so vsi na eni in isti lokaciji.
Zakaj pa hočeš posamezne bite? Če jih hičeš izpisati spremenljivko binarno, potem uporabi print bin(spremenljivka)

Koda:
A = &B1010_0111
Print Bin(a)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Makaron
Član
Član



Pridružen-a: Sob 21 Jan 2006 20:12
Prispevkov: 25
Aktiv.: 0.11

PrispevekObjavljeno: Čet Dec 16, 2010 9:47 pm    Naslov sporočila:   Odgovori s citatom

Hvala za odgovore. Sem zadevo rešil z ukazom shiftout. Vseeno hvala, zna še kdaj tudi tole priti prav.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
rudiP
Član
Član



Pridružen-a: Tor 07 Avg 2007 15:30
Prispevkov: 1235
Aktiv.: 5.67
Kraj: KOPER

PrispevekObjavljeno: Čet Dec 16, 2010 11:11 pm    Naslov sporočila:   Odgovori s citatom

Če bi takoj povedal kakšen problem te muči, bi imel odgovor prej. Ampak kar se sam naučiš ti ostane znanje in izkušnje za dolgo.
_________________
Lep pozdrav iz Kopra Rudi
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Zabavna elektronika Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Stran 1 od 1

 
Pojdi na:  
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu

Uptime: 499 dni


Powered by phpBB © 2001, 2005 phpBB Group