Página 1 de 1
Balança Toledo Prix III - Preciso Rotina
Enviado: 09 Ago 2008 18:01
por Clipper
Prezados Colegas
Preciso de uma rotina ou exemplo de como capturar o peso desta balança via serial.
Também gostaria de saber a pinagem a ser usada para confeccionar o cabo de comunicação.
Até logo.
Marcelo
Re: Balança Toledo Prix III - Preciso Rotina
Enviado: 10 Ago 2008 18:24
por ANDRIL
É também no busca de rotinas para captura de peso em diversas balanças, parece que pra toledo tem 3 tipos de protocolos como citado no topico
viewtopic.php?f=1&t=6194
Quanto a pinagem do cabo não sei lhe informar, mais acho que deva ser RS232 conector 9 pinos, veja se consegue com esta pinagem:
acho que esta é uma pinagem padrão para serial.
Usei em testes a CTP.LIB com as funções:
COM_OPEN() //abre a porta
COM_INIT() //estabele o protocolo
COM_SEND() //envia os dados para balanca
COM_READ() //le os dados de retorno
COM_CLOSE() //fecha a porta
O meu unico problema foi colocar a função que criei junto ao meu codigo, começou a dar uns erros locos no meu sistema, então tive que retirar.
Acho que as funções acima precisa adc o obj __WAIT.OBJ pra poder utiliza-las e com isso criou algum tipo de incompatibilidade com alguma rotina do meu sistema.
Não sei se vc achou o manual dessa balança, mais segue o link:
http://www.toledobrasil.com.br/suporte/ ... 051104.pdf
Ate+
Re: Balança Toledo Prix III - Preciso Rotina
Enviado: 23 Ago 2008 02:02
por Clipper
Prezado Andril
Agradeço a resposta mas fiquei na mesma, tentei usando a rotina exemplo e nada, simplesmente não retorna nada, fica como se fosse em um loop infinito. Confecccionei o cabo conforme o padrão Null Modem, já verifiquei o cabo com teste de continuidade e está perfeito, mas não há retorno algum. Será que alguém pode passar uma rotina já testada e funcional ?
Obrigado.
Até logo.
Marcelo
Re: Balança Toledo Prix III - Preciso Rotina
Enviado: 23 Ago 2008 18:33
por frazato
viewtopic.php?f=1&t=1663&p=5609&hilit=+frazato#p5609
uso em balanças bp 15 da filizola.. mais o principio e o mesmo, caso prescise tenho ela em xharbour.
frazato
Re: Balança Toledo Prix III - Preciso Rotina
Enviado: 23 Ago 2008 19:18
por Clipper
Prezado Frazato
Obrigado pela resposta, eu consegui fazer pelo exemplo do colega Maligno, exemplo muito completo por sinal.
Falta só dar uma melhorada na função, mas já está comunicando beleza.
Código: Selecionar todos
function chamabal()
com_close(1)
com_open(1, 1024, 1024)
com_init(1, 9600, "n", 8, 1)
com_hard(.f.)
conta=0
cappeso=.f.
peso=0
do while conta<50
cinput := com_read(1)
if empty(cinput)
inkey(.1)
conta++
else
if substr(cinput,1,1)=chr(2)
peso=val(substr(cinput,2,6))
cappeso=.t.
exit
endif
inkey(.1)
conta++
endif
enddo
com_close(1)
itqtd=peso
if cappeso=.t.
return(.t.)
else
msg("falha na captura do peso !",1,2)
return(.f.)
endif
return(.t.)
Para quem precisar confeccionar o cabo, segue abaixo o esquema :
Obrigado.
Até logo.
Marcelo
Re: Balança Toledo Prix III - Preciso Rotina
Enviado: 25 Ago 2008 10:04
por Clipper
Complementando...
O pessoal da Toledo me repassou hoje esse esquema de pinagem mais fácil e que também funciona.
Até logo.
Marcelo