Администрация форума не несёт ответственности за достоверность информации и оставляет за собой право редактировать или в особых случаях даже удалять посты без предупреждения. Спасибо за понимание.

Программирование ATMEL в BASCOM.

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.

AVR-DOS на Xmega

Страница: 1

Сообщений 1 страница 7 из 7

1

  • Автор: EdGull
  • Активный участник
  • EdGull
  • Откуда: Тольятти
  • Зарегистрирован: 2008-01-18
  • Приглашений: 0
  • Сообщений: 317
  • Уважение: [+21/-0]
  • Позитив: [+25/-10]
  • Пол: Мужской
  • Возраст: 54 [1972-01-10]
  • Провел на форуме:
    5 дней 0 часов
  • Последний визит:
    2020-10-15 18:20:32

Кто нибудь запускал?
А то у меня при простом переписывании камня при компилировании миллион ошибок вываливается
Там походу нужно все конфиги и библы переписывать?

0

2

  • Автор: EdGull
  • Активный участник
  • EdGull
  • Откуда: Тольятти
  • Зарегистрирован: 2008-01-18
  • Приглашений: 0
  • Сообщений: 317
  • Уважение: [+21/-0]
  • Позитив: [+25/-10]
  • Пол: Мужской
  • Возраст: 54 [1972-01-10]
  • Провел на форуме:
    5 дней 0 часов
  • Последний визит:
    2020-10-15 18:20:32

оказывается, в файле Config_MMC.bas ему не нравится стока

Код:
Config Spi = Hard , Interrupt = Off , Data Order = Msb , Master = Yes , Polarity = High , Phase = 1 , Clockrate = 4 , Noss = 1

кто нибудь знает как конфигурировать SPI на XMega?

0

3

  • Автор: Ev3658
  • Активный участник
  • Ev3658
  • Откуда: Кстово, Нижег.обл.
  • Зарегистрирован: 2013-03-30
  • Приглашений: 0
  • Сообщений: 1429
  • Уважение: [+317/-4]
  • Позитив: [+342/-4]
  • Пол: Мужской
  • Возраст: 44 [1982-06-29]
  • Провел на форуме:
    13 дней 0 часов
  • Последний визит:
    2026-09-15 00:07:04

Да, не просто оказалось запустить AVR-Dos на X-mega.
Дело в том, что для использования регистров в файле "Config_MMC.bas" используется библиотека не "MMC.LIB", а "MMC-XMEGA.LIB".
И аппаратный SPI инициализируется по другому:

Код:
 Config Spid = Hard , Master = Yes , Mode = 0 , Clockdiv = Clk4 , Data_order = Msb
       Open "SPId" For Binary As #11
       Spiinit

Дальше заходится в библиотеку "MMC-XMEGA.LIB" и там меняется регистр SPI под свои нужды:

Код:
;XMEGA SPI
;this lib assume SPIC to be used, but it is simple to use SPIE,SPID or SPIF by adjusting the registers

_byte2spi_255:
   ser r16                              ; send 255
   rjmp _Byte2SPI
_byte2spi_0:
   Clr r16                              ; send 0
_byte2spi:

 Sts SPID_DATA, R16                     ; SPIC data register  ,change to SPID, SPIE or SPIF
_byte2spi2:
 Lds R16,SPID_STATUS                    ; get status ,change to SPID, SPIE or SPIF
 Sbrs R16,7                             ; skip if it is set
 rjmp _byte2spi2
 Lds R16 , SPID_DATA                    ; finally get the data back into r16, ,change to SPID, SPIE or SPIF
 ret
*#ENDIF

И всё равно не работает, ошибка 227, надеюсь это флешка, так как строб по SCK есть.

+1

4

  • Автор: RDW
  • Активный участник
  • RDW
  • Откуда: Москва
  • Зарегистрирован: 2011-05-11
  • Приглашений: 0
  • Сообщений: 2632
  • Уважение: [+233/-37]
  • Позитив: [+164/-62]
  • Пол: Мужской
  • Возраст: 50 [1976-07-28]
  • Провел на форуме:
    20 дней 15 часов
  • Последний визит:
    2026-02-20 18:21:41

Вроде бы должно работать:

https://www.mcselec.com/index2.php?opti … ight=xmega

https://www.mcselec.com/index2.php?opti … ight=xmega

https://www.mcselec.com/index2.php?opti … ight=xmega

Вообще авр-дос в баскоме платный, есть вроде бы альтернативные варианты.

0

5

  • Автор: Ev3658
  • Активный участник
  • Ev3658
  • Откуда: Кстово, Нижег.обл.
  • Зарегистрирован: 2013-03-30
  • Приглашений: 0
  • Сообщений: 1429
  • Уважение: [+317/-4]
  • Позитив: [+342/-4]
  • Пол: Мужской
  • Возраст: 44 [1982-06-29]
  • Провел на форуме:
    13 дней 0 часов
  • Последний визит:
    2026-09-15 00:07:04
RDW написал(а):

Вроде бы должно работать....

Да, работает, транзистор с светодиодом на SCK помешал.
Использовал AVR-DOS тот, что есть в Sampe, там сжатый архив был, вроде от версии Bascom 2.0.7.9.
Если чего, папки сканировать: S = Dir( "*.") , файлы и папки S = Dir( "*.*") .

0

6

  • Автор: RDW
  • Активный участник
  • RDW
  • Откуда: Москва
  • Зарегистрирован: 2011-05-11
  • Приглашений: 0
  • Сообщений: 2632
  • Уважение: [+233/-37]
  • Позитив: [+164/-62]
  • Пол: Мужской
  • Возраст: 50 [1976-07-28]
  • Провел на форуме:
    20 дней 15 часов
  • Последний визит:
    2026-02-20 18:21:41

Насколько быстро работает?

0

7

  • Автор: Ev3658
  • Активный участник
  • Ev3658
  • Откуда: Кстово, Нижег.обл.
  • Зарегистрирован: 2013-03-30
  • Приглашений: 0
  • Сообщений: 1429
  • Уважение: [+317/-4]
  • Позитив: [+342/-4]
  • Пол: Мужской
  • Возраст: 44 [1982-06-29]
  • Провел на форуме:
    13 дней 0 часов
  • Последний визит:
    2026-09-15 00:07:04
RDW написал(а):

Насколько быстро работает?

Пока ещё не проверял, боролся с отображением русских букв.
Русские названия в файлах и папках можно вывести вот так:

Код:
If код символа > 126 Then код симола.6 = 1

И так-же обратно для выбора (шестой бит в ноль).

Отредактировано Ev3658 (2017-07-27 14:59:34)

0

Страница: 1