A la ms près....
MM
Code:
;12coups MM 09/01/20
;comptage du nombre de coups
;tension moteur = 5 x vit/255
#picaxe 20M2
#no_data
symbol LDR=C.7
symbol cpt=b1
symbol vit=b2 ;vitesse moteur
symbol lum=b3 ;seil lumière
symbol cpt2=w12
symbol tmax=w13 ;temps moteursymbol cpt2=w12
symbol nuit= 21 ;seuil lumière du jour à ajuster
symbol pous=pinC.6 ;contact
pullup %100000000000000 ;pullup sur C.6
do loop while pous=0 ;préparation C.6 pour simu
do
do
readadc LDR,lum
loop while lum < nuit ;tension haute le jour; on tourne la nuit
cpt=0
time=0
do
if pous=0 then
do loop while pous=0
pause 100
inc cpt
time=0
endif
loop while cpt<1 or time <3
dec cpt
lookup cpt,(25200,27350,26720,124,125,126,127,128,129,130,131,132),tmax ;à modifier tmax de 0 à 65535, en ms
lookup cpt,(121,122,123,124,125,126,127,128,129,130,131,132),vit
pwmout C.5, 63, vit ;vitesse moteur; tension =5 x vit / 255
high cpt ;alim moteur
for cpt2=0 to tmax ;temps de fonctionnement moteur
pause 1 ; précision 1 ms ?
next
pwmout C.5,off
low cpt
loop
MM