dotNETportal.cz

Dobrý den,

mám následující konstantu :

Const Barva As UInteger = &HFFCCFF

a potřeboval bych zjistit hodnotu prostředních osmi bitů(zelená barevná složka).

Jak na to?Vlastně potřebuji obecny postup jak z N bitové hodnoty vytahnout M bitů z pozice p.

Dobrý den,

třeba takto:

Const Barva As UInteger = &HFFCCFF
Dim ccc As Color = Color.FromArgb(Barva)
Dim zelena As Byte = ccc.G

Ano to taky funguje.

Ono to funguje i takhle :

x = (Barva - (Barva \ &H10000) * &H10000) \ &H100 

ale asi jsem se vyjádřil špatně. Potřebuji obecný způsob jak z N bitové hodnoty vytáhnout M bitů z pozice p. Řekl bych že se to bude realizovat bit. posuny, nicméně jsem je ve .Netu nepoužil. No vlastně nikdy jsem bity neposouval ani nerotoval.

Nedokážu Vám poradit přesnou syntaxi v VB, ale způsob, jak na to, ano. V jazyce C by to vypadalo takto:

#include <stdio.h>

// input - vstupni sekvence bitu
// N - pocet bitu v sekvenci
// p - pozice, od ktere se maji vratit bity
// m - pocet bitu, ktere chci vratit
int getBits(int input, int p, const int N, const int m)
{
	int i;
	int output = 0;
	
	for (i = N - 1; i >= 0; i--)
	{
		if (i < N - p && i >= (N - (p + m)))
		{
			output |= (1 << i) & input;
		}
	}
		
	output = output >> (N - (p + m));
	return output;	
}


int main()
{
	printf("%d", getBits(0b1101110111, 5, 10, 3));
	return 0;
}

V ukázce předávám do funkce getBits sekvence 1101110111, dále říkám, že chci bity od páté pozice (počítáno od nuly), délka sekvence je 10 a chci vrátit 3 bity. Požaduji tedy výstup 101. Funkce vrátí číslo 5, což po převedení do binární soustavy je opravdu 101.

Jestli tohle přepíšete do VB (asi to bude podobné, ale opravdu nevím), mělo by to fungovat.

Děkuju pomohlo ale

docela mě překvapuje jak všichni tahají kanón na mouchu přitom stačí následující kód!

Zelena = (barva And &H00FF00) >> 8

A dostanu požadovaného výsledku.

"Tahají kanón na mouchu" preto, lebo ste sa pýtal na obecný spôsob, ako danú vec urobiť. Váš kód je síce niekoľkokrát kratší, avšak je fixovaný na jednu jedinú možnosť.