; Équivalences

.equ PINA = 0x00
.equ DDRA = 0x01
.equ PORTA = 0x02

.equ PINB = 0x03
.equ DDRB = 0x04
.equ PORTB = 0x05

.equ SREG = 0x3F

.equ WDTCSR = 0x60

.equ EIMSK = 0x3D
.equ EICRA = 0x69
.equ EICRB = 0x6A

.equ ADMUX = 0x7C
.equ ADCSRB = 0x7B
.equ ADCSRA = 0x7A
.equ ADCH = 0x79

.equ SPH = 0x3E
.equ SPL = 0x3D

; Nommage des registres utilisés

.def etat = r19
.def reference = r20
.def d3 = r20 ; Digit 3 (tout à gauche)
.def d2 = r20 ; Digit 2
.def d1 = r20 ; Digit 1
.def d0 = r20 ; Digit 0 (tout à droite)

; Vecteurs d'interruptions

.org 0x000 ; Vecteur RESET
    jmp debut

.org 0x003A ; ADC
    jmp adc

.org 0x0002 ; INT0
    jmp valider

.org 0x0004 ; INT1
    jmp retour

.org 0x0006 ; INT2
    jmp incrementer

.org 0x0008 ; INT3
    jmp decrementer

.org 0x0080

; Tableaux de la mémoire du programme

afficheurNombres:
    .DB 0x7E, 0x0C, 0x37, 0x9F, 0x4D, 0xDB, 0xFB, 0x0E, 0xFF, 0xDF ; TODO Ce sont pas les bonnes valeurs
    ;      0,    1,    2,    3,    4,    5,    6,    7,    8,    9

;afficheurLettres:
;    .DB ; TODO
;    ;      A,    B,    C,    D,    E,    F,    G,    H ; TODO

; Programme

debut:
; Configuration des composants
    SREG <- 0b10000000

    ; Watchdog
    WDTCSR <- 

    ; Interruptions externes
    EIMSK <- 0b00001111
    EICRA <- 0b11111111 ; TODO Oscillations annulables ?
    EICRB <- 0b00000000

    ; ADC
    ADMUX <- 0b01110000
    ADCSRB <- 0b00001011
    ADCSRA <- 0b10011101 ; TODO Auto-trigger ?
    sei
; Initialisation des valeurs

boucle:
    sleep
    jmp boucle

; Fonctions
agir10s:
    ; Initialise une lecture ADC
    ; Met à jour l'état de veille (si on est en état veille)
    ret

agirHeure:
    ; Recharge la température de référence
    ret

; Interruption boutons

incrementer:
    reti

decrementer:
    reti

valider:
    reti

retour:
    reti

; Interruption Watchdog
watchdog:
    ; Met à jour les registres de temps, active agir10s ou agirHeure si nécessaire
    reti

; Interruption ADC
adc:
    si ADCH > reference + 5 saut eteindreChaudiere
    si ADCH < reference - 5 saut allumerChaudiere
    reti
allumerChaudiere:
    PORTC <- 0x01
    reti
eteindreChaudiere:
    PORTC <- 0x00
    reti

; Interruption timer
timer:
    ; Affiche le digit suivant sur l'afficheur 7seg
    reti