@Programming

Проц SN8P2602AP018

По распиновке туда 1:1 встаёт PIC16F84. Программировать PIC я умею. Программа для пылика не сложная. Опрос двух кнопок, управление 7 сегментами LED индикатора и управление симистором по таймеру. Такую прогу написать займёт часа 2-3. Но как-то не хочется напрягаться только ради одного этого пылика.

Вопрос: Часто ли в ремонте бывает подобная модель пылика со сдохшим процессором?
Если ещё хоть парочка будет, кому в такой модуль проц нужен бывает, то сяду и напишу прогу для проца.

0

@Programming

Код LIST p=16F84, R=OCT

indf equ 0
tmr equ 1
pcl equ 2
sr equ 3
fsr equ 4
p1 equ 5
p2 equ 6
eedat equ 10
eeadr equ 11
intcon equ 13
kepw equ 14
kepsr equ 15
prgn equ 16
flag equ 17
b1del equ 20
b2del equ 21
b1c equ 22
b2c equ 23
outv equ 24

org 0
bcf sr,5
movlw 23
movwf p1
goto start
org 4
intp movwf kepw
movf sr,0
movwf kepsr
bcf sr,5
btfsc intcon,2
call clk
btfsc intcon,0
call phase
movf kepsr,0
movwf sr
movf kepw,0
bsf intcon,7
retfie
phase movlw 23
movwf p1
bcf intcon,0
movf p2,0
btfsc flag,4
goto ph2
movf outv,0
bcf sr,5
movwf tmr
bcf flag,2
incf outv,1
call power
subwf outv,0
btfss sr,1
bsf flag,4
goto ph1
ph2 call power
bcf sr,5
movwf tmr
bcf flag,2
ph1 bsf flag,3
return
start bsf sr,5
movlw 363
movwf p1
movlw 200
movwf p2
movlw 105
movwf tmr
bcf sr,5
movlw 250
movwf intcon
movlw 3
movwf prgn
clrf b1del
clrf b2del
clrf flag
clrf outv
cikl call massiv
bcf sr,5
movwf p2
btfss flag,3
goto cikl
btfsc p1,0
goto lab1
btfss b1del,4
goto lab3
btfsc flag,0
goto lab9
clrf b1c
bsf flag,0
lab10 incf prgn,1
movlw 10
subwf prgn,0
btfss sr,0
goto lab4
movlw 10
movwf prgn
goto lab4
lab9 incf b1c,1
btfss b1c,7
goto lab4
movlw 35
subwf b1c,1
goto lab10
lab3 incf b1del,1
goto lab4
lab1 movf b1del,1
btfss sr,2
goto lab2
bcf flag,0
goto lab4
lab2 decf b1del,1
lab4 btfsc p1,1
goto lab5
btfss b2del,4
goto lab6
btfsc flag,1
goto lab11
clrf b2c
bsf flag,1
lab12 decf prgn,1
btfss prgn,7
goto lab8
clrf prgn
goto lab8
lab11 incf b2c,1
btfss b2c,7
goto lab8
movlw 35
subwf b2c,1
goto lab12
lab6 incf b2del,1
goto lab8
lab5 movf b2del,1
btfss sr,2
goto lab7
bcf flag,1
goto lab8
lab7 decf b2del,1
lab8 bcf flag,3
goto cikl
clk bcf intcon,2
btfsc flag,2
goto clk1
bsf flag,2
movlw 37
movwf p1
movlw 370
movwf tmr
return
clk1 movlw 23
movwf p1
bcf flag,2
return
massiv bcf prgn,7
bcf prgn,6
bcf prgn,5
bcf prgn,4
movf prgn,0
addwf pcl,1
retlw 237
retlw 310
retlw 214
retlw 226
retlw 244
retlw 240
retlw 217
retlw 200
retlw 204
retlw 377
power bcf prgn,7
bcf prgn,6
bcf prgn,5
bcf prgn,4
movf prgn,0
addwf pcl,1
retlw 202
retlw 212
retlw 220
retlw 226
retlw 234
retlw 242
retlw 254
retlw 300
retlw 360
retlw 0
end

Только что немного подкорректировал таблицу мощностей чтобы мощность нормально регулировалась от 1 до 9. Добавил плавный разгон, изменил начальное состояние, теперь он включается сразу на 4. Так имхо лучше. Думал ещё дописать сохранение во флэш последнего состояния но передумал. Там есть проблема с плавным пуском если включено на 9. Не стал докапываться, и так хорошо работает. Вобщем выше дан уже окончательный вариант проги.

Доработки модуля для установки PIC16F84: Сигнал сетевой синхронизации перенесён на ножку 13. Управление средним сегментом индикатора, которое было на ножке 13 переключено на ножку 6, которая по сути свободна. Тот резистор что там стоял просто выпаян и выброшен. В сигнал управления симистором вставлен один транзистор BC547 как эмитерный повторитель, так как порты проца даже соединённые 2 вместе к сожалению не тянут ток управления симистора.

0

@Programming

Подумал я, подумал... А фиг с ним, выкину ка я эту тему в открытый раздел. Авось кому и пригодится. Ламеру полюбому не понять, а если что-то понял значит уже не ламер. Прошивку специально не даю, кто понимает, тот прошивку поймёт как отсюда взять.

0