odbiór danych rs232

[zibi11]

Potrzebuje odebrać dane z aplikacji VB TEXT1
w AVR 90s8515 jak to zrobić jaką metodą get ??
może prosty przykład

Bascom
dim dana as integer
do
...
...
...

lcd dana

loop

------------------------------------------------
VBBBBB
Private Sub Command1_Click()

MSComm1.Output = Text1 & vbCr
End Sub

Private Sub Form_Load()
MSComm1.CommPort = 3
MSComm1.Settings = "9600,n,8,1"
MSComm1.RThreshold = 1
MSComm1.PortOpen = True
End Sub



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

[slawcio]

W bascomie jest taka instrukcja "input" ona słuzy do odbioru danych z RS232 (oczywiście potrzebny jest konwerter napięć np. na max232).

Pozdrawiam