Звоните! 
 (926)274-88-54 
 Бесплатная доставка. 
 Бесплатная сборка. 
Ассортимент тканей

График работы:
Ежедневно. С 8-00 до 20-00.
Почта: soft_hous@mail.ru
Читальный зал -->  Устройства ультрафиолетового стирания 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 [ 64 ] 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84

PORTC,

kl 2

PORTC,

k2 1

; Включить правый канал.

PORTC,

k2 2

PORTA,

i ol

; Отключить индикатор левого канала

ind.

i ol

PORTA,

i o2

; Включить индикатор правого канала

ind.

1 o2

goto

konrol

stereo ( СТЕРЕО )

Режим СТЕРЕО , на выход два канала

PORTC,

kl 2

; Включить

левый канал.

PORTC,

k2 1

; Включить

правый канал.

PORTC,

kl 1

PORTC,

k2 2

PORTA,

i o2

; Включить

индикатор правого канала

ind.

i o2

PORTA,

i ol

; Включить

индикатор левого канала.

ind.

i ol

goto

konrol

auto poft

movlw

Oxff - n poft

movwf

TMRO

INTCON, TOIF

movlw

mask stl

iorwf

PORTB, F

PORTB, Stl3

goto

Loops3

****************

********

tst power

movf

ADRES,W

movwf

power

movlw

subwf

power, W

btfss

STATUS, С

ind, i powA

btfsc

STATUS, С

ind, i powA

btfss

STATUS, С

ind, i powN

btfsc

STATUS, С

ind, i powN

movf

ADRES,W

sublw

btfss

STATUS, С

ind, i post

btfsc

STATUS, С

ind, i post

return

movlw

mask i

movwf

PORTA

return

; Разрешить автоповтор нажатой кнопки. ; Установить TMRO t - 500 мС, время ; автоматического повтора нажатой кнопки. ; Запустить таймер.

; Установить на столбцах клавиатуры ; не активный уровень {все единицы). ; Активизировать столбец 3. ; Переход на сканирование клавиатуры, ; ожидание конца счета таймера. ****************************************

; Контроль уровня напряжения питания. ; Считать результат преобразования АЦП.

; Сравнить с min значением напряжения.

; Напряжение > min ?

; Нет, включить индикатор АВАРИЯ питания.

; Напряжение > min ?

; Да, отключить индикатор АВАРИЯ питания.

; Напряжение > min ?

; Нет, отключить индикатор НОРМА питания.

; Напряжение > min ?

; Да, включить индикатор НОРМА питания.

; Сравнить с max значением напряжения.

; Напряжение > max?

; Нет, отключить постоянную индикацию.

; Напряжение > max?

; Да, включить постоянную индикацию.

ind off

; Отключить индикацию.

; Включить индикацию.

movf ind, movwf PORTA return



prog reg

LOOP si

; Запись данных в регуляторы.

LOOP s2

InitialAD

movf

TEMPI, W

movwf

SSPBUF

/Загрузить в передатчик адрес регулятора

STATUS, RPO

; Банк 1

btfss

SSPSTAT, BF

; Установлен флажок конец передачи?

goto

LOOP si

; Нет, ожидание.

STATUS, RPO

; Да, банк 0.

movf

SSPBUF, W

; Чтение SSPBUF, сброс флажков.

movf

TEMPO, W

movwf

SSPBUF

; Загрузить в передатчик данные

STATUS, RPO

, Банк 1

btfss

SSPSTAT, BF

; Установлен флажок конец передачи?

goto

LOOP s2

; Нет, ожидание.

STATUS, RPO

; Банк 0.

movf

SSPBUF, W

; Чтение SSPBUF, сброс флажков.

Return

; Инициализация АЦП

STATUS, RPO

; Банк 1.

movlw

BOOOOOlOO

; Установить каналы 0 -3 как

movwf

ADCONl

; аналоговые входы.

STATUS, RPO

; Банк 0.

movlw movwf bcf

Return

в11000001 ; Синхронизация RC, канал О,

