; É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)
.def compteur = r20 ; Utilisé pour différentes choses
.def tempo = r20 ; Utilisé pour différentes choses mais très brièvement

; Vecteurs d'interruptions

.org 0x000 ; Vecteur RESET
    jmp debut

.org 0x0002 ; INT0
    jmp valider

.org 0x0004 ; INT1
    jmp retour

.org 0x0006 ; INT2
    jmp incrementer

.org 0x0008 ; INT3
    jmp decrementer

.org 0x0018 ; Watchdog
    jmp watchdog

.org 0x003A ; ADC
    jmp adc


.org 0x0080

; Tableaux de la mémoire du programme

afficheurNombres:
    .DB 0x3F, 0x30, 0x6D, 0x79, 0x72, 0x5B, 0x5F, 0x31, 0x7F, 0x7B
    ;      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 <- 0b00010000
    WDTCSR <- 0b01000111

    ; 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
afficherHeure:
    ; Affiche l'heure actuelle
    temp <- 
    ret


afficherTemperature:
    ; Considère le registre compteur comme une température et l'affiche
    d0 <- 0x63 ; Sigle °
    d1 <- afficheur[compteur%10]
    temp <- compteur + 50
    d2 <- afficheur[(temp/10)%10]
    d3 <- afficheur[temp/100]
    ret

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:
    si mode <= 1 saut validerVeille
    si mode = 2 saut validerAssoc
    si mode <= 9 saut validerAJour
    si mode <= 16 saut validerParaAJour
    si mode = 17 saut validerTJour
    si mode = 18 saut validerParaTJour
    si mode = 19 saut validerTNuit
    si mode = 20 saut validerParaTNuit
    si mode = 21 saut validerHorloge
    si mode <= 24 saut validerMenuHorloge
    si mode <= 27 saut validerParaHorloge
    reti
    ; TODO Affichages
validerVeille:
    mode <- 2
validerAssoc:
    mode <- 3
validerAJour:
    mode <- mode + 7
    reti
validerParaAJour:
    ; TODO
    reti
validerTJour:
    mode <- 18
    reti
validerParaTJour:
    ; TODO
    mode <- 17
    reti
validerTNuit:
    mode <- 20
    reti
validerParaTNuit:
    ; TODO
    mode <- 19
    reti
validerHorloge:
    mode <- 22
    reti
validerMenuHorloge:
    mode <- mode + 3
    reti
validerParaHorloge:
    mode <- mode - 3
    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