Leitura e gravação na porta serial
Porta Serial
============
Utilize o seguinte conjunto de funcoes (4.06, 4.07, 5.07, 5.08):
(apos cada linha segue comentario)
cTexto := SPACE(50)
/* A quantidade de espacos variada de acordo com o buffer de dados recebido do periférico
*/
MsOpenPort(nHandle,"COM1:9600,n,8,1")
/* Abre a porta serial. Os parametros passados entre aspas sao (na ordem da direita para a esquerda):
- Porta Serial
- Velocida de transmissao em bps
- Paridade s/n
- Quantidade de bits de dados
- Bits de parada
Essas informacoes dependem da configuracao do periferico, o padrao esta demonstrado no exempo acima.
*/
MsWrite(nHandle,"Comandos a serem enviados")
/* Envia informacoes para a porta
*/
MSRead(nHandle,cTexto)
/* Le informacoes da porta e coloca na variavel informada no segundo parametro (cTexto no exemplo)
*/
MsClosePort(nHandle)
/* Fecha a porta serial
*/