buy hot The Fixer cool video Year One download Kasabian album nice Terminator Salvation hit cool track Jordin Sparks USA Whatever Works video download Check My Brain melodies nice video Finding Nemo nice Pop - Various Artists hit cheap DIVX Year One

digital-diy.com

Swordfish Code Snippet - TMR1 Print E-mail
( 0 Votes )
Written by Graham   
Saturday, 04 April 2009 10:21

Quote:


The Timer1 module is a 16-bit timer/counter consisting of two 8-bit registers (TMR1H and TMR1L) which are readable and writable. The TMR1 register pair (TMR1H:TMR1L) increments from 0000h to FFFFh and rolls over to 0000h. The TMR1 interrupt, if enabled, is generated on overflow which is latched in interrupt flag bit, TMR1IF (PIR1). This interrupt can be enabled/disabled by setting/clearing TMR1 interrupt enable bit, TMR1IE (PIE1).


Timer1 can operate in one of two modes:


a) As a Timer

b) As a Counter


The operating mode is determined by the clock select bit, TMR1CS (T1CON). In Timer mode, Timer1 increments every instruction cycle. In Counter mode, it increments on every rising edge of the external clock input.

 

The above paragraphs are exact copies to that in the 18F452 datasheet. It sums it up fairly well. So basically TMR1 has a 2 bit pre-scaler, and a 16bit register that can be configured to increment on an external clock, or internal FOSC (OSC/4).


There is a little more to setup than TMR0, but TMR1 is still a great tool for many applications, here's an example of how to set up your program for use with TMR1 for a 10mS interrupt handle (The TMR1 Calculator was used to configure the settings in this program);

 

Device = 18F452
Clock = 20
 
Dim
    mS As Word,
    TMR1IE As PIE1.0,              // TMR1 Interrupt Enable
    TMR1IF As PIR1.0,              // TMR1 Interrupt Flag
    TMR1ON As T1CON.0,             // TMR1 Count Enable
    Timer1 As TMR1L.AsWord         // A quick way of creating a Word Alias
 
Const   
    TMR1StartVal = 15536,          // User defined TMR1 starting value
    TMR1ReloadVal = TMR1StartVal + 5
 
Interrupt TMR1_Interrupt()
    Save(0)                       // Back up system variables
    If TMR1IF = 1 Then
        TMR1ON = 0                // Disable TMR1
        Timer1 = TMR1ReloadVal    // Reload a new start value (includes non-counted cycles while disabled)
        TMR1ON = 1                // Enable TMR1
        TMR1IF = 0                // Clear the TMR1 Interrupt
        Inc(mS, 10)               // Increment mS by 10
    EndIf 
    Restore                       // Restore system variables
End Interrupt   
 
 
Sub TMR1_Initialize()
    TMR1ON = 0                 // Disable TMR1
    T1CON.1 = 0                // 1 = External clock from pin RC0/T1OSO/T1CKI (on the rising edge)
                               // 0 = Internal clock (FOSC/4)
    'TRISC.0 = 1               // If External clock, then set clock as an input
    'T1CON.2 = 1               // 1 = Do not synchronize external clock input
                               // 0 = Synchronize external clock input
                               // When T1CON.1 = 0;
                               //   this bit is ignored.
    T1CON.4 = 0                // 11 = 1:8 prescale value
    T1CON.5 = 0                // 10 = 1:4 prescale value
                               // 01 = 1:2 prescale value...
                               // 00 = 1:1 prescale value
    Timer1 = TMR1StartVal      // Fill the Timer register with a starting value
 
    TMR1IE = 1                 // Enable TMR1 Interrupts
    TMR1ON = 1                 // Enable TMR1 to Increment
    Enable(TMR1_Interrupt)     // Enable TMR1 Interrupt Handle
End Sub    
 
// Start Of Main Program...
mS = 0                             // Clear the mS counter
TMR1_Initialize                    // Setup and enable TMR1
Low(PORTB.0)                       // Make PORTB.0 an output, and set it low
 
While True
    While mS <> 100                // Wait for mS = 100
    Wend                           //
    mS = 0                         // Reset the mS counter
    High(PORTB.0)                  // Toggle PORTB.0
    Low(PORTB.0)                   //
Wend

 

And the result, a perfect 100mS (10Hz) interrupt;

 

TMR1

 

Note the PIC's power supply/oscillator are not shown

 

Comments (0)
Write comment
Your Contact Details:
Comment:
[b] [i] [u] [url] [quote] [code] [img]   
Security
Please input the anti-spam code that you can read in the image.
Last Updated ( Thursday, 07 May 2009 11:05 )