From ab6a4621223a41a40105d5fc1a134456094dc9e1 Mon Sep 17 00:00:00 2001 From: nhavard Date: Mon, 29 May 2017 13:11:21 +0200 Subject: [PATCH] Ajout de l'init du CAN et début de la fonction --- Algorithme | 45 ++++++++++++++++++++++++++++++++++++++++----- 1 file changed, 40 insertions(+), 5 deletions(-) diff --git a/Algorithme b/Algorithme index 3eb42ab..bbfa122 100644 --- a/Algorithme +++ b/Algorithme @@ -2,18 +2,42 @@ ;Initialisation -0x0000: +.equ RAMEND = 0x21FF +.equ SPH = 0x3E +.equ SPL = 0x3D + +.equ ADMUX = 0x7C +.equ ADCSRB = 0x7B +.equ ADCSRA = 0x7A +.equ ADCL = 0x78 +.equ ADCH = 0x79 + + + + + + + + + + +.org 0x0000: JMP debut -0x0002: +.org 0x0002: JMP HMJN -0x0004: +.org 0x0004: JMP MH + +.org 0x0006: + JMP CAN -0x002E: +.org 0x002E: JMP inc_heure + + debut: DDRA = 0x07 DDRB = 0xFF @@ -23,6 +47,10 @@ debut: EIMSK = 0x037 EICRA = 0x06 EICRB = 0x00 + LDI R28, low(RAMEND) + LDI R29, high(RAMEND) + OUT SPL, R28 + OUT SPH, R29 ADMUX <- 0b00010000 ADCSRB <- 0b00000000 ADCSRA <- 0b11100101 @@ -169,7 +197,7 @@ MH: reglage: H_reglage_jour=Heure_jour[Jour]:Minute_jour[Jour]; H_reglage_nuit=Heure_nuit[Jour]:Minute_nuit[Jour]; - T=capteur ;Lecture de la valeur du capteur de température + CALL CAN ;Lecture de la valeur du capteur de température if(Heure:MinuteH_reglage_nuit) if(T_nuit-T>0.5 && !chauffe) demarrage chaudiere ;Démarrage de la chaudière @@ -186,6 +214,13 @@ reglage: chauffe=0 RET + +CAN: + T = ADCH + + + + inc_heure: Top_seconde=Top_seconde+1 if(Top_seconde==250) -- libgit2 0.21.2