PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV (versiones precedentes) → Convertion Decimal en binaire
Convertion Decimal en binaire
Iniciado por Joly Alain, 14,ene. 2007 21:40 - 3 respuestas
Publicado el 14,enero 2007 - 21:40
Bonjour a tous,

Mon pbl est le suivant, une DLL me retourne un entier entre 0 et 255 afin de me faire conaitre la position d'une serie de 8 ports logique sur une carte d'acquisition.

Chacun des 8 bits peut donc être a 1 ou 0.

Comment convertir l'entier retourné en mode binaire, afin de connaitre d'une maniére individuel, la position de chacun des 8 bits.

Merci
Publicado el 15,enero 2007 - 10:11
Bonjour
si tu as une variable EtatPort est un entier sans signe sur 1 octet = 0xA5
alors
EtBinaire(EtatPort,0x01) = valeur du bit n°0
EtBinaire(EtatPort,0x02) = valeur du bit n°1
EtBinaire(EtatPort,0x04) = valeur du bit n°2
EtBinaire(EtatPort,0x08) = valeur du bit n°3
EtBinaire(EtatPort,0x10) = valeur du bit n°4
EtBinaire(EtatPort,0x20) = valeur du bit n°5
EtBinaire(EtatPort,0x40) = valeur du bit n°6
EtBinaire(EtatPort,0x80) = valeur du bit n°7

"Joly Alain" <joly.alain@neuf.fr> a écrit dans le message de news:
45aa8352$1@news.pcsoft.fr...

Bonjour a tous,

Mon pbl est le suivant, une DLL me retourne un entier entre 0 et 255 afin
de me faire conaitre la position d'une serie de 8 ports logique sur une
carte d'acquisition.

Chacun des 8 bits peut donc être a 1 ou 0.

Comment convertir l'entier retourné en mode binaire, afin de connaitre
d'une maniére individuel, la position de chacun des 8 bits.

Merci

Publicado el 15,enero 2007 - 12:13
Bonjour,

Voici un code pour cela:

Nb est un entier // entre 0 et 255
sBinaire est une chaîne = ""
TANTQUE Nb > 0
sBinaire = modulo(Nb,2) + sBinaire
Nb = Nb/2
FIN
info(sBinaire)

Bon dev,
Eric
Miembro registrado
34 mensajes
Popularité : +1 (1 vote)
Publicado el 04,agosto 2021 - 11:55
Bonjour et merci
Même 14 ans après, ce code reste bien fait et utile