Ассемблер (ASM) для AVR в вопросах и ответах

[Gudd-Head]

Если не ошибаюсь, то минимум - 4 такта на бит.
Т.о. 8 бит будут переданы за 32 такта.

Можно уложиться в 2 такта на бит

[Meteor]

Пропустил слово "программная" и ответил на аппаратный SPI.

Можно уложиться в 2 такта на бит

Не получится за 2 такта, ибо это время необходимое на импульс записи (SCK). К этому добавить сдвиг (1 команда)+ определение бита С (2 команды)+ установка/сброс бита (2 команды) итого минимум 7 команд на бит.

[Gudd-Head]

Пропустил слово "программная" и ответил на аппаратный SPI.

Я тоже

[AI_Disable]

Короче, получилось 84 такта (считая инструкцию вызова). Может можно сделать что-то ещё?

Код: Выделить всё

SPI_send_byte:
	CLR SPIdataRX

	cbi PORTB,MOSI
	SBRC SPIdataTX,7
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b10000000
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,6
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b01000000
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,5
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00100000
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,4
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00010000
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,3
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00001000
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,2
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00000100
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,1
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00000010
	cbi PORTB,SCK

	cbi PORTB,MOSI
	SBRC SPIdataTX,0
	sbi PORTB,MOSI
	sbi PORTB,SCK
	SBIC PINB,MISO
	ori SPIdataRX,0b00000001
	cbi PORTB,SCK

	ret

[Gudd-Head]

Короче, получилось 84 такта (считая инструкцию вызова).

Это получилось для любых передаваемых значений? По моим прикидкам, в худшем случае только на перекачку байта уйдёт 88 тактов.

[AI_Disable]

Да, точно, считал, кода на приём и передачу 0x00. С 0xFF вышло 108 тактов, теперь даже в 100 не укладываюсь...

[Gudd-Head]

Насколько критично, чтобы остальные порты в это время работали нормально?

[AI_Disable]

Насколько критично, чтобы остальные порты в это время работали нормально?

Точно! Спасибо, этим способом сэкономится ещё 32 такта, что меня уже устраивает.

[Gudd-Head]

Точно! Спасибо, этим способом сэкономится ещё 32 такта, что меня уже устраивает.

В общем, вы наверное поняли, но я всё же на всякий случай изложу свою мысль:
Установить все порты, кроме одного на вход. В какой-нить регистр засунуть то, что мы хотим передать. После каждого переданного бита его содержимое сдвигать влево (вправо), возможно через перенос. Так же сдвигать регистр с принятой информацией.
Самый шик был бы объединить эти два регистра: т.е. мы передали бит, на его место записали принятый, сдвинули регистр. И так 7 (один раз можно не сдвигать) или 8 раз подряд

[AI_Disable]

Вообще, нет, я подумал о другом: пользовать инструкцию out вместо sbi и cli. Ваша идея понравилась, но боюсь, что для её реализации, придётся повесить на землю резики для SS и SCK и подтянуть к плюсу SS.

[DR_MORRO]

Господа знающие, как можно общаться с вот такого рода массивом?

Код: Выделить всё

.db 0b00011110,0b00111111,0b00011111,0b00111111
.db 0b00100001,0b00100001,0b00100001,0b00100001
.db 0b00100001,0b00000001,0b00100001,0b00000001
.db 0b00100001,0b00011111,0b00011111,0b00000001
.db 0b00111111,0b00100001,0b00100001,0b00000001
.db 0b00100001,0b00100001,0b00100001,0b00000001
.db 0b00100001,0b00011111,0b00011111,0b00000001
.db 0b00000000,0b00000000,0b00000000,0b00000000

это собственно шрифт, выгружать выборочно строками, одна поправка, код не полный, в строке массива 48 байт

[Gudd-Head]

Господа знающие, как можно общаться с вот такого рода массивом?

Ммм... Ну, всякие команды типа LD или LPM, например.

[avreal]

Установить все порты, кроме одного на вход.

Не обязательно. Главное, чтобы во время работы программного SPI из прерываний состояние этих портов не менялось.

После каждого переданного бита его содержимое сдвигать влево (вправо), возможно через перенос. Так же сдвигать регистр с принятой информацией.

