PIC micro Timer Code (1 / 1 stap)

Stap 1: de code

'####################################################
SomeNumber var woord
SomeNumber = 4500

MyTime var woord

'====================================
MamaLoop:

T1CON.0=0 ' de timer stoppen
TMR1H = 0 ' het hoge gedeelte van de waarde van de timer ingesteld op 0
TMR1L = 0 ' het lage gedeelte van de waarde van de timer ingesteld op 0
T1CON.0=1 ' start de timer

' doen wat je wilt in de lus
'.. .blah als, vervolgens, Nederlands
'.. .blah als, vervolgens, Nederlands
'.. .blah

'-----
' de EndLoopDelay zal wachten tot een bepaalde hoeveelheid tijd is verstreken
"sinds het begin van de MamaLoop (wanneer de waarde van de timer is ingesteld op 0)
EndLoopDelay:

CLEARWDT ' duidelijk de watchdog-timer (zodat PIC niet opnieuw wordt ingesteld)

MyTime.Highbyte=TMR1H ' krijgen een deel van de waarde van de timer
MyTime.Lowbyte=TMR1L ' Haal de rest van de waarde van de timer

Als MyTime > SomeNumber dan ' als de waarde-timervertraging > dan uw nummer
GOTO FinishLoop
anders
GOTO EndLoopDelay
endif
'-----
'====================================

FinishLoop:
' doe iets aan het eind van de lus
' Ga terug naar de opnieuw opstarten van de MamaLoop
GOTO MamaLoop

'####################################################