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
|
;
; $Id: test_blink.asm,v 1.3 2002/01/05 00:30:31 troth Exp $
;
; Uses an at90s8515 to make the LEDS flicker
;
;.device AT90S8515
.include "8515def.inc"
.equ delay, 16
.equ delay_hi, 17
.equ cntr, 18
.equ input, 19
rjmp MAIN ; reset
nop ; int0
nop ; int1
nop ; timer1 capt
nop ; timer1 compa
nop ; timer1 compb
nop ; timer1 ovf
nop ; timer0 ovf
nop ; spi, stc
nop ; uart, rx
nop ; uart, udre
nop ; uart, tx
nop ; ana_comp
MAIN: ldi cntr,0xff
ldi delay,0xff ; clear delay
ldi delay_hi,0xff ; clear delay_hi
out DDRB,cntr ; enable portb driver for output
START: in input,PIND
cpi input,0xff
breq START
LIGHTS: out PORTB,cntr ; output the contents of cntr to portb
dec delay ; decrement delay
cpi delay,0 ; compare delay with 0
brne LIGHTS ; branch to LIGHTS if delay <> 0
dec delay_hi ; decrement delay_hi
cpi delay_hi,0 ; compare delay_hi with 0
brne LIGHTS ; branch to LIGHTS if delay_hi <> 0
dec cntr ; decrement cntr
LOOP: rjmp LIGHTS ; go into an infinite loop
|
