کمک در مورد پورت سریال

[ali_elect62]

سلام .
من وقتی با avr به کامپیوتر با پورت سریال وصل می شم کلمه ای که به کامپیوتر می فرستم کامل دریافت میشه،ولی وقتی با کامپیوتر کلمه می فرستم فقط حرف آخرش تو lcd دیده میشه(بیت به بیت دریافت میشه)میشه راهنماییم کنید ک کلمه کامل تو lcd نمایش داده بشه.
$regfile = "m32def.dat"
$crystal = 11059200
$baud = 9600
$swstack = 64
$hwstack = 128
$framesize = 128
Config Lcd = 20 * 4
Config Lcdpin = Pin , Db4 = Pinc.3 , Db5 = Pinc.2 , Db6 = Pinc.1 , Db7 = Pinc.0 , Rs = Pinc.4 , E = Pinc.5
Dim D As String * 4
do
print "ali"
waitms20
d=inkey()
waitms 10
lcd d
loop
end

[morteza_rk]

سلام دوست عزیز

مشکل در استفاده از دستور ()inkey هست! این دستور در واقع می تونه فقط یک بایت از پورت سریال بخونه ، که اون هم کد اسکی کاراکتر رسیده هست.

پیشنهاد می کنم از دستور input استفاده کنید. در اینصورت در انتهای هر داده ای که از کامپیوتر می فرستید باید کلید Enter هم بزنید تا میکرو اونو دریافت کنه.