Interface Real + Visual Basic 6 + Mscomm

Uma luz no fim do túnel…

Com base neste protocolo da Gogoboard, é possível nos comunicarmos via porta serial virtual, ou usb, com as placas Real, BR-Gogo e Gogoboard.

Graças ao Lucas Tanure, do Projeto Real, com suas aulas de python e ao pessoal da lista Roboticalivre, em especial, à Daniel Basconcello Filho, do robotizando.com.br, Luiz Soares, Gustavo Barreto Garcia, Stephanie Oliveira e Henrique Foresti, do robolivre.org, com suas importantes orientações, já é possível implementamos a comunicação na prática e de maneira bem simples, tanto como no python.

Basicamente, tomando como exemplo o beep, anteriormente postado aqui, basta usarmos como segue abaixo:

Private Sub Command2_Click()
'Envia o beep para a porta COMM
MSComm1.Output = Chr(84) + Chr(254) + Chr(196) + Chr(0)
End Sub

Lembrando que antes, será preciso abrirmos a comunicação, como abaixo:

Private Sub Form_Load()
MSComm1.CommPort = 6
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputLen = 0
MSComm1.PortOpen = True
End Sub

Também será preciso fecharmos a porta, depois da comunicação, caso não desejemos transmitir mais dados, deste modo:

Private Sub Form_Unload(Cancel As Integer)
MSComm1.PortOpen = False
End Sub

Em breve mais exemplos de funcionalidades, já exploradas via activex.

Foto: Internet
Fonte: http://www.macoratti.net/vbserial.htm


Atenção!

O Projeto Real agora é Gogo Real. Mais detalhes aqui.

Anúncios