HI guys , i transfer some code from another processor which from the data sheet hs the same registers but seem to be getting a 20ms timer0 , not a 10ms interupt
all looks correct but it cant be , can someone have a look and see where i made the error
pic 18f46k80
osc32 internal,
timer 0 to give a 10ms interupt
all looks correct but it cant be , can someone have a look and see where i made the error
pic 18f46k80
osc32 internal,
timer 0 to give a 10ms interupt
Code:
;----- CONFIG1L Options --------------------------------------------------
CONFIG XINST = OFF
CONFIG SOSCSEL = DIG ; Digital (SCLKI) mode; I/O port functionality of RC0 and RC1 is enabled
CONFIG INTOSCSEL = LOW ; LF-INTOSC in low-power mode during Sleep
CONFIG RETEN = ON ; Ultra Low power regulator is Enabled (Controlled by SRETEN bit)when in sleep
;----- CONFIG1H Options --------------------------------------------------
CONFIG IESO = OFF
CONFIG FCMEN = OFF
CONFIG PLLCFG = ON
CONFIG FOSC = INTIO2 ; Internal RC oscillator , PORTA.6 , PORTA.7 as I/OCode:
OSCCON = %01100000 ' Select 32Mhz - using 8Mhz internal with PPLx4 in Config1H<3:0> = IDLEN =0 , 8Mhz , OSTS=0,RFIOFS=1,RC_Run (1x) OSC using PLL
' Bit 7 IDLEN =0 ( sleep mode when sleep instraction executed)
' Bits 6-4 - 111 = 16Mhz , 110 = 8MHz ,101 = 4 MHz, 100 = 2MHz 011 = 1MHz
' If INTTSRC=0 and MFIOSEL= 0 then 010 = HF-INTOSC/32 (500Khz), 001 = HF-INTOSC/64 (250Khz) ,000 = LF-INTOSC (31.25Khz)
' If INTTSRC=0 and MFIOSEL= 1 then 010 = MF-INTOSC (500Khz), 001 = MF-INTOSC/2 (250Khz) ,000 = LF-INTOSC (31.25Khz)
' If INTTSRC=1 and MFIOSEL= 0 then 010 = HF-INTOSC/32 (500Khz), 001 = HF-INTOSC/64 (250Khz) ,000 = HF-INTOSC/512 (31.25Khz)
' If INTTSRC=1 and MFIOSEL= 1 then 010 = MF-INTOSC (500Khz), 001 = MF-INTOSC/2 (250Khz) ,000 = MF-INTOSC/16 (31.25Khz)
' Note: INTSRC = OSCTUNE<7> and MFIOSEL = OSCCON2<0>
' Bit 3 - OSTS = 0 - Osc startup time out is ruinning from internal OSC ( HF, MF or LF-INTOSC)
' Bit 2 - HFIOFS =1 ( INTOSC Frq stable bit - 1 = stable , 0 = not stable
' Bits 1-0 - 00= Dephalt Pri OSc ( OSC1/2 or HF-INTOSC with/without PLL set in FOSC,3:0> config1H <3.0>
' 01 = SOSC osc
' 1x = Internal osc ( LF, MF,HF-INTOSC)
' OSCCON2 = $00 ' Bit 7 n/a , Bit 6 - SOSCRUN - Run status bit , Bit 5-4 n/a,
' Bit 3 = SOASCGO - Osc Start control bit 1 = OSC running , 0 = OSC shut off if no requests for it
' Bit 2 n/a , Bit 1 - MFIOFS 1= MFINTOSC stable 0 = Not stable
' Bit 0 MFIOSEL - 1 = MF-INTOSC replaces HF-ISTOSC Freq for 500Khz,250Khz,31.25KHz) 0 = MF-INTOSC not used
OSCTUNE = %01000000 ' Bit 7 - INTSRC - internal LF Source Select 1 = 31.25 from 16Mhz Internal /512 HF-INTOSC ) 0 = Internal 31khz OSC
' Bit 6 - PLLEN - 1 PLL enabled , 0 = PLL disabled
' Bits 5-0 Frequancy callibaration 00000 = centre FrqCode:
' ---------- Timer 0 Register Setups ----------------
INTCON2.2 = 1 ' TMR0IP - TIMER 0 Overflow Interupt Priority - 1 = High Priorty , 0 = Low Priority
T0CON.7 = 1 ' Bit7 - TMR0 1= Enable 0 = Stop timer
T0CON.6 = 0 ' Bit6 - TMR0 8/16bit control 1= 8bit 0=16bit,
T0CON.5 = 0 ' Bit5 - TMR0 Clock Source 1=clk on T0CKI pin input 0=Internal clcck (Fosc/4)
T0CON.4 = 0 ' Bit4 - TMR0 Source Edge Select 1= H/L of TOCKI 0= L/H of TOCKI ,
T0CON.3 = 0 ' Bit3 - TMR0 PSA select 1=TMR0 Bypass Prescaler 0= CLK Input from Prescaler output
T0CON.2 = 0 ' Bit2-0 - Timer0 prescaler Rate Select bits 2-0(set to 1:256)
T0CON.1 = 0 ' 000 = 1:2 , 001= 1:4 , 010 = 1:8 , 011 = 1:16
T0CON.0 = 0 ' 100 = 1:32 , 101 = 1:64, 110 = 1:128 , 111 = 1:256Code:
' ---------- Set up DT_INTS-18 Routine for Instant Interupt handling -----------
INCLUDE "DT_INTS-18.bas" ; Base Interrupt System for 18FxxK80 processors
INCLUDE "ReEnterPBP-18.bas" ; Include if using PBP interrupts
ASM
INT_LIST macro ; IntSource , Label , Type, ResetFlag?
INT_Handler TMR0_INT, _Timer0_Count, PBP, yes ; call Timer0_Count subroutine
endm
INT_CREATE ; Creates the Interrupt Processor
ENDASMCode:
' ============ Timer 0 Interupt handler ================
' a 10 ms timer interupt
Timer0_Count:
INTCON.5 = 0 ' STOP TIMER
T0Count1 = T0Count1 + 1 ' inc counter on interupt flag
TMR0H = $63 ' preset Timer 0 to a 10ms timer
TMR0L = $C0
INTCON.5 = 1 ' START TIMER
@ INT_RETURN
RETURN