Когда речь идёт о максимальной скорости, сдвигать невыгодно. Цикл всё равно развёрнут и в каждом месте выгоднее по скорости применить нужную маску, чем всё время одну и ту же маску и сдвиг. Кроме того, полезно вспомнить о BLD/BST
Как-то так (в зависимости от нужного режима SPI, фаз сдвига и опроса), тело функции без расходов на вызов и на ret - 66 тактов независимо от данных.

Код: Выделить всё

.nolist
#define __SFR_OFFSET 0
#include <avr/io.h>
.list
        .text

        .global spi_io
#define txbuf r16
#define rxbuf r17
#define temp  r18

#define SCK 0
#define MOSI 1
#define MISO 2

spi_io:
        clr     rxbuf
        in      temp, PORTB

        .set    i, 7
        .rept 8
                ori     temp, (1 << SCK)
                bst     txbuf, i
                bld     temp, MOSI
                out     PORTB, temp
                andi    temp, ~(1 << SCK)
                out     PORTB, temp
                sbic    PINB, MISO
                ori     rxbuf, (1 << i)
                .set    i, i-1
        .endr

        ret

        .end

p.s. Это для avr-gcc, но любой приличный ассемблер должен позволять не писать восемь раз подряд почти одинаковый код

[AI_Disable]

avreal, спасибо, но я не могу использовать инструкцию out, т.к. другие пины порта B заняты.

[avreal]

Что значит "заняты" ?

В самом начале командой

Код: Выделить всё

        in temp, PORTB

сохраняем текущее состояние выводов (значение на ножке для выходных, включенность pull-up для входных) и оно не меняется в процессе работы процедуры.

Конечно, если состояние PORTB меняется из прерываний, то так делать нельзя.

[AI_Disable]

Что значит "заняты" ?

Там ШИМ.

[avreal]

Если ШИМ аппаратный, это не должно мешать. Посмотрите картинки Alternate Port Functions в разделе I/O ports в документации. Если включается аппаратная альтернативная функция, то выход мультиплексором переключается с триггера в PORTx на ту аппаратную функцию.

Кстати, в варианте без использования команд out тоже можно подсократить время для тех контроллеров, у которых есть PORTx toggle by PINx write, т.е., кажется, для всех достаточно новых.
В самом начале в свободный регистр загрузить константу с маской для вывода SCK (1 такт) и установить SCK в начальное состояние командой SBI или CBI с регистром PORTx (2 такта).
А в процессе вывода вместо пары двухтактовых команд SBI/CBI для выдачи ипульса на SCK использовать две однотактовых команды OUT PINx, которыми инвертировать состояние PORTx.
Итого экономия (1+1)*8 - 3 = 13 тактов на процедуре.

[AI_Disable]

Всю свою сознательную жизнь писал только на си, сейчас вот решил хоть немного освоить асм. Этот асм уже кажется просто ужосом каким-то Тов. avreal, не могли бы вы свой предыдущий пост выразить в прокомментированном коде?
Я привык, что компилятор всю сложную работу за меня делал, теперь вот пришло время отвыкать...

[des808]

Всем привет! вот написал код для RC5, не могли бы вы уважаемые коты взглянуть на мой код подсказать где у меня ошибки. В общем код вроде работает но показывает только в comands 2 paзных числа при нажатии пульта ДУ. исходник прилагаю

[GP1]

Впал в ступор...
Дано:
Студия 4.18 SP2 b.700
Требуется:
запустить Т0 с предделителем 1/8, нормальный режим, прерывание по переполнению
запустить Т1 с тактовой Fo, нормальный режим, прерывание по переполнению
Собс..но код:

Код: Выделить всё

; настройка таймеров
; T0
		clr	tmp
		out	TCCR0A,tmp
		ldi	tmp,2			; Fo/8
		out	TCCR0B,tmp

		ldi	tmp,1<<TOIE0
		out	TIMSK0,tmp
; T1
		clr	tmp
		out	TCCR1A,tmp
		out	TCCR1C,tmp
		ldi	tmp,1
		out	TCCR1B,tmp
		ldi	tmp,1<<TOIE1
		out	TIMSK1,tmp

Т0 - запускается и тикает, причем и в студии и в железе
Т1 - молчит как "рыба об лед", и там и там.
к чему бы это?