Форум РадиоКот

Помогите пжалста
периодически виснет на строке AAAAAAAAAAAAAAAA
и шлет эхом назад отправленый байт

Metka312:


Open "comB.1:9600,8,n,1" For Input As #2
' ' ЖДЕМ КОМАНДУ- ЗАПИСЬ ИЛИ ЧТЕНИЕ или выход
Input #2 , I 'AAAAAAAAAAAAAAAA
Close #2



If I = 254 Then Goto Metka424
If I = 253 Then Goto Metka424
If I = 252 Then Goto Metka556
Goto Metka312

Metka424:
If I = 254 Then
' 'ВХОДИМ В ПРОГРАММИРОВАНИЕ
B = 0
Open "comB.1:9600,8,n,1" For Input As #2
Metka425:
Input #2 , Igetline
Writeeeprom Igetline , B





B = B + 1
If B < &H200 Then Goto Metka425
Close #2

Open "comB.0:9600,8,n,1" For Output As #1
Print #1 , "ЗАВЕРШЕНО"
Close #1
Else
If I = 253 Then
' 'ВЫВОДИМ В ПОРТ НАСТРОЙКИ
For A = 0 To &H1FF
Readeeprom Igetline , A
Open "comB.0:9600,8,n,1" For Output As #1
Print #1 , Igetline
Close #1
Next A
Open "comB.0:9600,8,n,1" For Output As #1
Print #1 , "ЗАВЕРШЕНО"
Close #1
End If

End If
Goto Metka312

Metka556:


Кто использовал программный UART, отзовитесь пожалуйста.
Уже 2 недели бьюсь.....

проц mega32
мож ошибка в бейсике....?
как обойти?

All64 писал(а):ЖДЕМ КОМАНДУ

наверное чего-то не дожидается
В принимаемой программе должен быть по идее "возврат коретки"
Может этого ждёт?

All64 писал(а):и шлет эхом назад отправленый байт

When you use INPUT to retrieve values for variables, all info you type can be echoed back. In this case you will see each character you enter. When ECHO is OFF, you will not see the characters you enter.By default, ECHO is always ON

Input C Noecho

возврат каретки есть.
дело в том, что иногда обмен проходит успешно....
эхо ща попробую зарубить

Input #2 , I 'AAAAAAAAAAAAAAAA
вот здеся он стоит и стоит....