Предыдущая Следующая

91

Л исти н г 4.1. П родолжен и е

out TIMSK,tmp ;разрешаем прерывания по

/переполнению от T1 ldi tmp,$8F ;настройка режима #10001111

out TCCR1, tmp /вывод 0С1А, линия вывода !?31) пор

/выполнение условия "женской" логики (включение 30 минут) clz

cpi tmp5, $05 /установлена "женская" логика? brne qq9 rcall zad30 nop

qq9: nop

/нет "женской" логики sbi portb, 0 rcall zadl nop

rjmp nStart nop

/выключение света poff: nop

cbi portb, 0

rcall zadl

nop

rjmp nStart ; подпрограмма прерывания таймера TIMER1: nop /вектор прерывания

nop

inc I clz

cpi i, $FF breq yu /настройка таймера Tl

/работа таймера Tl с максимальным предварительным делением ldi tmp,$04

/установка флага при переполнении

;подпрограмма включения света

/зключить свет

/задержка 1 секунда

/эоззращение в начало

;задержка 1 секунда /возвращение з начало

out ldi out

ldi out

TIFR,tmp tmp,$04 TIMSK,tmp

tmp,$8F TCCR1, tmp

/разрешаем прерывания по /переполнению от Tl /настройка режима #10001111 ;зызод ОС1А, линия зызода (?31)

rjmp ррр пор

clr i cbi пор ret i

portb, 0

;выход из подпрограммы прерывания

92

Глава 4

Листинг 4.1. Продолжение

/подпрограмма задержки "30 минут"

zad30:

: nop

 
 

ldi

tmp6, S1E

ert:

nop

 
 

ldi

tmp, $3C

edc:

nop

 
 

rcall

zadl

 

clz

 
 

dec

tmp

 

brne

ssw

 

rjmp

ttw

ssw:

nop

 
 

rjmp

edc

ttw:

nop clz

 
 

dec

tmp6

 

brne

s3

 

rjmp

tt

ss:

nop

 
 

rjmp

ert

tt:

nop ret

 

;подпрограмма

задержки

zadl:

nop wdr

 
 

ldi

M, $A1

dm:

nop

 
 

ldi

X, $71

 

ldi

Y, $31

goq:

nop

 

dv:

nop wdr

 
 

ldi

Y, $31

dx:

nop

 
 

ldi

tmp, $05

dl :

nop nop nop cln

 
 

inc

tmp

 

nop

 
 

nop

 
 

nop

 
 

nop

 
 

brpl

di

 

noo

 

;задаем 30 минут

;задаем 60 с

/подпрограмма "1 с"

/уменьшить секунды /переход по не разно (Z)

; цикл условия

/уменьшить минуты /переход по не разно (2)

/цикл услозия

:выход из подпрограммы

с"

Автоматическое освещение шкафа

93

Листинг 4.1. Окончание

cln пор

inc Y brpl dx cln

inc X nop

brpl dv cln

inc M nop

brpl dm

nop

ret

Листинг 4 2. Шестнадцатиричный код управления освещением

:020000020000FC

:1000000013C00 00 00 00 0 000 05DC00 00 00 00 0 000 00 0 :020010000000ЕЕ

:100028000000442747BB4 8BB4 4274FE047BB3B27DA :1000380000001127222733274427552766277727СВ :1000480088279927АА274ЕЕ14 7В3000048335527С0 :1000 58COB49B03C000007 3E002C0000077270000D3 :10006800B39B03C00 00095E002COOOO09927000080 :1000780048335527В29909С000009894733029F005 :10008800319903С0000015С000000000С09А44Е008 :10009800483F44Е0493F4FE8403F000098949530FE :1000A8O011F41ED0O000O0OOCO9A2FDO0 0OOC0CF6D :1000380000000000C0982 9D0000 03ACF0000000 05E :1000C800339598943F3F39F04 4S04 83F4 4E04 93F36 :1000D8004FE84 03F03C000C03327С0980000189538 :1300S8000000AEE10 0004CE300000FD09894 4A9 560 :1000F8000 9F402COOOOOF8CF0 00 09894AA9 509F40A :100108O002C00O0OEFCF0O0008950000A89511SA92 :10011800000031Е 721Е300000 00 0А8 9521Е3000 07А :1С012 8ОО4 5Е0О0ОО0О000000А8944 39 5ОООООООО8Е : 1001 38000000000 032F70000A894 С 00 02 3957AF7A9 : 10014800А8943395000042F7A8941395000002F78D =040158000000089506 tOCOOOOClFF


Предыдущая Следующая






Warning: include(./news.php) [function.include]: failed to open stream: No such file or directory in /var/www/picprof/data/www/picprof.com/book/book8_37.html on line 703

Warning: include(./news.php) [function.include]: failed to open stream: No such file or directory in /var/www/picprof/data/www/picprof.com/book/book8_37.html on line 703

Warning: include() [function.include]: Failed opening './news.php' for inclusion (include_path='.:/usr/share/pear:/usr/share/php') in /var/www/picprof/data/www/picprof.com/book/book8_37.html on line 703