سلام
در مورد پروژه شما اگه فقط یک کانال رو می خواهیدکنترل کنید یه راه خیلی ساده و کوتاه وجود داره که نیازی هم به میکرو نداره![]()
در مورد برنامه باید از VB چهار بایت رو ارسال کنید
اگه ار دستور waitkey استفاده کنید حتما موفق می شید یا مستقیما از وقفه پورت سریال و رجیستر های سریال پورت استفاده کنید
مثال:
Open "comd.7:9600,8,n,1" For Output As #1
Printbin #1 , 64 ; 17 ; 0 ; 0 ; 0 ; 0 ; 0 ; 0 ; 0 ; 0 ; 0 ; 81 ; 10
Close #1
'Waitms 10
Open "comd.6:9600,8,n,1" For Input As #2
For I = 1 To 13
Buf = Waitkey(#2)
Buffer(i) = Buf
Next I
Close #2