led7seg.s
author |
Tero Marttila <terom@paivola.fi> |
|
Thu, 03 Apr 2014 19:44:13 +0300 |
changeset 51 |
ec6271f0637b |
parent 32 |
7ceb76b5a104
|
permissions |
-rw-r--r-- |
make: fix build-deps, and avr-objdump -d build/src/hello.elf
build/src/hello.elf: file format elf32-avr
Disassembly of section .text:
00000000 <__vectors>:
0: 0c 94 34 00 jmp 0x68 ; 0x68 <__ctors_end>
4: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
8: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
c: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
10: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
14: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
18: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
1c: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
20: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
24: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
28: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
2c: 0c 94 58 00 jmp 0xb0 ; 0xb0 <__vector_11>
30: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
34: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
38: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
3c: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
40: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
44: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
48: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
4c: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
50: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
54: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
58: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
5c: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
60: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
64: 0c 94 3e 00 jmp 0x7c ; 0x7c <__bad_interrupt>
00000068 <__ctors_end>:
68: 11 24 eor r1, r1
6a: 1f be out 0x3f, r1 ; 63
6c: cf ef ldi r28, 0xFF ; 255
6e: d8 e0 ldi r29, 0x08 ; 8
70: de bf out 0x3e, r29 ; 62
72: cd bf out 0x3d, r28 ; 61
74: 0e 94 90 00 call 0x120 ; 0x120 <main>
78: 0c 94 a3 00 jmp 0x146 ; 0x146 <_exit>
0000007c <__bad_interrupt>:
7c: 0c 94 00 00 jmp 0 ; 0x0 <__vectors>
00000080 <timer_init>:
80: 10 92 80 00 sts 0x0080, r1
84: 88 e0 ldi r24, 0x08 ; 8
86: 80 93 81 00 sts 0x0081, r24
8a: 10 92 82 00 sts 0x0082, r1
8e: 08 95 ret
00000090 <timer1_start>:
90: 10 92 85 00 sts 0x0085, r1
94: 10 92 84 00 sts 0x0084, r1
98: 90 93 89 00 sts 0x0089, r25
9c: 80 93 88 00 sts 0x0088, r24
a0: f1 9a sbi 0x1e, 1 ; 30
a2: 82 e0 ldi r24, 0x02 ; 2
a4: 80 93 6f 00 sts 0x006F, r24
a8: 8d e0 ldi r24, 0x0D ; 13
aa: 80 93 81 00 sts 0x0081, r24
ae: 08 95 ret
000000b0 <__vector_11>:
b0: 1f 92 push r1
b2: 0f 92 push r0
b4: 0f b6 in r0, 0x3f ; 63
b6: 0f 92 push r0
b8: 11 24 eor r1, r1
ba: 10 92 81 00 sts 0x0081, r1
be: f1 98 cbi 0x1e, 1 ; 30
c0: 0f 90 pop r0
c2: 0f be out 0x3f, r0 ; 63
c4: 0f 90 pop r0
c6: 1f 90 pop r1
c8: 18 95 reti
000000ca <timer_sleep>:
ca: 0e 94 48 00 call 0x90 ; 0x90 <timer1_start>
ce: 81 e0 ldi r24, 0x01 ; 1
d0: 83 bf out 0x33, r24 ; 51
d2: 01 c0 rjmp .+2 ; 0xd6 <timer_sleep+0xc>
d4: 88 95 sleep
d6: 8e b3 in r24, 0x1e ; 30
d8: 81 fd sbrc r24, 1
da: fc cf rjmp .-8 ; 0xd4 <timer_sleep+0xa>
dc: 13 be out 0x33, r1 ; 51
de: 08 95 ret
000000e0 <serial_init>:
e0: 10 92 c0 00 sts 0x00C0, r1
e4: 10 92 c1 00 sts 0x00C1, r1
e8: 86 e0 ldi r24, 0x06 ; 6
ea: 80 93 c2 00 sts 0x00C2, r24
ee: 87 e6 ldi r24, 0x67 ; 103
f0: 90 e0 ldi r25, 0x00 ; 0
f2: 90 93 c5 00 sts 0x00C5, r25
f6: 80 93 c4 00 sts 0x00C4, r24
fa: 08 95 ret
000000fc <serial_enable>:
fc: 88 e1 ldi r24, 0x18 ; 24
fe: 80 93 c1 00 sts 0x00C1, r24
102: 08 95 ret
00000104 <serial_read>:
104: 80 91 c0 00 lds r24, 0x00C0
108: 87 ff sbrs r24, 7
10a: fc cf rjmp .-8 ; 0x104 <serial_read>
10c: 80 91 c6 00 lds r24, 0x00C6
110: 08 95 ret
00000112 <serial_write>:
112: 90 91 c0 00 lds r25, 0x00C0
116: 95 ff sbrs r25, 5
118: fc cf rjmp .-8 ; 0x112 <serial_write>
11a: 80 93 c6 00 sts 0x00C6, r24
11e: 08 95 ret
00000120 <main>:
120: 1f 93 push r17
122: 0e 94 40 00 call 0x80 ; 0x80 <timer_init>
126: 0e 94 70 00 call 0xe0 ; 0xe0 <serial_init>
12a: 25 9a sbi 0x04, 5 ; 4
12c: 0e 94 7e 00 call 0xfc ; 0xfc <serial_enable>
130: 78 94 sei
132: 88 e5 ldi r24, 0x58 ; 88
134: 10 e2 ldi r17, 0x20 ; 32
136: 0e 94 89 00 call 0x112 ; 0x112 <serial_write>
13a: 85 b1 in r24, 0x05 ; 5
13c: 81 27 eor r24, r17
13e: 85 b9 out 0x05, r24 ; 5
140: 0e 94 82 00 call 0x104 ; 0x104 <serial_read>
144: f8 cf rjmp .-16 ; 0x136 <main+0x16>
00000146 <_exit>:
146: f8 94 cli
00000148 <__stop_program>:
148: ff cf rjmp .-2 ; 0x148 <__stop_program>
.nolist
.include "m168def.inc" ; Same family as 328P
.list
;; Interrupt Vector
.org 0x00
rjmp init
.org OC1Aaddr
; Timer/Counter1 Compare Output A
rjmp Timer_OC1A
.org OC0Aaddr
; Timer/Counter0 Compare Output A
rjmp Timer_OC0A
.org SPIaddr
rjmp SPI_Interrupt
.org ADCCaddr
rjmp ADC_Interrupt
.org 0x40
;; Syntax
.include "macros.inc"
;; SPI
.include "spi.inc"
;; LCD
.include "led7seg.inc"
;; DIPs
.include "dip.inc"
;; ADC
; ADC Interrupt handler
On_ADC:
; DEBUG
sbi PIND, PORTD7
; Check timer, from r16
rcall ADC_Read8
ldi r17, 64
mul r16, r17
mov XL, r0
mov XH, r1
rjmp Timer_Update
.set ADC_Handler = On_ADC
.include "adc.inc"
;; Timer
.set TIMER0_CB_A = SPI_Update
.include "timer.inc"
;; Utils
.include "delay.inc"
.include "div.inc"
Sleep_ADC:
; delay
rcall ADC_Read8
; rcall DIP_Read8
; Sleep for 64 * var timer cycles
ldi r17, 64
mul r16, r17
mov XL, r0
mov XH, r1
rjmp Timer_Sleep
;; Show value
Main_ShowValue:
; load value to r16
; rcall DIP_Read8
rcall ADC_Read8
; rcall Timer0_Read8
; display from r16
rcall LED7_ShowHex
; wait
rcall Sleep_ADC
; ldi XL, 0
; ldi XH, 16
; rcall Timer_Sleep
; rcall ADC_Read8
; mov r20, r16
; rcall VarDelay
; continue
rjmp Main_ShowValue
;; Count down from F
; Returns once we've hit zero
Main_Countdown:
; init from F
ldi r24, LED7_F
_count_loop:
; display
mov r16, r24
mov r16, r24
rcall LED7_Show
; exit if zero
tst r24
breq _count_end
; count down
dec r24
; wait...
rcall Sleep_ADC
; next
rjmp _count_loop
_count_end:
; done
ret
;; Count up from 00 -> 255
; Returns once done
Main_CountUp:
; init from 0
ldi r24, 0
_countup_loop:
; display
mov r16, r24
rcall LED7_ShowDec
; wait...
rcall Sleep_ADC
; exit if zero
cpi r24, 255
breq _countup_end
; count up
inc r24
; continue
rjmp _countup_loop
_countup_end:
; done
ret
;; Blink between dot and empty
Main_Blink:
_blink_loop:
; dot
ldi r16, LED7_DOT
ldi r17, LED7_EMPTY
rcall LED7_Show
; wait...
rcall Sleep_ADC
; empty
ldi r16, LED7_EMPTY
ldi r17, LED7_DOT
rcall LED7_Show
; wait...
rcall Sleep_ADC
; loop
rjmp _blink_loop
;; Chase segments
Main_Spin:
_spin_init:
; init from top
ldi r24, 0b00000001
_spin_next:
; display
mov r16, r24
mov r17, r24
com r17
andi r17, 0b00111111
rcall LED7_ShowRaw
; delay
rcall Sleep_ADC
; next segment
lsl r24
; go back to A if we hit G
sbrc r24, 6
rjmp _spin_init
rjmp _spin_next
Main:
init:
; Stack
ldi r16, high(RAMEND)
ldi r17, low(RAMEND)
out SPH, r16
out SPL, r17
; Enable interrupts
sei
; ADC (slowest to start up)
rcall ADC_Init
; Timer
rcall Timer_Init
; SPI
rcall SPI_Init
; LCD (requires interrupts, blocks)
rcall LED7_Init
; DEBUG
sbi DDRD, PORTD7
cbi PORTD, PORTD7
; Run
rcall Main_Countup
; rcall Main_Countdown
; rcall Main_ShowValue
; rcall Main_Spin
rcall Main_Blink
end:
rjmp end