You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
180 lines
2.3 KiB
180 lines
2.3 KiB
10 years ago
|
;pracuje jako 5-ti bitovy binarni citac
|
||
|
|
;vystupy 3 a 4 jsou prohozene kvuli desce
|
||
|
|
.device attiny13
|
||
|
|
.def cnt=r18
|
||
|
|
.def RED=r19
|
||
|
|
.def GREEN=r20
|
||
|
|
.def BLUE=r21
|
||
|
|
.def chc=r22
|
||
|
|
.def faze=r23
|
||
|
|
|
||
|
|
.org 0x0000 ;RESET
|
||
|
|
RJMP RESET ;skok na start po resetu
|
||
|
|
.org 0x0006 ;TC0 overflow
|
||
|
|
RJMP CASOVAC
|
||
|
|
.org 0x0007
|
||
|
|
rjmp casovac
|
||
|
|
|
||
|
|
.org 0x0010
|
||
|
|
RESET:
|
||
|
|
ldi r16,low(RAMEND) ;nastavi stack pointer
|
||
|
|
out SPL,r16
|
||
|
|
|
||
|
|
cli ;zakazat vsechna preruseni
|
||
|
|
|
||
|
|
ldi r16,0b00011111 ;výstupní = 1
|
||
|
|
out DDRB,r16
|
||
|
|
|
||
|
|
ldi r16,0 ;vypnout PullUp
|
||
|
|
out PORTB,r16
|
||
|
|
|
||
|
|
ldi r16,0b00000011 ;TC0 prescaler na 64
|
||
|
|
out TCCR0B,r16 ;4800000/32
|
||
|
|
|
||
|
|
ldi r16,0b00000010 ;TC0 je v rezimu CTC
|
||
|
|
out TCCR0A,r16
|
||
|
|
|
||
|
|
ldi r16,20 ;overflow 22
|
||
|
|
out OCR0A,r16 ;
|
||
|
|
|
||
|
|
in r16, TIMSK0 ;interrupt enable
|
||
|
|
ORI r16, 0b00000100
|
||
|
|
out timsk0,r16
|
||
|
|
|
||
|
|
ldi RED,0 ;R
|
||
|
|
ldi GREEN,16 ;G
|
||
|
|
ldi BLUE,32 ;B
|
||
|
|
clr cnt
|
||
|
|
clr chc
|
||
|
|
clr faze
|
||
|
|
|
||
|
|
sei ;zapnout globalne interrupt
|
||
|
|
|
||
|
|
LOOP:
|
||
|
|
rjmp LOOP ;skok na loop
|
||
|
|
|
||
|
|
CASOVAC:
|
||
|
|
inc cnt
|
||
|
|
|
||
|
|
cpi cnt,32
|
||
|
|
breq ov0
|
||
|
|
rjmp nov
|
||
|
|
ov0:
|
||
|
|
clr cnt
|
||
|
|
cbi portb,0
|
||
|
|
cbi portb,1
|
||
|
|
cbi portb,2
|
||
|
|
|
||
|
|
inc chc
|
||
|
|
cpi chc,30
|
||
|
|
breq ov1
|
||
|
|
rjmp nov
|
||
|
|
ov1:
|
||
|
|
inc faze
|
||
|
|
clr chc
|
||
|
|
cpi faze,12
|
||
|
|
brne fazenov
|
||
|
|
clr faze
|
||
|
|
fazenov:
|
||
|
|
cpi faze,0
|
||
|
|
breq f0
|
||
|
|
cpi faze,1
|
||
|
|
breq f1
|
||
|
|
cpi faze,2
|
||
|
|
breq f2
|
||
|
|
cpi faze,3
|
||
|
|
breq f3
|
||
|
|
cpi faze,4
|
||
|
|
breq f4
|
||
|
|
cpi faze,5
|
||
|
|
breq f5
|
||
|
|
cpi faze,6
|
||
|
|
breq f6
|
||
|
|
cpi faze,7
|
||
|
|
breq f7
|
||
|
|
cpi faze,8
|
||
|
|
breq f8
|
||
|
|
cpi faze,9
|
||
|
|
breq f9
|
||
|
|
cpi faze,10
|
||
|
|
breq f10
|
||
|
|
cpi faze,11
|
||
|
|
breq f11
|
||
|
|
f0:
|
||
|
|
ldi RED,0
|
||
|
|
ldi GREEN,32
|
||
|
|
ldi BLUE,32
|
||
|
|
rjmp nov
|
||
|
|
f1:
|
||
|
|
ldi RED,0
|
||
|
|
ldi GREEN,16
|
||
|
|
ldi BLUE,32
|
||
|
|
rjmp nov
|
||
|
|
f2:
|
||
|
|
ldi RED,8
|
||
|
|
ldi GREEN,8
|
||
|
|
ldi BLUE,32
|
||
|
|
rjmp nov
|
||
|
|
f3:
|
||
|
|
ldi RED,16
|
||
|
|
ldi GREEN,0
|
||
|
|
ldi BLUE,32
|
||
|
|
rjmp nov
|
||
|
|
f4:
|
||
|
|
ldi RED,32
|
||
|
|
ldi GREEN,0
|
||
|
|
ldi BLUE,32
|
||
|
|
rjmp nov
|
||
|
|
f5:
|
||
|
|
ldi RED,32
|
||
|
|
ldi GREEN,0
|
||
|
|
ldi BLUE,16
|
||
|
|
rjmp nov
|
||
|
|
f6:
|
||
|
|
ldi RED,32
|
||
|
|
ldi GREEN,8
|
||
|
|
ldi BLUE,8
|
||
|
|
rjmp nov
|
||
|
|
f7:
|
||
|
|
ldi RED,32
|
||
|
|
ldi GREEN,16
|
||
|
|
ldi BLUE,0
|
||
|
|
rjmp nov
|
||
|
|
|
||
|
|
f8:
|
||
|
|
ldi RED,32
|
||
|
|
ldi GREEN,32
|
||
|
|
ldi BLUE,0
|
||
|
|
rjmp nov
|
||
|
|
f9:
|
||
|
|
ldi RED,16
|
||
|
|
ldi GREEN,32
|
||
|
|
ldi BLUE,0
|
||
|
|
rjmp nov
|
||
|
|
f10:
|
||
|
|
ldi RED,8
|
||
|
|
ldi GREEN,32
|
||
|
|
ldi BLUE,8
|
||
|
|
rjmp nov
|
||
|
|
f11:
|
||
|
|
ldi RED,0
|
||
|
|
ldi GREEN,32
|
||
|
|
ldi BLUE,16
|
||
|
|
rjmp nov
|
||
|
|
|
||
|
|
nov:
|
||
|
|
cp cnt,RED
|
||
|
|
brne notr
|
||
|
|
sbi portb,0
|
||
|
|
|
||
|
|
notr: cp cnt,GREEN
|
||
|
|
brne notg
|
||
|
|
sbi portb,1
|
||
|
|
|
||
|
|
notg: cp cnt,BLUE
|
||
|
|
brne notb
|
||
|
|
sbi portb,2
|
||
|
|
notb:
|
||
|
|
reti
|
||
|
|
|