Контроллер электрофокусера

[Pavels]

Cхемка тут https://astronomy.ru/forum/index.php/topic,13180.msg1791881.html#msg1791881?
Какой тип энкодера?

[MAKsutik]

Cхемка тут https://astronomy.ru/forum/index.php/topic,13180.msg1791881.html#msg1791881?
Какой тип энкодера?

Наименование не скажу, зашел на рынок увидел купил,модель не интересовала так как они практически однотипны, по моему 24 тика на оборот

[Ivan7enych]

Вань есть небольшой нюанс в программе твоей, в окошке позиция значения меняются а вот направление вращения U,D стоит на месте когда крутишь энкодер, с программы на компьютере когда крутишь фокусер направление меняется

Понял, посмотрю в прошивке.

[Pavels]

Понял, посмотрю в прошивке.

Собрал прошивку из последних выложенных - пропали грелки.Может не то скачал?

[MAKsutik]

Какой тип энкодера?

http://www.labkit.ru/userfiles/file/documentation/Encoders/PEC16.pdf
http://www.labkit.ru/userfiles/file/documentation/Encoders/PEC12.pdf

[Pavels]

Собрал энкодер,только крутит почему-то только в одну сторону ,диод горит постоянно.Пару раз начинал крить и обратно но не долго.
Энкодер такой http://web.argus.lv/shop/productinfo/EC12E1220813/hwindex.htmМожет пик прошил не так,там устовки какие нужны или всё в прошивке указано?

[danica]

У этого энкодера общий по центру.
Может перепутали.

[Pavels]

У этого энкодера общий по центру.
Может перепутали.

Я в курсе.И R2 на схеме не туда нарисован.

[Mi (3) CH]

Ну таки заработало? А то я без энкодера не хочу оставаться! 

[Pavels]

Собрал энкодер,только крутит почему-то только в одну сторону ,диод горит постоянно

Сдох энкодер.Заменил.Работало примерно минуту и опять то-же самое.Есть у кого идеи почему они дохнут?

[MAKsutik]

Собрал энкодер,только крутит почему-то только в одну сторону ,диод горит постоянно

Сдох энкодер.Заменил.Работало примерно минуту и опять то-же самое.Есть у кого идеи почему они дохнут?

Эт как он сдох??? Там ведь контакты и все

[MAKsutik]

Собрал энкодер,только крутит почему-то только в одну сторону ,диод горит постоянно.Пару раз начинал крить и обратно но не долго.
Энкодер такой http://web.argus.lv/shop/productinfo/EC12E1220813/hwindex.htmМожет пик прошил не так,там устовки какие нужны или всё в прошивке указано?

Конфигурация пика в прошивке (если программатор поддерживает эту функцию)

[MAKsutik]

На всяк случай

Код: [Выделить]

list P=PIC12F675
#include<p12f675.inc>
; Configuration is:
;   Master Clear pin is disabled (used as input)
;   Code Protection is OFF
;   Watchdog Timer is ON
;   Oscillator is Internal RC
 __FUSES          _CP_OFF &  _MCLRE_OFF &_BODEN_ON & _CP_OFF & _WDT_ON & _INTRC_OSC_NOCLKOUT

CBLOCK 20h
Reg_1
Reg_2
Reg_3
ENDC

#define CW_in GPIO,0
#define CCW_in GPIO,1
#define Led GPIO,2
#define dir_revers GPIO,3
#define step GPIO,4
#define dir GPIO,5

org 0x00
goto         Init_IO


org 0x04
retfie


Init_IO
clrf    INTCON
                bsf     STATUS, RP0             ; bank 1
                clrf    OPTION_REG
                clrf    PIE1
                clrf    WPU
                movlw   H'FF'
                movwf   TRISIO
                clrf    VRCON
 
                movlw   B'01100000'             ; все входы цифровые
                movwf   ANSEL
 
bcf     TRISIO, 5 ; выход
bcf     TRISIO, 4 ; выход
bsf     TRISIO, 3 ; вход dir реверс
                bcf     TRISIO, 2      ; светодиод выход
                bsf     TRISIO, 0    ; вход
  bsf    TRISIO, 1      ; вход
                bcf     OPTION_REG, NOT_GPPU    ; подтягивающий резистор к кнопке
                bsf     WPU,0 ; подтягивающий резистор к кнопке
  bsf     WPU,1 ; подтягивающий резистор к кнопке

                bcf     STATUS, RP0             ; bank 0
                bsf     CMCON, CM0              ; выключить компараторы
                bsf     CMCON, CM1
                bsf     CMCON, CM2
                clrf    ADCON0                  ; выключить АЦП
  bcf     STATUS, RP0             ; bank 0
clrwdt
movlw b'00001110' ;включить WDT пределитель 1:128
movwf OPTION_REG
clrwdt
                bsf     GPIO, 2          ; светодиод погасить
bsf     GPIO, 4
bsf     GPIO, 5 
Main
btfss dir_revers
goto Main_Loop_revers

Main_Loop
clrwdt
BANKSEL GPIO
btfss CW_in
call Step_CW
btfss CCW_in
call Step_CCW
goto Main_Loop


Step_CW
call Delay
btfsc CW_in
return
bcf dir
nop
bcf step
nop
bcf Led
bsf step
Wait_zero_CCW
clrwdt
btfsc CCW_in
goto Wait_zero_CCW
call Delay
btfsc CCW_in
goto Wait_zero_CCW
Wait_1_CCW
clrwdt
btfss CCW_in
goto Wait_1_CCW
call Delay
btfss CCW_in
goto Wait_1_CCW
bcf dir
bsf Led
return


