Etape 1: le code
"Il fonctionnera par l’intermédiaire de MamaLoop, puis il s’arrête et
« attendre un laps de temps (SomeNumber)
"s’est écoulé depuis le début de MamaLoop avant de continuer
' à FinishLoop.
'####################################################
SomeNumber var mot
SomeNumber = 4500
MyTime var mot
'====================================
MamaLoop :
T1CON.0=0 ' arrêter le chronomètre
TMR1H = 0 ' mis de la partie haute de la valeur de la minuterie à 0
TMR1L = 0 » valeur la partie basse de la valeur du timer 0
T1CON.0=1 ' Démarrer le compte à rebours
« faire ce que vous voulez dans la boucle
".. .blah if, puis, Bonneau
".. .blah if, puis, Bonneau
".. .blah
'-----
' le EndLoopDelay vais attendre jusqu'à ce qu’un laps de temps écoulé
"depuis le début de la MamaLoop (lorsque le minuteur a la valeur 0)
EndLoopDelay :
CLEARWDT ' effacer le temporisateur (donc PIC n’est pas réinitialisé)
MyTime.Highbyte=TMR1H ' obtenir une partie de la valeur de la minuterie
MyTime.Lowbyte=TMR1L ' obtenir le reste de la valeur de la minuterie
MyTime IF > SomeNumber puis ' si la valeur de la minuterie > que votre numéro
GOTO FinishLoop
d’autre
GOTO EndLoopDelay
endif
'-----
'====================================
FinishLoop :
"faire quelque chose à la fin de la boucle
"puis revenir en arrière pour relancer le MamaLoop
GOTO MamaLoop
'####################################################