ADCONO ; включить АЦП.

PIR1,ADIF ; Сбросить флажок прерывания АЦП.

StopAD

movlw

movwf

movlw

movwf

Return

BOOOOOOOO ADCONO STATUS, RPO BOOOOOlll-ADCONl STATUS, RPO

Отключить АЦП. Отключить АЦП.

Банк 1.

Отключить аналоговые входы.

Банк 0.

InitialTMRO

clrf

bsf movlw movwf bcf

return

; Инициализация таймера О

; T-lk = 1/4/Fosc/PSA - 1/4/200кГц/256

TMRO ; Tmax = 1.3 С

5 mC.

STATUS, RPO BOlOOOlll OPTION REG STATUS, RPO

; Банк 1.

; Предделитель 1:256.

; Банк О.

; Инициализация модуля последовательного ин-

; Режим ведущего SPI,

; синхронизация Fosc/16.

InitialSSP терфейса.

movlw movwf return

BOOOlOOOl SSPCON

Service int

Return .***************

; Программа обработки прерывания.

********

**********

*****************

**********



17.1.4 ФАЙЛ ДЛЯ ВКЛЮЧЕНИЯ AMPLIFER.H

NOLIST

.****************♦**** *******♦**************************************

; Включаемый Файл программы портативного стереофонического усилителя

; с кнопочным регулятором уров-ня громкости и тембра.

; Файл: AMPLIFER.H

; Дата Изменения:7-12-99

****************

Константы.

.120

; Max питания 9.В В.

; Min питания - 7.7 В.

а vol

; Адрес регулятора уровень.

aflp

; Адрес регулятора фильтра низких частот.

n skan

; Период опроса клавиатуры Т = 20 мС.

n~poft

.100

; Период автоповтора клавиатуры Т = 500 МС.

; Адреса памяти данных.

power

; Напряжение питания 0 - порт А [2].

gain l

; Уровень левого канала.

gain 2

; Уровень правого канала.

bandl

; Фильтр низких частот левого канала.

band 2

; Фильтр низких частот правого канала.

; Регистр индикации.

TEMPO

; Промежуточная ячейка.

TEMPI

; Промежуточная ячейка.

; *ла1Ч1 и разряды.

i post

; , Признак постоянной, индикации

mask i

BOOllllH

; Маска индикации.

maskstl

BOOOOlllO

; Маска столбцов клавиатуры.

mask str

Bliiioooo

; Маска строк клавиатуры.

Описание выводов.

; PORT А:

; напряжение питания - вход АЦП;

i powN

; индикатор Норма питания;

i powA

; индикатор Авария питания;

i o2

; индикатор ВЫХОД 2 ;

i ol

; индика1>ор ВЫХОД 1 .

; PORIB: , . ,

stll

; клавиатура - Столбец 1;

stl2

equ-

; клавиатура - столбец 2;

stl3

; клавиатура - столбец 3;

strO

H*04

; клавиатура - Строка 0;

Strl

; клавиатура т. ртрока 1;

str2

; клавиатура - строка 2;

str3

equ

; клавиатура строка 3.

; PORT C:

kl 2

; выходной ключ, канал 1-2;

kl 1

; выходной ключ, канал 1-1;

VQl,l .

; выбор регул.яторов левого канала;

sine

; синхронизация для регуляторов;

vol 2

; выбор регуляторов правого канала;

; данные для регуляторов;

k2 1

; выходной ключ, канал 2 - 1;

k2 2

t)07

; выходной ключ, канал 2-2.

LIST



1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 [ 64 ] 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84



ООО «Мягкий Дом» - это Отечественный производитель мебели. Наша профильная продукция - это диваны еврокнижка. Каждый диван можем изготовить в соответствии с Вашими пожеланияи (размер, ткань и материал). Осуществляем бесплатную доставку и сборку.



Звоните! Ежедневно!
 (926)274-88-54 
Продажа и изготовление мебели.


Копирование контента сайта запрещено.
Авторские права защищаются адвокатской коллегией г. Москвы
.