к сожалению на виндовс 10 у меня отказывается ставиться. Попробовал так же скачать с сайта атмел последнюю версию, выдает ошибку при скачивании.Demiurg писал(а):AVR-Studio 4.19Shark-vc писал(а):...
А вот это вы зря сказали... Теперь точно никто не поможет. По крайней мере бесплатно. и в этой теме, которая про ассемблер, а не про дисплеи. И так уже срачу развели.Shark-vc писал(а):курсовая из-за него идет под каток :с
СКАЗОЧНИК писал(а):А вот это вы зря сказали... Теперь точно никто не поможет. По крайней мере бесплатно. и в этой теме, которая про ассемблер, а не про дисплеи. И так уже срачу развели.Shark-vc писал(а):курсовая из-за него идет под каток :с
простите за оффтоп. Можно его удалить.
З.Ы. Не ставится АВР Студио 4.19, значит снесите свою винду 10 и поставьте винду 8... Вот и все решение проблемы.
Код: Выделить всё
.include "m8_ini_st.asm" ;ATmega8 + стек
;используемые переменные
.def dat_LCD = r17
.def temp = r16
;------------------------------------------------------
.cseg ;данная директива означает, что дальше идет код программы
rcall ini_lcd ; Инициализация портов и ЛСД., и п/п записи команд и кода в ЛСД по 4-и шинам
; используемые порты D (D4...D7) и B (B0, B1)
; данные загружаем в "dat_LCD" он же - R17 и идем на ... "zap_dan" (rcall zap_dan)
; команды загружаем в "dat_LCD" он же - R17 и идем на "zap_com" (rcall zap_com)
;========== программа =========
; программа просмотра символов ЛСД
; от 0 до 255 - просматриваем знакогенератор ЛСД
m1: ldi r24,0x00
mov r0,r24 ; R0 - счетчик и hex код для преобразования
m2: ldi dat_lcd,0x83; устанавливаем курсор в 6-ю позицию
rcall zap_com ;
rcall pr_hex ; преобразование hex в ASCII
mov dat_lcd,pr_dat_h; выводим старшее значение hex кода
rcall zap_dan
mov dat_lcd,pr_dat_l; выводим младшее значение hex кода
rcall zap_dan
ldi dat_lcd,0x3d ; знак "="
rcall zap_dan
ldi dat_lcd,0x3e ; знак ">"
rcall zap_dan
mov dat_lcd,r0 ; сам hex код на выход
rcall zap_dan
ldi temp,255 ; задержка между выводим символов
rcall zad_b_
rcall zad_b_
rcall zad_b_
rcall zad_b_
inc r0 ; следующий знак
mov r24,r0
brne m2 ; тут можно поставить и "rjmp m2", ну чтобы флаги зря не проподали...
rjmp m1
.include "ini_LCD_4pin.asm"
.include "zad.asm"
.include "hex2ascii.asm"
Код: Выделить всё
.nolist ;данная директива отключает генерацию кода в листинг,
; т.е. далее в файле *.lss не будет фиксироваться
;ассемблерный код
.include "m8def.inc" ;подключение стандартного заголовочного файла для ATmega8
.list ;данная директива включает генерацию кода в листинг, т.е.
;далее в файле *.lss будет фиксироваться ассемблерный код
;УСТАНОВКА СТЕКА
ldi R16,low(RAMEND) ;скопируем в R16 младщий байт из константы RAMEND,
;которая определена в m8def.inc и хранит размер SRAM
out SPL,R16 ;скопируем значение из R16 в SPL
ldi R16,high(RAMEND) ;скопируем в R16 старший байт из константы RAMEND,
;которая определена в m8def.inc
out SPH,R16 ;скопируем значение из R17 в SPH
Код: Выделить всё
; Инициализация портов и ЛСД., и п/п записи команд и кода в ЛСД по 4-и шинам
; используемые порты D (D4...D7) и B (B0, B1)
;
;+++++++++ описалово ++++++++
;
; инициализация портов для ЛСД и самого ЛСД - точка входа: "ini_lcd"
;
; данные загружаем в "dat_LCD" он же - R17 и идем на ... "zap_dan" (rcall zap_dan)
; команды загружаем в "dat_LCD" он же - R17 и идем на "zap_com" (rcall zap_com)
;
;++++++++++++++++++++++++++++++
;-----------------------------------------------------
; обознач. на схеме выводы на mega8, на ЛСД
.set RS = 0 ;В0(14) <=> RS(4),
.set E = 1 ;B1(15) <=> E(6)
.set D4 = 4 ;D4(6) <=> D4(11)
.set D5 = 5 ;D5(11) <=> D5(12)
.set D6 = 6 ;D6(12) <=> D6(13)
.set D7 = 7 ;D7(13) <=> D7(14)
;.equ portB,1 = pinE
;.equ portB,0 = pinRS
;------------------------------------------------------------
;используемые регистры
.def dat_LCD = r17
.def temp = r16
ini_lcd:
; используемые порты D и B
; --- настройка портов
ldi temp,0xff
out ddrD,temp ; порт D на Выход
out ddrB,temp ; порт B на Выход
ldi temp,0x00
out portD,temp ; обнуляем порт D
out portB,temp ; обнуляем порт B
; --- инициализация ЛСД 4 шин
ldi temp,255 ; в данном случае - максимальная задержка
rcall zad_b_
rcall zad_b_ ;задержка после подачи питания
ldi dat_LCD,0x20 ; включить 4-и шинный обмен 1 строка (0x28 - 2 строки)
cbi portB,RS ; LCD - прием команд
rcall save1 ; запись
ldi dat_LCD,0x28 ; включить 4-и шинный обмен 2 строка (0x20 - 1 строки)
rcall zap_com
rcall zad_m
ldi dat_LCD,0x01 ; очистка памяти, курсор с лева
rcall zap_com
ldi temp,0xff ; большая задержка
rcall zad_b_
ldi dat_LCD,0x0e ; вид курсора
rcall zap_com
ldi dat_LCD,0x06 ; авто-сдвиг в право
rcall zap_com
ret
;----- запись команд в ЛСД -----8
zap_com:
cbi portB,RS ; LCD - прием команд
rjmp save
;----- запись данных в ЛСД -----
zap_dan:
sbi portB,RS ; LCD - прием данных
; -- процесс записи -----------
save:
push dat_LCD ; подготовка старшего полубайта (команды или данных):
andi dat_LCD,0xf0 ; очищаем младший полубайт
rcall save1 ; запись старшего полубайта (команды или данных)
pop dat_lcd
swap dat_LCD ; подготовка младшего полубайта (команды или данных)
andi dat_LCD,0xf0 ; очищаем младший полубайт
; запись младшего полубайта (команды или данных)
save1:
sbi portB,E ; подготовка строба
rcall zad15
out portD,dat_LCD ; вывод полубайта (команды или данных) на шины
rcall zad15
cbi portB,E ; строб записи полубайта (команды или данных)
rcall zad15
ret
Код: Выделить всё
;Преобразование hex кода в код для вывода на печать.
;
; П/П преобразования использует R24, R25
;
;(((((((((((((: ОПИСАЛОВО :))))))))))))))))
; - 1 -------
; Вход: для преобразования байта, оный заносим в r24 (pr_dat_l)
; точка входа "pr_hex"
;
; Выход: "pr_dat_h" = r25 - старший символ от входного (r24 (pr_dat_l)),
; pr_dat_l = r24 - младший символ
;
; - 2 ------
; Вход: для преобразования полубайта, оный заносим в r24 (pr_dat_l) младшие разряды (4-0)
; точка входа "pr_polu_bait"
;
; Выход: "pr_dat_l" = r24
;
;(((((((((((((((((((((((()))))))))))))))))))))))
;===============
;используемые переменные
.def pr_dat_h = r25
.def pr_dat_l = r24
pr_hex:
mov pr_dat_h,pr_dat_l ; запоминаем младший полубайт
swap pr_dat_l ; подготавливаем старший полубайт
rcall pr_polu_bait ; идем преабразовывать
push pr_dat_l ; запоминаем результат старшого полубайта
mov pr_dat_l,pr_dat_h ; младший полубайт на обработку
pop pr_dat_h ; старший результат в "pr_dat_h" R25
rcall pr_polu_bait
ret
pr_polu_bait:
andi pr_dat_l,0x0f ; очищаем старший полубайт
cpi pr_dat_l,0xa ; узнаем это цифра или буква (R24-9)
brcc bukvi ; флаг переноса очищен => R24>9 т.е буквы A,B,C,D,E,F
ori pr_dat_l,0x30 ; если цифра - добавляем в старший полубайт 30h чтоб
ret ;получить код ascii... код готов
bukvi: subi pr_dat_l,0x9 ; если буква - корректируем...
ori pr_dat_l,0x40 ; добавляем 40h. код готов.
ret
Код: Выделить всё
;---- задержка -----
;
;--------- описалово ---------------
;
; используемые регистры R14,R15,R16
; R16 - он же "temp" - для загрузки констант, которые определяются самим писуном,
; в зависимости от частоты камняи и т.д...
; R14, R15 - счетные регистры - соответственно для малой и большой задержок
;
; ВХОДЫ - zad_m; zad_b - соответственно для малой и большой задержок - с
; записанными константами
; zad_m_; zad_b_ - соответственно для малой и большой задержок с привнесенной
; константой в R16 - он же "temp"
; ВЫХОД - зря потраченное время :)
;-------------------------------------------------------------
;.org pp_zad
.def temp = r16
; ---- малая задержка ---
zad_m: ldi temp,255
zad_m_: mov r14,temp
l_zad_m: dec r14 ;R14-1
brne l_zad_m ;переход если R14 <> 0
ret
zad15: ldi temp,15
rjmp zad_m_
; ----множитель малой задержки ---
zad_b: ldi temp,123
l_zad_b: rcall zad_m
dec r15
brne l_zad_b
RET
zad_b_: mov r15,temp
l_zad_b1: rcall zad_m_
dec r15
brne l_zad_b1
RET
) места. Описать его в начале (либо в другом месте), а вливаться ему в программу по указанной метке. (Но это уже, наверное, из области макросов в коих я пока вообще никак.) А так хотелось - указал в начале (либо в другом месте) программы, что нулевой пин порта "B" - это здесь и далее по тексту обозначается как "pinRS", - то при замене на любой другой вывод, надо только переназначить "pinRS" и не гонятся по всему тексту за "portB,0".
Код: Выделить всё
#define TEST B
#define _PORT(x) PORT##x
#define PORT(x) _PORT(x)
sbi PORT(TEST),0
Хм... Замудрёно как-то. Но если сильно хочется, то...Vaha писал(а):Вопрос: - существует ли возможность includ-ы описывать, вставлять в верху файла, а их реальное размещение происходило по метке. Например: в файле "hex2ascii.asm" вставить строчку ".org pp_hex2ascii", а гдето в теле программы в нужном месте поставить метку "pp_hex2ascii:" - типа, чтоб сюда влился код из файла "hex2ascii.asm"?
Обычно наоборотVaha писал(а):.equ portB,0 = pinRS
Слева то, чему присваивают, справа то чему равно. 
Кстати, вот один из методов проверки регистра на равенство нулю без изменения его значения. Я сейчас не про AVR, а в общемСКАЗОЧНИК писал(а):О! Все. Пока писал понял. Спасибо. Вопрос снят.
Код: Выделить всё
or Reg,0x00
А если и были, то это всего лишь другая мнемоника все той же команды AND Rx,Rx или ANDI Rx, 0xFF, так что недостающую TEST легко прописать макросом для любого камняZ_h_e писал(а):Не во всех процессорах были команды типа TEST.
Код: Выделить всё
ADIW R24,0
SBIW ZL,0Да и не должен таймер срабатывать по переполнению. По сравнению со значением в OCR1A будет срабатывать.Jetetex писал(а):Всем доброго времени суток, помогите с компаатором на ат90с2313. Написал алгоритм с прерыванием по совпадению компаратора, а он почему-то работает по переполнению.
Так и будет. Вы не включили режим CTC1, поэтому только первая секунда будет формироваться правильно.Jetetex писал(а):...Только отставание не 10, а 2 сек. Тоесть у мк в минуте 62сек, что совпадает с переполнением.
Код: Выделить всё
.INCLUDE "2313def.inc"
.equ Fo=4000000
.def temp=r16
.ORG 0
RJMP RESET
.ORG 4
Timer1_comp1:
NOP
RETI
reset:
ldi Temp,RamEnd ;инициализация стека
out SPL,Temp
ldi Temp,0b11111111 ;настройка портов
out DDRB,Temp
ldi Temp,0b01111000
out ddrd,Temp
ldi Temp,HIGH(Fo/64-1) ;инициализация компаратора
out OCR1AH,Temp
ldi Temp,LOW(Fo/64-1)
out OCR1AL,Temp
; ldi Temp,0xF4 ;инициализация компаратора
; out OCR1AH,Temp
; ldi Temp,0x24
; out OCR1AL,Temp
ldi Temp,0b01000000 ;разрешить прерывание компаратора
out TIMSK,Temp
OUT TIFR,Temp
ldi Temp,0b00001011 ;тактовый сигнал = Fo/64 режим CTC
out TCCR1B,Temp
sei
RJMP PC
.exit
А я все думал, на кой ляд в AVR куча дублирующих команд, а их оказывается нет. Проверить лень было, вернее все хотел посчитать какое реальное количество команда камня AVR, но так и не посчитал.Jack_A писал(а): то это всего лишь другая мнемоника
AT90S2313COKPOWEHEU писал(а):ат90с2313 или AT90S2313?
Даже из приведенного куска кода видно, что используется компаратор первого таймера -COKPOWEHEU писал(а):Аналоговый компаратор или блок сравнения таймера?
В архиве (см пост выше) есть исходник, там весь текст программы.COKPOWEHEU писал(а):Покажите инициализацию в человеческом виде (присвоение регистрам не магических чисел, а использование сдвигов и битовых операций, наличие осмысленных комментариев).
). 
(долго мучело - мяучело, подсмотрел на просторах "сети" 
)
Поскольку нормальной ссылки на код не было и нет, в первую очередь приходится судить по описанию. А под термином "компаратор" в первую очередь понимают именно аналоговый компаратор, а вовсе не блок сравнения таймеров.Jetetex писал(а): Даже из приведенного куска кода видно, что используется компаратор первого таймера -
Что мешало дать нормальную ссылку на тот код, который вы пытались скомпилировать? Посыл "где-то в той теме, в последнем посте" воспринимаются как "ищите сами, если найдете ошибку - не то нашли". Если имелось в виду вот это, то там всего один файл, отдаленно похожий на код, и тот не исходник. Зачем копировать туда содержимое стандартных заголовочных файлов? Зачем там адреса и коды команд? Куда уползает форматирование? Почему ни одна настройка не сделана по-человечески (со сдвигами, логическими операциями и комментариями)?Jetetex писал(а): В архиве (см пост выше) есть исходник, там весь текст программы.
Зачем-то прокомментировано обнуление TCNT1, хотя эта операция и так видна из кода. Зато сравнение Temp5 с 0b00000000 оставлено без внимания. Что такое Temp5? Что такое 0b00000000, что его пришлось записывать в двоичной форме? Только имя метки относительно осмыслено (это включение десятичной точки?).Timer1_comp1:
| 000063 E040 | ldi Temp,0 ;обнуление таймера
| 000064 BD4D | out TCNT1H,Temp
| 000065 BD4C | out TCNT1L,Temp
| 000066 3050 | cpi Temp5,0b00000000
| 000067 F011 | breq point_on
| 000068 E050 | ldi Temp5,0b00000000
| 000069 C001 | rjmp Shift
| 00006A E850 | point_on: ldi Temp5,0b10000000
Вообще-то сначала чему присваивает, потом что, в вашем случае pinRS <- PortB0, то есть присвоить "переменной" pinRS значение PortB0, то есть 0 (не особо понимаю, чем в данном случае константы portB0, pinB0, ddrB0, PB0 и т.п. лучше простого десятичного числа 0, но, видимо, кому-то нравится).И на счет директивы .EQU - сперва что присваиваем, потом кому., в моем случае:
