led7seg.inc
author Tero Marttila <terom@paivola.fi>
Thu, 03 Apr 2014 19:44:13 +0300
changeset 51 ec6271f0637b
parent 30 5226e512755c
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>
18
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
     1
;;
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
     2
;; Driving 7-segment LED displays over SPI
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
     3
;;
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
     4
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
     5
; Output Enable control
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
     6
.equ LED7_DDR    = DDRB
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
     7
.equ LED7_PORT   = PORTB
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
     8
.equ LED7_OE     = PORTB1                ; Output Enable (Low)
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
     9
18
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
    10
; Font for 7-segment display
79b25e81721f use timer for 1s delay
Tero Marttila <terom@fixme.fi>
parents: 17
diff changeset
    11
; Includes decimal digits 0-9, hexadecimal digits A-F, and some special chars
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    12
LED7_Font:
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    13
.db     0b00111111, 0b00000110      ; 0, 1
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    14
.db     0b01011011, 0b01001111      ; 2, 3
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    15
.db     0b01100110, 0b01101101      ; 4, 5
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    16
.db     0b01111101, 0b00000111      ; 6, 7
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    17
.db     0b01111111, 0b01100111      ; 8, 9
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    18
.db     0b01110111, 0b01111100      ; A, b
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    19
.db     0b00111001, 0b01011110      ; C, d
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    20
.db     0b01111001, 0b01110001      ; E, f
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    21
.db     0b10000000, 0b00000000      ; ., 
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    22
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    23
.equ LED7_0     = 0
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    24
.equ LED7_1     = 1
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    25
.equ LED7_2     = 2
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    26
.equ LED7_3     = 3
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    27
.equ LED7_4     = 4
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    28
.equ LED7_5     = 5
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    29
.equ LED7_6     = 6
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    30
.equ LED7_7     = 7
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    31
.equ LED7_8     = 8
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    32
.equ LED7_9     = 9
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    33
.equ LED7_A     = 10
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    34
.equ LED7_B     = 11
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    35
.equ LED7_C     = 12
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    36
.equ LED7_D     = 13
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    37
.equ LED7_E     = 14
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    38
.equ LED7_F     = 15
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    39
.equ LED7_DOT   = 16
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    40
.equ LED7_EMPTY = 17
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    41
26
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
    42
; LEDs are on beginning of SPI universe
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
    43
.set led7_buffer = spi_outbuf + 0
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    44
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    45
;; Initialize LCD to empty, and enable
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    46
LED7_Init:
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    47
    ; Setup ENable port
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    48
        sbi         LED7_PORT, LED7_OE    ; Disabled (Low)
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    49
        sbi         LED7_DDR, LED7_OE     ; Out
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    50
    
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    51
    ; Initialize buffer
30
5226e512755c Use Timer0 for async SPI updates (semi-useful)
Tero Marttila <terom@fixme.fi>
parents: 26
diff changeset
    52
        ldi         r16, 0b01000000
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    53
        sts         led7_buffer + 0, r16
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    54
        sts         led7_buffer + 1, r16
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    55
26
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
    56
    ; Update display
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
    57
        rcall       SPI_SendRecv
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    58
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    59
    ; Enable output once the initial display has been shifted out
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    60
        cbi         LED7_PORT, LED7_OE
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    61
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    62
    ; Done
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    63
        ret
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    64
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    65
LED7_LoadChar:
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    66
        clr         r0, 0
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    67
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    68
    ; Prep address
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    69
        ; base addr for font table
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    70
        ldi         ZH, high(2 * LED7_Font)
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    71
        ldi         ZL, low(2 * LED7_Font)
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    72
        
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    73
        ; offset
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    74
        add         ZL, r8
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    75
        adc         ZH, r0
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    76
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
    77
    ; Load char
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    78
        lpm         r8, Z
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    79
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    80
    ; Done
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
    81
        ret
25
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    82
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    83
;; Display an 8-bit hexadecimal value on the display
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    84
;;  Input: r16
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    85
LED7_ShowHex:
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    86
        ; base16
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    87
        ldi         r17, 16 
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    88
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    89
        ; 1's
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    90
        call        div8u
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    91
        
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    92
        ; r16 = result, r15 = remainder
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    93
        mov         r17, r15 
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    94
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    95
    ; Continue
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    96
        rjmp        LED7_Show
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    97
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    98
;; Display an 8-bit decimal value on the display
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
    99
;;  Input: r16
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   100
LED7_ShowDec:
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   101
        ; base10
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   102
        ldi         r17, 10
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   103
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   104
        ; 1's
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   105
        call        div8u
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   106
        mov         r8, r15
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   107
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   108
        ; 10's
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   109
        call        div8u
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   110
        mov         r9, r16         ; 100's
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   111
        
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   112
        ; 1's from r8
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   113
        rcall       LED7_LoadChar
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   114
        mov         r17, r8
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   115
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   116
        ; 10's from r15
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   117
        mov         r8, r15
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   118
        rcall       LED7_LoadChar
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   119
        mov         r16, r8
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   120
           
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   121
        ; Set dots for 100's 
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   122
        sbrc        r9, 0
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   123
        ori         r17, 0b10000000 ; +100
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   124
        sbrc        r9, 1
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   125
        ori         r16, 0b10000000 ; +200
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   126
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   127
    ; Continue
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   128
        rjmp        LED7_ShowRaw
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   129
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   130
;; Display a single digit on the display
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   131
;;  Input: r16, r17
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   132
LED7_Show:
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   133
        mov         r8, r16
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   134
        rcall       LED7_LoadChar
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   135
        mov         r16, r8
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   136
25
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   137
        mov         r8, r17
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   138
        rcall       LED7_LoadChar
25
33496b1a964f show (hexa)decimal values on display from ADC or DIP
Tero Marttila <terom@fixme.fi>
parents: 23
diff changeset
   139
        mov         r17, r8
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   140
        
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
   141
    ;; Continue
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
   142
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
   143
;; Display a raw segment mask
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   144
;;  Input: r16, r17
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
   145
LED7_ShowRaw:
26
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
   146
    ; Store buffer
23
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   147
        sts         led7_buffer + 0, r16
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   148
        sts         led7_buffer + 1, r17
a6afc0eb347f synchronous SPI, two-digit led7
Tero Marttila <terom@fixme.fi>
parents: 18
diff changeset
   149
26
db2ec641c955 refactor code to move buffers to SPI
Tero Marttila <terom@fixme.fi>
parents: 25
diff changeset
   150
    ; Update display
30
5226e512755c Use Timer0 for async SPI updates (semi-useful)
Tero Marttila <terom@fixme.fi>
parents: 26
diff changeset
   151
        rjmp        SPI_Update
17
a7c668003a19 split led7seg.s into .inc modules, and update Makefile to use .s -> .hex, and above .inc's for led7seg
Tero Marttila <terom@fixme.fi>
parents:
diff changeset
   152