Word!

[Badu]

Alguém sabe uma rotina para ler uma word(valor de 0 a 65535) e converte-la para binario. Depois eu preciso extrair cada um dos 16 bits desta word. Para extrair pensei em usar a função MID. Mas como fazer, para converter o valor decimal para binário?

[Graymalkin]

Do mesmo jeito que a gente faz na mão (ou na cabeça), ou seja, dividindo o valor por 2 consecutivamente, obtendo todos os restos e o último quociente.

Abraços,

Graymalkin

[Badu]

Obrigado. Eu consegui fazer. Só estou tendo problema para preencher com os zeros até completar 16 bits. Se eu converto para string aí eu consigo, pois comparo se o campo está vazio e preencho os que estão com zeros. Mas como eu estou lidando com números, não estou conseguindo preencher com zeros. Por exemplo se eu converto 7 eu recebo 111, mas eu precisaria 0000000000000111. Eu tentei zerar a meu array antes, mas como estou usando a função MID para extrair o bit, parece que ela cancela e só aparece 111.

[Graymalkin]

Neste caso você vai ter realmente que usar strings ou um array de inteiros (sendo que para mostrar esse array você de qualquer maneira vai precisar colocar os valores em uma string). Não existe um tipo numérico que tenha sua representação em binário.

Abraços,

Graymalkin