PIC18LF13K50 Extremly low power counter


Results 1 to 20 of 20

Threaded View

  1. #13
    Join Date
    Sep 2009
    Posts
    755


    Did you find this post helpful? Yes | No

    Default

    scalerobotics, Here is it, but not whole code.
    Code:
                define OSC 4
                'RTC
                SYMBOL SCL = PORTC.3
                SYMBOL SDA = PORTC.6
                symbol CLCK_Alrm = portc.7
                input clck_alrm
                'Input
                symbol In1 = PORTA.1
                symbol In2 = PORTA.0
                symbol In3 = PORTA.5
                symbol In4 = PORTC.5
                INPUT PORTA.1
                INPUT PORTA.0
                INPUT PORTA.5
                INPUT PORTC.5
                'Pull
                symbol Pull= PORTA.4
                OUTPUT Pull
                output portc.4 'just for testing
                OSCCON=%01010110
                OSCCON2.2=0
                ANSEL=0            
                ANSELH=0           
                SLRCON=0           
                RCON.7=1   
    
                UCON.3=0       ' disable usb, to alow use of ra0 and ra1
                IOCA=3         ' set ioc on ra0 and ra1 EDIT: bits 0 and 1 must be set, to use ra0, ra1...
            
                INTCON=0  
                INTCON2=%10000000  
                INTCON3=%00000000  
                PIR1=0
                PIR2=0
                PIE1=0
                PIE2=0
                IPR1=0
                IPR2=0
    
        
    
                
    disable
    PWR_On:                                       
    pause 10
    I2CWrite sda,scl,$a2,$02,[1,1,1,1,1,1,1]    ' just put some valid time/date in rtc
    I2CWrite SDA,SCL,$A2,1,[%00000010]
    I2CWrite SDA,SCL,$A2,$0D,[%10000010]        'enable clockout @ 32Hz
    enable
    INTCON=%10010000                            'enable interrapt's
    on interrupt goto int
    
    
    Start:
    sleep 60                'sleep until int0                    
    goto start 
    disable interrupt
    
    Int:
    pull=1 'enable pull up
    Toggle portc.4 'do something :)
    'Read/write to portst etc.
    pull=0 ' disable pull up
    INTCON=%10010000 
    goto start   
    end
    In file ppb/18F13K50.INC I'm just put OFF where ON was
    Code:
            __CONFIG    _CONFIG1L, _CPUDIV_NOCLKDIV_1L & _USBDIV_OFF_1L
            __CONFIG    _CONFIG1H, _FOSC_IRC_1H & _PLLEN_OFF_1H & _PCLKEN_OFF_1H & _FCMEN_OFF_1H & _IESO_OFF_1H 
            __CONFIG    _CONFIG2L, _PWRTEN_OFF_2L
            __CONFIG    _CONFIG2H, _WDTEN_OFF_2H & _WDTPS_512_2H 
            __CONFIG    _CONFIG3H, _MCLRE_OFF_3H 
            __CONFIG    _CONFIG4L, _STVREN_OFF_4L & _LVP_OFF_4L & _BBSIZ_OFF_4L & _XINST_OFF_4L
    Still I wonder why TMR0 was not stable...
    Code is a similar, i just enabled tmr0osc and overflow interrupt.
    Edit2: I'm using UNI-T UT81B
    Attached Images Attached Images  
    Last edited by pedja089; - 15th October 2010 at 15:24.

Members who have read this thread : 0

You do not have permission to view the list of names.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts