Z = регистры 30 и 31. Командой ldi с директивами HI(digits) и LOW(digits) загрузить туда двухбайтный адрес переменной.Финский писал(а):как в Z подставить адрес digits?
, но получилось следующее:Код: Выделить всё
; процедура индикации
DISPLAY:
ldi ZH, High(digits) ; загружаем старший байт адреса массива времени
ldi ZL, Low(digits) ; то же - младший
add ZL, razr ; прибавляем к младшему байту адреса требуемый разряд (от 0-го до 5-го)
ld temp1, Z ; загружаем байт по получившмуся адресу в временный регистр
ldi ZH,High(DATA*2) ;инициализация массива цифр (маски вида 0b00111111 - цифра 0)
ldi ZL,Low(DATA*2) ;
add ZL, temp1 ; прибавляем к нулевому адресу массива выводимую цифру из оперативки (только младший полубайт)
lpm outport, Z ; получившуюся маску загружаем в регистр вывода данных
ldi ZH,High(ADDRESS*2) ; инициализация массива разрядов (маски вида 0b11111110 - нулевой разряд )
ldi ZL,Low(ADDRESS*2)
add ZL, razr ; выбираем из массива адрес, соответствующий текущему разряду
lpm temp3, Z ; загружаем байт в регистр R0
out PORTC, temp3 ; выводим адрес в порт к к-рому подкл. общие катоды
out PORTD, outport ; выводим данные в порт к к-рому подкл. сегменты
inc razr ; увеличиваем разряд, чтобы на след цикле вывести след значение в след адрес
cpi razr, 6 ; как только значение разрядов превышает 5
brne EXIT_DISP
clr razr ; обнуляем счетчик цикла
EXIT_DISP:
ret
Код: Выделить всё
clr r17
ldi ZL, Low(ARRAY*2)
ldi ZH, High(ARRAY*2)
add ZL, razr
adc ZH, r17
Код: Выделить всё
.org 0xA000
ARRAY:
.db .......
Я это подразумевал, но не озвучилDX168B писал(а):add ZL, razr
Я в своё время на эти грабли наступил.
Код: Выделить всё
clr r17
adc ZH, r17
Хорошая идея. Особенно если учесть что максимально приближенный к этой теме есть только курс "цифровая техника" в 48 часов, где вам расскажут что такое эл-т "и", "и-не", что есть сдвиговый регистр и т.п. и усё. А если учесть что даже мой руководитель дипломного проекта не умеет ни шить ни писать прошивки к МК, то получается вообще весело.Gudd-Head писал(а):Есть: учиться нормально.orion777 писал(а):Может есть какие то идеи?
Неправильно. Если адрес, к примеру, 0x18, то это не значит, что в ZL записываем 0x18, а в ZH - ничего. Нуль в ZH придется занести в любом случае, потому как неизвестно, что там было раньше. При этом неважно - в начале или конце программы расположили массив констант.Финский писал(а): Тогда адреса гарантированно будут попадать в однобайтный размер. А в процедуре сэкономим несколько директив ) Правильно мыслю, или снова грабли не заметил?
Код: Выделить всё
clr r17
ldi ZL, Low(ARRAY*2)
ldi ZH, High(ARRAY*2)
add ZL, razr
adc ZH, r17С какого такого перепугу ?Финский писал(а):Просто в случае расположения массива в начале младший байт будет намного меньше предельного значения 0xFF, следовательно при небольших массивах (и размерах смещения к последнему элементу)
Дык эта... Не так, чтобы изящнее, но не нужно ни обнулённый регистр держать, ни обнулять по случаю свободный.Gudd-Head писал(а):Тоже так делаю. Как я понимаю, изящней флаг переноса не прибавить.Код: Выделить всё
clr r17 adc ZH, r17
Круто, я тоже так хочу.avreal писал(а):А я - так:Код: Выделить всё
mov ZL, in_dat clr ZH subi ZL, Low( -(tab1*2) ) sbci ZH, High( -(tab1*2) ) lpm out_dat, Z
Это просто изящный прием, позволяющий обойти отсутствие в инструкциях AVR команды "суммирование с константой", назовем ее условно ADI.DX168B писал(а):Круто, я тоже так хочу.avreal писал(а):А я - так:Код: Выделить всё
mov ZL, in_dat clr ZH subi ZL, Low( -(tab1*2) ) sbci ZH, High( -(tab1*2) ) lpm out_dat, Z
Только объясните мне выражение "( -(tab1*2) )" Почему именно так записано?
. Ну, это для косвенного перехода. А я имел в виду просто прибавить флаг переноса к содержимому регистра.avreal писал(а):Дык эта... Не так, чтобы изящнее, но не нужно ни обнулённый регистр держать, ни обнулять по случаю свободный.
http://radiokot.ru/forum/viewtopic.php? ... 40#p726327
Ну там раньше обсуждлся косвенный переход. Тут ближе - выборка из массива по индексу. Разницы никакой -- есть фиксированный адрес (16-бит константа) и есть смещение к нему (8-бит переменная), надо сложить.Gudd-Head писал(а):Ну, это для косвенного перехода.
Код: Выделить всё
ldi ZL, Low(ARRAY*2)
ldi ZH, High(ARRAY*2)
add ZL, razr
brcc no_carry ; эти две команды вместе с меткой можно для упрощения написания
inc ZH ; оформить в макрос add_carry, принимающий регистр, к которому добавить
no_carry:Код: Выделить всё
clr r17
ldi ZL, Low(ARRAY*2)
ldi ZH, High(ARRAY*2)
add ZL, razr
adc ZH, r17