надо в ассемблере в таблице организовать базу данных Опции

[Yuriy_AVR]

Всем Привет !
Есть малюсенькая задачка -  _____________________.doc ( 20.5 килобайт ) Кол-во скачиваний: 267
надо в ассемблере в таблице организовать базу данных для сегментов  _____________________.doc ( 20.5 килобайт ) Кол-во скачиваний: 267
в виде , показанном в приложении.
Суть проблемы - каждая цифра должна быть записана в ассемблере на своей строчке ( иначе получается очень длинная запись , и не видна по ширине экрана . Но при записи .db надо сразу записывать 2 байта ( через запятую ) . Теоретически после записи первого байта можно поставить \n
и перейти на следующую строку и всё должно быть хорошо , но ассемблер ругается :

error: syntax error, unexpected '('

с уазанием на ошибку во втором байте ( почему не отрабатывает \n ? или я чтото не так делаю ?

Если кто знает как решить проблему , помогите плиз .
 _____________________.doc ( 20.5 килобайт ) Кол-во скачиваний: 267

[SasaVitebsk]

А почему обязательно в ассемблере?

[Yuriy_AVR]

А почему обязательно в ассемблере?

Программа на писана на ассме .
Тем более что мне ассм больше нравится - каждому своё .

[=GM=]

Программа написана на ассме

Или так

Код

.DB (On<<D7)+(On<<D6)+(On<<D5)+(On<<D4)+(On<<D3)+(Of<<D2)+(On<<D1)+(Of<<D0);0
.DB (Of<<D7)+(Of<<D6)+(Of<<D5)+(Of<<D4)+(On<<D3)+(Of<<D2)+(On<<D1)+(Of<<D0);1
.DB (On<<D7)+(On<<D6)+(Of<<D5)+(On<<D4)+(On<<D3)+(On<<D2)+(Of<<D1)+(Of<<D0);2
. . . . .
.DB (On<<D7)+(Of<<D6)+(On<<D5)+(On<<D4)+(On<<D3)+(On<<D2)+(On<<D1)+(Of<<D0);9

[Yuriy_AVR]

Или так

Код

.DB (On<<D7)+(On<<D6)+(On<<D5)+(On<<D4)+(On<<D3)+(Of<<D2)+(On<<D1)+(Of<<D0);0
.DB (Of<<D7)+(Of<<D6)+(Of<<D5)+(Of<<D4)+(On<<D3)+(Of<<D2)+(On<<D1)+(Of<<D0);1
.DB (On<<D7)+(On<<D6)+(Of<<D5)+(On<<D4)+(On<<D3)+(On<<D2)+(Of<<D1)+(Of<<D0);2
. . . . .
.DB (On<<D7)+(Of<<D6)+(On<<D5)+(On<<D4)+(On<<D3)+(On<<D2)+(On<<D1)+(Of<<D0);9

Да понятно что так можно сделать , но при таком подходе памяти для таблицы будет ровно в 2 раза больше расходоваться . . .

Для большей читабельности програим надо вводить дополнительные переменные с помощью .equ, например:

Код

.equ S1 = (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)

.equ S2 = (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)

а в .db уже использовать их названия, например:

Код

.DB S1,S2,.........

Сочетание '\n' компилятор воспринимает не как перевод строки, а присваивает ему значение Newline (ASCII LF 0x0a) (см. хелп по Студии).

Да наверное это выход . . .
Странно как я ненодумался до такого простого переопределения . Большое спасибо

[=GM=]

Да понятно что так можно сделать , но при таком подходе памяти для таблицы будет ровно в 2 раза больше расходоваться . . .

Да? Это почему же?

[Yuriy_AVR]

Да? Это почему же?

Да потому что у AVRа память программ организована не побайтно ( у AVRа команды то не байтовые ) , а пословно , т.е по 2 байта , а выборка производится побайтно ( именно по этой причине при указании адреса таблицы его необходимо умножать на 2 ) . Оператор .db указывает только на чёное значение адреса , а нечётное значение из Flash можно получить только с нечётным адресом ( т.е сделав указатель на Flash нечётным ). Иными словами , чтобы получить из таблицы байт по указанному адресу , необходимо сложить указатель со смещением . При указанном вами методе необходимо будет смещение умножать на 2 , и затем складывать с указателем . При ассемблировании нечётные ячейки будут пропущены , и фактически потеряны впустую .
Так что итоговый обьём будет равен обьём таблицы х2 .

[Maik-vs]

Да потому что у AVRа память программ организована не побайтно ( у AVRа команды то не байтовые ) , а пословно , т.е по 2 байта , а выборка производится побайтно ( именно по этой причине при указании адреса таблицы его необходимо умножать на 2 ) . Оператор .db указывает только на чёное значение адреса , а нечётное значение из Flash можно получить только с нечётным адресом ( т.е сделав указатель на Flash нечётным ). Иными словами , чтобы получить из таблицы байт по указанному адресу , необходимо сложить указатель со смещением . При указанном вами методе необходимо будет смещение умножать на 2 , и затем складывать с указателем . При ассемблировании нечётные ячейки будут пропущены , и фактически потеряны впустую .
Так что итоговый обьём будет равен обьём таблицы х2 .

Это всё Вы проверяли, или И ТАК знаете?


чтение IDent32:
ldi Yh,high(IDent32)
ldi Yl,low(IDent32)
shl Yl
ror Yh

cyc: lmp r16,Y+
st X+,r16
CPI16 X,C_MsgTable
brlo cyc

(где CPI16 16-разрядное сравнение.)

Объясните, почему у меня это работает?

Сообщение отредактировал Maik-vs - Sep 21 2007, 08:27

[Yuriy_AVR]

Это всё Вы проверяли, или И ТАК знаете?


чтение IDent32:
ldi Yh,high(IDent32)
ldi Yl,low(IDent32)
shl Yl
ror Yh

cyc: lmp r16,Y+
st X+,r16
CPI16 X,C_MsgTable
brlo cyc

(где CPI16 16-разрядное сравнение.)

Объясните, почему у меня это работает?

Так а что здесь может неработать ? Разве что lmp r16,Y+ нет такой команды у AVRов . Выборка из памяти программ производится только через регистровую пару Z ( см. описание системы команд ).
Всё в рамках того , что я и писал .
shl Yl я так понимаю описка , должно быть по идее lsl . Гораздо проще записать так
ldi Yh,high(IDent32 х2)
ldi Yl,low(IDent32 х2)
и нет необходимости в лишних 2 строчках ( lsl Yl и ror Yh )
Так и что вы делаете ? Вы загружаете указатель чётным значением адреса на базу данных , а затем просто инкрементируете указатель , и естественно он будет последовательно выбирать из таблицы правильные значения ( как чётные так и нечётные ) . Но речь то о другом - у вас есть указатель на базу данных и вам необходимо выбрать произвольное значение по этой базе данных ( т.е смещение от начала базы данных ). Ну и как вы будете делать ? например так ? :

ldi Yh,high(IDent32)
ldi Yl,low(IDent32)
shl Yl
ror Yh
add Yl,temp1
clr temp1
adc yh,temp1
lpm temp1,Y
где temp1 - произвольное смещение по таблице
И по вашему вы будете правильно получать значения из базы данных ? Тогда попробуйте , убедитесь в своей неправоте .

Ну тогда напишите в программе

Код

.DB 0
.DB 4

и потом покажите варнинги компилятора и таблицу

А в вашей программе проще и нагляднее написать

Код

.DB "Тестовая болванка"

Простите , непонял . . .

Да! так ставит только по чётным адресам. А DB 0,1 DB2,3 писать не судьба?
А вот это у меня раньше почему-то не работало

DB 0,1 DB2,3 писать не судьба?
Это как это ? Извените , сразу немогу ощутить глубину мысли . . .

Так а что здесь может неработать ? Разве что lmp r16,Y+ нет такой команды у AVRов . Выборка из памяти программ производится только через регистровую пару Z ( см. описание системы команд ).
Всё в рамках того , что я и писал .
shl Yl я так понимаю описка , должно быть по идее lsl . Гораздо проще записать так
ldi Yh,high(IDent32 х2)
ldi Yl,low(IDent32 х2)
и нет необходимости в лишних 2 строчках ( lsl Yl и ror Yh )
Так и что вы делаете ? Вы загружаете указатель чётным значением адреса на базу данных , а затем просто инкрементируете указатель , и естественно он будет последовательно выбирать из таблицы правильные значения ( как чётные так и нечётные ) . Но речь то о другом - у вас есть указатель на базу данных и вам необходимо выбрать произвольное значение по этой базе данных ( т.е смещение от начала базы данных ). Ну и как вы будете делать ? например так ? :

ldi Yh,high(IDent32)
ldi Yl,low(IDent32)
shl Yl
ror Yh
add Yl,temp1
clr temp1
adc yh,temp1
lpm temp1,Y
где temp1 - произвольное смещение по таблице
И по вашему вы будете правильно получать значения из базы данных ? Тогда попробуйте , убедитесь в своей неправоте .
Простите , непонял . . .
DB 0,1 DB2,3 писать не судьба?
Это как это ? Извените , сразу немогу ощутить глубину мысли . . .

Да , в приведённом мной тексте конечно же необходимо заменить Y на Z


Продолжаем прикол .
Так вот , после того , как база данных была записана в необходимом для меня виде :
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\
(Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_Off<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_Off<<D1)+(Seg_Off<<D0),\
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)
.DB (Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_Off<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_Off<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_Off<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\
(Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0)
.DB (Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_Off<<D4)+(Seg_Off<<D3)+(Seg_Off<<D2)+(Seg_Off<<D1)+(Seg_Off<<D0),\
0
и откомпиллирована , а также успешно проверена работоспособность программы , затем в конце каждой строчки были добавлены комментарии ( // ля ля ля ) .

.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\ //
(Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_Off<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0) //
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_Off<<D1)+(Seg_Off<<D0),\ //
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0) //
.DB (Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_Off<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\ //
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_Off<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0) //
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_Off<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\ //
(Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_Off<<D2)+(Seg_On<<D1)+(Seg_Off<<D0) //
.DB (Seg_On<<D7)+(Seg_On<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0),\ //
(Seg_On<<D7)+(Seg_Off<<D6)+(Seg_On<<D5)+(Seg_On<<D4)+(Seg_On<<D3)+(Seg_On<<D2)+(Seg_On<<D1)+(Seg_Off<<D0) //
.DB (Seg_Off<<D7)+(Seg_Off<<D6)+(Seg_Off<<D5)+(Seg_Off<<D4)+(Seg_Off<<D3)+(Seg_Off<<D2)+(Seg_Off<<D1)+(Seg_Off<<D0),\ //
0

И . . . опять всё плохо . Опять компиллятор находит ошибку во второй строчке . Но что самое удивительное - повторное удаление комментариев уже не приводит к положительным результатам . Кто не верит может попробовать . Может у меня уже глаза "замылились " , уже сам себе не верю . Чушь какая- то .

[CDT]

DB 0,1 DB2,3 писать не судьба?

Судьба, если читал:

Код

AVRASM2 allows multiple instructions and directives per line, but its use is not recommended. It is needed to support expansion of multiline preprocessor macros.

и понимать, что выше приведенная запись приведет к сообщению "Unknown instruction or macro", а в правильном написании абсолютно эквивалентна

Код

DB 0,1
DB 2,3