code amélioré par interruption sur reset alarme
Bon, c'est promis, j’arrête..Code:#picaxe 08M2 #no_data symbol Vin=w11 ;entrée anémomètre sur C.4 pullup %1000 ;pullup sur C.3 setint %0,%1000 ;interruption sur C.3 niveau bas do do if time >= 42200 then ;temps de 12h high C.2 ;alimentation d'un relais sur C.1 endif loop while Vin <=6 ;= 0,03V if pinC.3=0 then ;reset relais alarrme low C.2 endif low C.2 ; on coupe le relais sur C.1...si on veut do readadc10 C.4,vin ;5v= 1023 => 0,5v=100 ; 0,03V= if vin>=100 then ; time=0 ;reset compteur seconde do readadc10 C.4, vin if time>=3 then suite ;Vin>= depuis plus de 3s loop while vin>=100 endif loop suite: high C.1 ;relais sur C.0 time=0 do loop while time <= 120 do readadc10 C.4, Vin loop while Vin >= 25 low C.1 loop interrupt: do loop while pinC.3=0 low C.2 setint %0,%1000 return
MM
-----