" Tempo avec Timer.h "

Code:

#include <Timer.h>
Timer t;
int i5=0;
int a=0;
//-------------------
void setup() {
   pinMode(4,OUTPUT);//led
   pinMode(5,INPUT);//inter
   digitalWrite(5,HIGH);//
 }
//-------------------
void loop() {
   i5=digitalRead(5);
   if (i5 == 0 ){
      digitalWrite(4,1);
      a=1;
    }
   if (a==1 && i5==1){
          t.every(5 * 1000, sousprogramme,1);
       }
    }
   t.update();
}
//-------------------
void sousprogramme(){

   digitalWrite(4,0);
   a=0;
}
//-------------------
 

Time Library

http://www.pjrc.com/teensy/td_libs_Time.html

Arduino Timer Library

http://www.doctormonk.com/2012/01/arduino-timer-library.html 

un afficheur 7 segments 

une Sub en basic panoramic

 

 error_french
 dim digit
 digit=100 : digit7_segments(digit,50,130)

' =======
end :' ==
' =======
sub  digit7_segments(digit,tp,lt)
container digit: top digit,tp:left digit,lt:width digit,150:height digit,250
caption digit,"afficheur 7_segments         "
progress_bar digit+1:top digit+1,20:left digit+1,40:parent digit+1,digit
min digit+1,0:max digit+1,1
 position digit+1,1 :width digit+1,60
progress_bar digit+2:top digit+2,35:left digit+2,105 :parent digit+2,digit
position digit+2,1  :width digit+2,75:vertical digit+2
min digit+2,0:max digit+2,1
progress_bar digit+3:top digit+3,130:left digit+3,105 :parent digit+3,digit
position digit+3,1  :width digit+3,75:vertical digit+3
min digit+3,0:max digit+3,1
progress_bar digit+4:top digit+4,200:left digit+4,40:parent digit+4,digit
position digit+4,1:width digit+4,60
min digit+4,0:max digit+4,1
progress_bar digit+5:top digit+5,130:left digit+5,15 :parent digit+5,digit
position digit+5,1 :width digit+5,75:vertical digit+5
min digit+5,0:max digit+5,1
progress_bar digit+6:top digit+6,35:left digit+6,15 :parent digit+6,digit
position digit+6,1  :width digit+6,75:vertical digit+6
min digit+6,0:max digit+6,1
progress_bar digit+7:top digit+7,110:left digit+7,40:parent digit+7,digit
position digit+7,1  :width digit+7,60
min digit+7,0:max digit+7,1
alpha digit+8:top digit+8,220:left digit+8,115 :parent digit+8,digit: caption digit+8,"P"
color digit+8,220,220,220 :width digit+8,21:height digit+8,21
end_sub