Step_CCW
call Delay
btfsc CCW_in
return
bsf dir
nop
bcf step
nop
bcf Led
bsf step
Wait_zero_CW
clrwdt
btfsc CW_in
goto Wait_zero_CW
call Delay
btfsc CW_in
goto Wait_zero_CW
Wait_1_CW
clrwdt
btfss CW_in
goto Wait_1_CW
call Delay
btfss CW_in
goto Wait_1_CW
bsf dir
bsf Led
return
;Revers--------------------------
Main_Loop_revers
clrwdt
BANKSEL GPIO
btfss CW_in
call Step_CW_revers
btfss CCW_in
call Step_CCW_revers
goto Main_Loop_revers


Step_CW_revers
call Delay
btfsc CW_in
return
bsf dir
nop
bcf step
nop
bcf Led
bsf step
Wait_zero_CCW_revers
clrwdt
btfsc CCW_in
goto Wait_zero_CCW_revers
call Delay
btfsc CCW_in
goto Wait_zero_CCW_revers
Wait_1_CCW_revers
clrwdt
btfss CCW_in
goto Wait_1_CCW_revers
call Delay
btfss CCW_in
goto Wait_1_CCW_revers
bsf dir
bsf Led
return


Step_CCW_revers
call Delay
btfsc CCW_in
return
bcf dir
nop
bcf step
nop
bcf Led
bsf step
Wait_zero_CW_revers
clrwdt
btfsc CW_in
goto Wait_zero_CW_revers
call Delay
btfsc CW_in
goto Wait_zero_CW_revers
Wait_1_CW_revers
clrwdt
btfss CW_in
goto Wait_1_CW_revers
call Delay
btfss CW_in
goto Wait_1_CW_revers
bcf dir
bsf Led
return


Delay
; Задержка 1 000 машинных циклов
; Длительность задержки 1 миллисекунд
; Частота задающего генератора 4 МГц

            movlw       .75
            movwf       Reg_1
            movlw       .2
            movwf       Reg_2
            decfsz      Reg_1,F
            goto        $-1
            decfsz      Reg_2,F
            goto        $-3
  return

[danica]

У меня все работает,но иногда всеже проскакивают
ошибки с направлением.Как я почитал,вроде все просто
и в тоже время...
Юра вот ссылочка может пригодится
http://avrhobby.ru/index.php?option=com_content&view=article&id=100:2011-10-16-08-23-54&catid=34:projectsmk&Itemid=71
Правда там С и авр.

Собрал энкодер,только крутит почему-то только в одну сторону ,диод горит постоянно

Сдох энкодер.Заменил.Работало примерно минуту и опять то-же самое.Есть у кого идеи почему они дохнут?

Только если брак попался.
Там по описанию вроде 30000 оборотов жизни.
PS. У меня сначала стоял энкодер,вроде инкриментный,но выдавал
на гора-один степ с минуса на плюс,второй с плюса на минус,и по кругу.
Пока не заменил.

[MAKsutik]

У меня без проблем все работает уже месяц.
Понравилось такое считывание http://easyelectronics.ru/avr-uchebnyj-kurs-inkrementalnyj-enkoder.html , на досуге сделаю еще одну прошивку.
Вчера говорил с Павлом о его проблеме, это может быть не качественный энкодер (есть сомнения) или же при прошивке (самопальным программатором у которого 12 вольт появляются после 5 вольт а нужно на оборот)убили калибровочную константу RC генератора, тогда МК может вытворять чудеса.
Не все программаторы умеют тереть камни с IntOsc & MclrE_Off по причине того, что ядро успевает запуститься раньше, чем программатор переведет его в режим программирования...


можно в исходник добавить код, должно вроде помочь.
1.
   ORG 0x3FF
   retlw 0x80

2. (более простой)
   movlw 0x80
   movwf OSCCAL

По теме http://aes.at.ua/publ/proshivka_pic/9-1-0-214 , http://aes.at.ua/publ/vosstanovlenie_osscal_dlja_12f629_12f675/9-1-0-271

[Pavels]

У меня все работает,но иногда всеже проскакивают
ошибки с направлением.

Поменял энкодер с 12 на 24 такта стало лучше.Заметил особенность глюка энкодера - при полном шаге энкодера всё нормально:мотор делает шаг,диод на энкодере одно моргание всё крутит и туда и обратно.Но стоит чуть недокрутить и остановится в промежуточном положении :диод остаётся гореть ,при попытке крутить в обратном направлении движок продолжает крутить вперёд и диод при этом не моргает.Глюк?

[MAKsutik]

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

[Mi (3) CH]

Короче из-за меня одни проблемы. 
ЗЫ. Кстати, от скорости вращения энкодера ничего не меняется? Т.е. скорость вращения ШМ.

[Ivan7enych]

Понравилось такое считывание http://easyelectronics.ru/avr-uchebnyj-kurs-inkrementalnyj-enkoder.html , на досуге сделаю еще одну прошивку.

Неплохой алгоритм. Может я его в сам фокусер вставлю, повесив на прерывание по 0-му таймеру.
Тем более что в обработке dir-step я забыл компенсацию люфта.

[MAKsutik]

Понравилось такое считывание http://easyelectronics.ru/avr-uchebnyj-kurs-inkrementalnyj-enkoder.html , на досуге сделаю еще одну прошивку.

Неплохой алгоритм. Может я его в сам фокусер вставлю, повесив на прерывание по 0-му таймеру.
Тем более что в обработке dir-step я забыл компенсацию люфта.

Ваня было бы неплохо, а то как то два МК в схеме ....