roboforum.ru

[EdGull]

Здесь будет последняя актуальная прошивка которой я буду прошивать на заводе МиниБотов
И так, какие узлы будут проверяться:

TestM32 Ver 1.1.rar

(17.31 КиБ) Скачиваний: 69

кварец - готово
УАРТ (FT232) - готово
светодиоды - готово
Н-мосты (движки) - готово (работают при нажатой кнопке)
датчик внешнего питания - готово
датчик напряжения акб (ацп) - готово
звук - готово (работает только если при старте жать кнопку)
TSOP - готово
кнопка - готово
SD-карта
бутлоадер

Мега88
внешнее тактование
радиоканал (СС2500)
5В (ацп)
бутлоадер

[EdGull]

сложу пока всё раздельно

RoboRF 03.rar

(28.57 КиБ) Скачиваний: 57

TestPorts Ver 1.0.rar

(10.53 КиБ) Скачиваний: 44

sound 0.1.rar

(10.65 КиБ) Скачиваний: 46

[frig]

его бы это... в тему с минибот-кодом...

[EdGull]

когда доделаю естественно выложу

[EdGull]

обновил прошивку М32 до версии 1.0

[EdGull]

версия M32 1.1
добавлен датчик заряда акб т.е. измерение АЦП

TestM32 Ver 1.1.rar

(17.31 КиБ) Скачиваний: 58

[MiBBiM]

прошивка для мегаплаты - программатора?

[EdGull]

avrusb500_pre.rar

(4.81 КиБ) Скачиваний: 38

[MiBBiM]

SD - карточку можно проверить, подключив бибилиотеку авр дос и инициализировав ф.с.

Код: Выделить всё • Развернуть

'проверяю диск
Lbyte1 = Drivecheck()
If Lbyte1 = 0 Then
Print "OK"
End If
Printdriveerror
'проверяю ф.с.
Lbyte1 = Initfilesystem(1)
If Lbyte1 <> 0 Then
Print "Error at file system init"
Else
Printfilesysteminfo
End If

Код: Выделить всё • Развернуть

'вывожу ошибку карты
Sub Printdriveerror()
   If Gbdriveerror > 0 Then
      Print "Drive Error: " ; Gbdriveerror
      Print "Drive Status:" ; Bin(gbdrivestatusreg)
      Print "Drive Debug: " ; Gbdrivedebug
   End If
End Sub
'вывожу информацию о системе
Sub Printfilesysteminfo()
   Print "File System:         " ; Gbfilesystem
   Print "File System Status:  " ; Gbfilesystemstatus
   Print "FAT first Sector:    " ; Glfatfirstsector
   Print "Number of FATs:      " ; Gbnumberoffats
   Print "Sectors per FAT:     " ; Glsectorsperfat
   Print "Root first Sector:   " ; Glrootfirstsector
   Print "Root Entries:        " ; Gwrootentries
   Print "Data first Sector:   " ; Gldatafirstsector
   Print "Sectors per Cluster: " ; Gbsectorspercluster
   Print "Highest Cluster#:    " ; Glmaxclusternumber
   Print "Start check Cluster# " ; Gllastsearchedcluster
End Sub

[EdGull]

это ты к чему?
выложи одним куском

[MiBBiM]

как-то так

[EdGull]

прошивку проверял?

[MiBBiM]

да. вроде робит

[galex1981]

Добавил работу в прерывании ИК пульта

[MiBBiM]

добавил воспроизведение музыкального файла, если ф.с. прошла проверку успешно