Перейти к содержанию

Реверс двигателя (ATMega16) - AVR


Max1201

Рекомендуемые сообщения

Код с помощью которого двигатель вращается в одном направлений по часовой стрелке.
А нужно "составить программу на языке ассемблера для реверсивного управления электродвигателем постоянного тока". так написано в заданий
Но я думаю можно новую не писать, а можно изменить эту так что бы двигатель вращался в одну сторону и потом в другую, наверно так. Помогите, а то я вообще не понимаю этот ассемблер(( 

;* На выходе OC1A МК АТmega16 получаем выходные импульсы
;* с частотой 50 Гц и коэффициентом заполнения g=0,025.
;* Тактовая частота MK AVR: 4 МГц
.nolist
.include"m16def.inc"
.list
 
.def STAT = r15                 ;Регистр для хранения состояния главной программы
.def WorkH = r16                ;Рабочий регистр для главной программы
.def WorkI = r17                ;Рабочий регистр для прерывания от таймера
.def AddLo = r18                ;Вспомогательный регистр для прибавления константы
.equ Impuls = 9000              ;Число тактовых сигналов, соответствующее импултсу
.equ Pause = 1000               ;Число тактовых сигналов, соответствующее паузе
 
Reset:
rjmp Initial                    ;Переход к части инициализации
reti                            ;Внешнее прерывание 0 (не используется)
reti                            ;Внешнее прерывание 1 (не используется)
reti                            ;Прерывание по захвату (не используется)
Timer1CompA:                    ;Прерывание CompareA для ATmega16
in STAT,SREG                    ;Сохраняем флаги главной программы
in WorkI,TCCR1A                 ;Регистр управления А счетчика Т/С1
sbrs WorkI,COM1A0               ;Пропускаем следующую команду, если COM1A0 = 1
rjmp TC1                        ;Пропускаем следующую команду, если COM1A0 = 0
cbr WorkI,1<<COM1A0             ;При следующем прерывании OC1A -> 1
out TCCR1A,WorkI                ;Сохраняем новое значение
in AddLo,OCR1AL                 ;Младший байт OCR1A
subi AddLo,Low(-Impuls)         ;Прибавляем младший байт значения импульса
in WorkI,OCR1AH                 ;Старший байт OCR1A
sbci WorkI,High(-Impuls)        ;Прибавляем старший байт значения импульса
rjmp IntEnde                    
TC1:                            
sbr WorkI,1<<COM1A0             ;При следующем прерывании OC1A -> 1         
out TCCR1A,WorkI                ;Сохраняем новое значение
in AddLo,OCR1AL                 ;Младший байт OCR1A
subi AddLo,Low(-Pause)          ;Прибавляем младший байт значения длительности импульса
in WorkI,OCR1AH                 ;Старший байт OCR1A
sbci WorkI,High(-Impuls)        ;Прибавляем старший байт значения длительности импульса
IntEnde:                        
out OCR1AH,WorkI                ;Назад - старший байт нового значения
out OCR1AL,AddLo                ;Назад - младший байт нового значения
out SREG,STAT                   ;Восстанавливаем старые флаги
reti                            ;Выход из обработки прерывания CompareA
 
Initial:                        ;Инициализация регистра ввода/вывода
ldi WorkH,High(RamEnd)          
out sph,WorkH                   
ldi WorkH,Low(RamEnd)           
out spl,WorkH                   ;Инициализируем стек
clr WorkH                       ;Все разряды = 0
out PortD,WorkH                 ;Вывод в порт D
ldi WorkH,$20                   ;Разряд 5 - в 1, остальные - в 0
out DDRD,WorkH                  ;OC1A (PD5) - выход, остальные входы
ldi WorkH,High(Pause)           ;Старший байт значения паузы
out OCR1AH,WorkH                ;в старший байт регистра сравнения А
ldi WorkH,Low(Pause)            ;Младший байт значения паузы
out OCR1AL,WorkH                ;в младший байт регистра сравнения А
ldi WorkH,$C0                   ;OC1A -> 1
out TCCR1A,WorkH                ;Сохраняем новое значение
ldi WorkH,$02                   ;Входной такт Т/С1 = такт сист. синхр./8
out TCCR1B,WorkH                ;Запускаем Т/С1
ldi WorkH,$40                   
out TIMSK,WorkH                 ;Разрешаем прерывание CompareA
sei                             ;Общее разряшение прерываний (разряд I)
Haupt:                          
rjmp Haupt                      ;Главная часть программы: ожидаем возникновения прерывания

Программа работает двигатель крутиться по часовой стрелке, Препод сказал что на один вход мы сигнал подали теперь нужно его сохранить и подать на другой, на фотках схема подключения и установка

d50I1pc3RQg.jpg

e-5ynSa8oWw.jpg

EsW2drcSpUE.jpg

UqMa3Upkoz4.jpg

В методичке это 4 лаба, там программа не та но теория та что и вновой методичке

lab_rab_MK_AVR.pdf

Ссылка на комментарий
Поделиться на другие сайты

7 минут назад, Max1201 сказал:

я вообще не понимаю этот ассемблер

Возьмите другой, который понимаете.

Заплатите преподу, и Вам ни один язык программирования не нужен будет. Или буквари в зубы и учиться.

Ссылка на комментарий
Поделиться на другие сайты

12 минуты назад, Max1201 сказал:

 

Код с помощью которого двигатель вращается в одном направлений по часовой стрелке.

 

Двигатель вращается без помощи кода, по крайней мере тот, что на стенде на фото. Твой код, видимо, для шагового двигателя. У тебя коллекторный двигатель через H-мост, управление двумя выводами, на них 1-0 или 0-1 в зависимости от нужного направления. Писать надо с нуля, и полное задание тоже надо знать!

Ссылка на комментарий
Поделиться на другие сайты

Сравнительное тестирование аккумуляторов EVE Energy и Samsung типоразмера 18650

Инженеры КОМПЭЛ провели сравнительное тестирование аккумуляторов EVE и Samsung популярного для бытовых и индустриальных применений типоразмера 18650. 

Для теста были выбраны аккумуляторы литий-никельмарганцевой системы: по два образца одного наименования каждого производителя – и протестированы на двух значениях тока разряда: 0,5 А и 2,5 А. Испытания проводились в нормальных условиях на электронной нагрузке EBD-USB от ZKEtech, а зарядка осуществлялась от лабораторного источника питания в режиме CC+CV в соответствии с рекомендациями в даташите на определенную модель. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

6 часов назад, Max1201 сказал:

Помогите, а то я вообще не понимаю этот ассемблер

Для чего же вы тогда учитесь? Чтобы потом штаны в офисе протирать? Смените профессию, пока не поздно.

Ссылка на комментарий
Поделиться на другие сайты

Новый аккумулятор EVE серии PLM для GSM-трекеров, работающих в жёстких условиях (до -40°С)

Компания EVE выпустила новый аккумулятор серии PLM, сочетающий в себе высокую безопасность, длительный срок службы, широкий температурный диапазон и высокую токоотдачу даже при отрицательной температуре. 

Эти аккумуляторы поддерживают заряд при температуре от -40/-20°С (сниженным значением тока), безопасны (не воспламеняются и не взрываются) при механическом повреждении (протыкание и сдавливание), устойчивы к вибрации. Они могут применяться как для автотранспорта (трекеры, маячки, сигнализация), так и для промышленных устройств мониторинга, IoT-устройств. Подробнее параметры и результаты тестов новой серии PLM по ссылке.

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

Код ужасен. Фотматирование отсутствует, осмысленные комментарии тоже.

Цитата

Reset:

rjmp Initial ;Переход к части инициализации

reti ;Внешнее прерывание 0 (не используется)

reti ;Внешнее прерывание 1 (не используется)

reti ;Прерывание по захвату (не используется)

Timer1CompA: ;Прерывание CompareA для ATmega16

in STAT,SREG

Зачем здесь метка RESET? Да еще практически синоним метки Initial. По адресу Timer1CompA идет не переход на обработчик, а сразу его код. А вдруг понадобится добавить прерываний? А где записанные явным образом адреса векторов (.org OC1Aaddr + rjmp Tim1_CompA_vect).

Главный вопрос - зачем тут вообще используется таймер?

8 часов назад, Max1201 сказал:

ldi WorkH,$40

out TIMSK,WorkH

За такое надо по рукам бить. Тем более что в других местах вместо магических чисел используются нормальные сдвиги.

8 часов назад, Max1201 сказал:

subi AddLo,Low(-Pause) ;Прибавляем младший байт значения длительности импульса

А почему в коде - Pause?

.

Проще переписать с нуля под конкретное ТЗ чем переделывать ЭТО.

Ругался на отсутствие форматирования исходного кода (включая отсутствие осмысленных комментариев и наличие неубранного после конфигуратора мусора) не менее 15 раз.

Часть моих наработок.

Ссылка на комментарий
Поделиться на другие сайты

Литиевые батарейки и аккумуляторы от мирового лидера  EVE в Компэл

Компания Компэл, официальный дистрибьютор EVE Energy, бренда №1 по производству химических источников тока (ХИТ) в мире, предлагает продукцию EVE как со склада, так и под заказ. Компания EVE широко известна в странах Европы, Америки и Юго-Восточной Азии уже более 20 лет. Недавно EVE была объявлена поставщиком новых аккумуляторных элементов круглого формата для электрических моделей «нового класса» компании BMW.

Продукция EVE предназначена для самого широкого спектра применений – от бытового до промышленного. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

Программа с методички, автор сам препод, по заданию преподавателя исправить программу чтобы двигатель вращался в другую сторону...

jnA65ZDHUPA.jpg

uZTjZnniMSw.jpg

Ссылка на комментарий
Поделиться на другие сайты

@Max1201 для таких заявок у нас есть раздел "Вакансии и разовая работа".

http://forum.cxem.net/index.php?/forum/15-вакансии-и-разовая-работа/

Никогда не спорьте с дураком - люди могут не заметить между вами разницы

Ссылка на комментарий
Поделиться на другие сайты

16 часов назад, Max1201 сказал:

я вообще не понимаю этот ассемблер((

Хм... А почему бы это не сказать преподу и не написать прогу на том, что понимаете ? Думаю, он пойдёт на встречу.
 

Ссылка на комментарий
Поделиться на другие сайты

Он наверное ни на чем не понимает в программировании .

Что может быть лучше в радиоэлектронике, чем программирование микроконтроллеров ?

Ссылка на комментарий
Поделиться на другие сайты

.include "m16def.inc"
.equ ROTATE_DIRECTION = 1

sbi DDRD,4
sbi DDRD,5

.if ROTATE_DIRECTION
  sbi PORTD,4
  cbi PORTD,5
.else
  cbi PORTD,4
  sbi PORTD,5
.endif

CYCLE:
  rjmp CYCLE

Вот как ЭТО можно исправить: стереть к двоичным демонам и написать по-нормальному.

Ругался на отсутствие форматирования исходного кода (включая отсутствие осмысленных комментариев и наличие неубранного после конфигуратора мусора) не менее 15 раз.

Часть моих наработок.

Ссылка на комментарий
Поделиться на другие сайты

Тема работы 

Цитата

функционирование таймерного модуля в МК

 

Никогда не спорьте с дураком - люди могут не заметить между вами разницы

Ссылка на комментарий
Поделиться на другие сайты

Выход на схеме на мост с OCB1A ,  OCB1B ,  чтоб не только направление,  но и скорость задавать .

Тут надо студенту книжку покупать по АВР и читать . Судя по повороту  схемы не только по АВР .

 

 

Ссылка на комментарий
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.

Гость
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Ответить в этой теме...

×   Вставлено с форматированием.   Восстановить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...
  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...