@Vtod777

Для МК софт почти написал, чтение из памяти идет и выдача данных в УАРТ тоже.
Сейчас пытаюсь освоить VISUAL BASIC v.6
Помогите плиз! Изучать ради написания 1-й программы - жуть!
Алгоритм должен быть такой -
Нажимаю кнопку на ПК - в МК отправляется символ "r".
После этого МК сыпет в порт 32768 байт данных.
На Пк их необходимо принять и сохранить в файл.
МК в конце данных может выдать в порт (дополнительно) любой символ, например 0x1a. (если это конечно необходимо).

Вот что смог написать на VISUAL Basic:

Pryvate Sub Commomd2_Click()
Номер порта COM
MSComm1.CommPort = 2
19200 скорость, без паритета, 8 бит данных, и 1 стоп bit.
MSComm1.Settings = "19200,N,8,1"
Открыть порт
MSComm1.PortOpen = True
Из буфера читаем ВСЕ символы, которые в нем есть.
MSComm1.InputLen = 0
Возникает событие OnComm при получениив буфер 1-го символа
RThreshold = 1
Открыть файл для записи
InputMode = Binary
Open "C:\file-1.txt" For Output As #1
Print "Порт открыт, файл открыт"
Посылаем комманду в МК
MSComm1.Output = "r"
Цикл, пока счетчик не обнулится
While St <> Chr(26)
If somEvReceive Then
St = MSComm1.Input
Print #1, St;
End If
Wend
Закрываем COM порт
MSComm1.PortOpen = False
Закрываем файл
Close 1
Print "Готово!"
End Sub

Файл создается, все нормально, НО моя программа на ПК никогда не заканчивается!!!! -))))
Вертится в цикле - все! -))))

А вторая часть программы для ПК будет передавать в МК символ "w", после которого МК переходит в режим приема, принимает от ПК ровно 32768 байт и записывает их блоками по 64 байта в I2C.
Возможно в программе для ПК понадобится поставить задержку 10мс. после каждых 64 байт данных.

Подскажите пожалуйста!
С уважением,
Влид.

Вернуться к обсуждению:
24с256 – AVR – PC и обратно ATmega AVR

0