LIGAR BALANCA TOLEDO AO MICRO

PEPE.LEGAL 28/02/2005 08:37:23
#70230
Alguem pode me ajudar?, tenho que ligar uma Balanca toledo Prix III
diretamente a porta serial e retornar o peso, acontece que no site
do fabricante nao tem nada, e as tentativas que fiz utilizando
MSCOMM no VB6 nao resultaram em absolutamente nenhuma resposta,
provavelmente porque devo estar fazendo alguma bobagem. Se alguem
tiver uma rotinazinha em VB que pelo menos retorne alguma coisa pra
tela ficaria muito agradecido.
TROVAM 28/02/2005 11:43:12
#70294
Caro colega, geralmente o fornecedor dos produtos com saida serial devem informar como se coleta os dados via serial, ou seja, eles tem q informar q tipo de comando q vc deve enviar para receber o peso...

por exemplo:
with mscomm
.output = <"comando para retorno do peso">
peso = .input
end with

Agora tenta fazer direto para ver se funciona... tipo :
Peso = mscomm.input

Até mais...
USUARIO.EXCLUIDOS 28/02/2005 13:36:56
#70336
Resposta escolhida
Formato dos Dados

A balança aguarda uma solicitação do dispositivo externo para a transmissão do peso.


- Velocidade : 2400 bauds ( poderá ser configurada também em 1200, 4800 ou 9600 bps )
- Paridade : nenhuma
- Código : ASCII
- Stop bit : 1
- Bits de Dados : 8 ( LSD primeiro )


A balança aguarda uma solicitação do dispositivo externo para o início da transmissão do peso.

O envio dos dados é feito quando a balança receber um sinal de controle “ENQ”.

ENQ = Caracter ASCII ( 05 H ) enviado pelo dispositivo externo.


A partir disso, na condição de indicação estável do peso, a balança enviará ao dispositivo externo o seguinte pacote de dados:


[ STX ] [ PESO ] [ ETX ]

onde:

STX = Caracter ASCII ( 02H )
PESO = 5 caracteres ASCII representando o peso, sendo que os dois primeiros caracteres são relativos a parte inteira e, os outros três a parte decimal.
ETX = Caracter ASCII ( 03H )




Nota : A balança não enviará o peso quando a indicação do peso for negativa, superior a carga máxima e não estável.
PEPE.LEGAL 28/02/2005 16:18:18
#70374
Clayton,
se nao é pedir demais, como seria enviado esse sinal "ENQ"

mscomm1.output= ????
USUARIO.EXCLUIDOS 28/02/2005 18:42:24
#70399
mscomm.output = "aki o comando"
mscomm.peso = .input para retornar o valor
Tópico encerrado , respostas não são mais permitidas