serial communication send/receive

pipi · Joined: 09 Nov 2009 Posts: 2

Hello all, can anybody help me to build some code?i want to make a serial communication between pc and avr. I use hyperterminal to communicate with avr. here is my code:

$regfile = "m32def.dat"
$crystal = 11059200
$baud = 9600

Dim Rx_char As String * 5

Do

If Ischarwaiting() = 1 Then
Rx_char = Inkey()

Printbin Rx_char

If Rx_char = "1" Then
Print Chr(13)
Print "OK"
End If

End If

Loop

when i typing "address 01" in hyperterminal the response is "OK". I use 1 (one) to indicate the receive character, the hyperterminal show like this:

address 01
OK

I want to make code that working like this: if i typing address 01 and then press enter on my keyboard then the response is "OK". How to do that?and there is any way to indicate the receive on full character? like "address 01" not only the last character such as 1 (last character on address 01).

thank u

pipi · Joined: 09 Nov 2009 Posts: 2

Solved.... Very Happy