Função .XOR.

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Função .XOR.

Mensagem por Hasse »

Boa noite colegas

Estou à procura da Função XOR no xHarbour, ou então da Função LRC a ser usada na comunicação SERIAL.

Alguém sabe qual a LIB que contém esta função, e qual a sintaxe.

Obrigado.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: Função .XOR.

Mensagem por sygecom »

Hasse escreveu:Boa noite colegas

Estou à procura da Função XOR no xHarbour, ou então da Função LRC a ser usada na comunicação SERIAL.

Alguém sabe qual a LIB que contém esta função, e qual a sintaxe.

Obrigado.
Buenas...

Tche, toh usando aqui a HBCOMM para comunicação serial de Balança...e desconheço essas Funções ai !!
Se quiser dar uma olhada na Hbcomm...pode baixar no link abaixo:
http://www.sygecom.com.br/xharbour/hbcomm_09970.zip

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Mensagem por Hasse »

Caro Sygecom.

Eu tenha esta LIB, e estou usando-a pela primeira vez para desenvolver uma rotina de comunicação serial para um Aparelho que necessitado do LRC (Longitudinal Redundancy Check), que é um cálculo XOR, byte a byte, dos dados transmitidos.

Se a HBcomm tem esta função eu necessito somente do NOME da função e a sua respectiva SINTAXE.

Obrigado.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, esse calculo eu não faço nem ideia do que seja...mas pode baixar no link que mandei pra vc que acompanha um exemplo de como receber os BYTE..

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
angeiras
Usuário Nível 3
Usuário Nível 3
Mensagens: 134
Registrado em: 21 Nov 2005 20:53
Localização: Olinda/PE

Mensagem por angeiras »

Ola,

Tem a funcao hb_bitxor( b1, b2 ).

Voce pode ver um exemplo de uso no programa bitfield.prg que esta na pasta \tests :

? "15 xor 6", hb_bitxor( 15, 6 )

[]s
Manoel Angeiras
Clipper 5.2e + sixcdx + catools + nanfor
xHarbour 1.0.0 + gtwvw / xHarbour 1.2.1 + Fivewin
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Mensagem por Hasse »

Caros Sygecom e Angeiras.

Acabei de testar e funcionou beleza.

Obrigado pelas dicas.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Responder