savoir l'état des bits d'un octet

Réponse acceptée !
Salut
Reprenons les bases. D'ailleurs, je te conseille de jeter un oeil sur une ou des sources qui parlent de conversions de Base qui manupilent les Bytes (ou Octets) et les Bits.

Un Octet est composé de 8 bits (numérotés de 0 à 7).
Un Octet, dans sa représentation décimale peut prendre des valeurs de 0 à 255, ou 00 à FF en Hexa.
Pour écrire le Bit n°X d'un Octet, il te suffit de calculer 2^X (avec X de 0 à 7)
Pour lire le Bit n°X d'un Octet, il faut tester si Octet And 2^X = Octet

Ensuite, tu parles de String (Chaine).
Les Strings sont composés de caractères.
Chaque caractère est un Octet.

Donc, dans ton cas où tu veux coder les caractères sur 5 bits et pas 8, il faut abandonner la représentation alphabétique des caractères d'une String et travailler uniquement sur les valeurs numériques des Octets.
Dans ton exemple, si tu veux coder 'abc', cela te donnera la suite de 15 Bits suivants (la représentation standard des bits est toujours avec le bit de poids faible à droite et le bit de poids fort à gauche) :
Séparés par paquet de 5 bits : 000100000100000
La même chose en paquets de 8 bits (1 Octet) : x0001000 00100000
Le problème que tu auras, c'est de passer les 3 premiers bits du 'b' sur le premier octet et les 2 restant au début de l'octet suivant.
Le x correspond au premier bit du prochain caractère (même punition).
Ca va pas être du gateau, mais faisable.
Il faudra prendre en compte aussi que, à la relecture, tu ne pourras lire que des Octets, donc des multiples de 8, donc les derniers Bits seront peut-être inutilisés. Dans le pire des cas, tu n'auras qu'un seul Bit intéressant dans le dernier Octet, les 7 suivants seront restés à 0. Or, dans ta table de caratères, '00000' représente la lettre 'a'.
Il faut donc que tu sacrifies le '00000' pour qu'il ne représente rien et commencer le 'a' à '00001' sinon, tu risques de retrouver des 'a' fantômes à la fin.

En VB, il faut impérativement que tu travailles avec des tableaux de Byte (Octet) pour pouvoir changer d'octet de manière numérique.
Il va falloir :
- décortiquer la chaine d'origine pour retrouver la représentation des 5 bits en fonction de la lettre rencontrée. Un tableau initialisé au début de ton projet devrait faire l'affaire
- définir ne nombre d'Octets (de 8 bits) dont tu auras besoin : Il te suffit de calculer : NombreCaratères * 5 / 8 et l'arrondir à la valeur supérieure
- Ecrire : Ca va être un astucieux mélange de boucle For-Next et d'incrémentation.

Conclusion : Oui, c'est faisable, mais avant tout, il faut que tu te familiarises avec l'écriture et la lecture des Bits dans un Octet sur des exemples simples avant de te lancer dans ce programme.
Fabrique-toi et met au point ces procédures :
Sub BitEcrit (monOctet As Byte, NoBit As Integer, Etat As Boolean)
Sub BitLit (monOctet As Byte, NoBit As Integer, Etat As Boolean)
Fonction dans laquelle tu écriras/liras à 0 ou 1 (Etat) le Bit n° 'NoBit' (de 0 à 7) dans l'octet 'monOctet'
Aide toi de la calculette Windows en mode Scientifique pour vérifier ton programme.
Quand tu auras créé ces fonctions, tu auras 25% de ton projet de fait !

PS : Projet intéressant mais prévois de l'aspirine !

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)