Stránka 1 z 1
Bascom...jen mala rada:)
Napsal: 23 črc 2010, 00:35
od radar0101
Zdravim.
Můžete mě nekdo vysvetlit co dela toto..například:
a misto xor AND udela co?
Normální připady použiti and or atd..chapu, to je jasny.
Ale tenhle zápis nevím přesně jak funguje.
Moc dik za rady.
Napsal: 23 črc 2010, 08:28
od procesor
Bascom s tým nemá nič (veľa) spoločné.
Bez trochy námahy to nepôjde.
(miesto funkcie xor udelá funkciu and

)
Re: Bascom...jen mala rada:)
Napsal: 23 črc 2010, 08:34
od Andrea
radar0101 píše:Normální připady použiti and or atd..chapu, to je jasny.
Já teda nevím, co je to normální, ale co ti na tom zápisu přijde nenormálního?
Napsal: 23 črc 2010, 08:41
od AB1
&h17 = &b10111
B = A(1) xor &b00010111
V B bude hodnota A(1) s invertovanými bity 0,1,2,4.
Příklad:
X = &b11111111
X xor &b00010111 = &b11101000
Napsal: 23 črc 2010, 09:13
od radar0101
AB1 píše:&h17 = &b10111
B = A(1) xor &b00010111
V B bude hodnota A(1) s invertovanými bity 0,1,2,4.
Příklad:
X = &b11111111
X xor &b00010111 = &b11101000
Supr moc dik AB1:) Takhle me to uplne stacilo napsat.
Ale ale mam pro tebe jeste jednu otazecku AB1.
Kód: Vybrat vše
Dim Vstup As Byte
Dim A As String * 8
Dim B(8) As Byte At A Overlay
Dim X As Byte
Vstup = &B10101010
Do
A = Bin(vstup)
For X = 1 To 8
If B(x) = 48 Then B(x) = 0
If B(x) = 49 Then B(x) = 1
Next
Print B(1) ; B(2) ; B(3) ; B(4) ; B(5) ; B(6) ; B(7) ; B(8)
Loop
End
Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast. Ja to dělam takhle.
Není na to nějaky jednodušší řešení:)
Dííky
Napsal: 23 črc 2010, 12:26
od radar0101
tak dobry k tomu predtim...uz jsem to vyřesil MIDEM a je to lepsi:)
Každopádně moc dik:)
Napsal: 23 črc 2010, 12:42
od AB1
Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast
Není jednodušší toto?
Kód: Vybrat vše
dim vstup as byte
dim x as bit
x = vstup.0 //bit0
x = vstup.1 //bit1
x = vstup.2 //bit2
atd
Napsal: 23 črc 2010, 14:41
od radar0101
AB1 píše:Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast
Není jednodušší toto?
Kód: Vybrat vše
dim vstup as byte
dim x as bit
x = vstup.0 //bit0
x = vstup.1 //bit1
x = vstup.2 //bit2
atd
OOOOOO panecku paradaaa:)Supr moc dik.....zas az takhle jednoduše že to jde, to jsem necekal:D
DIK