Time logic


Results 1 to 7 of 7

Thread: Time logic

Threaded View

  1. #1
    Join Date
    Oct 2009
    Posts
    583

    Default Time logic

    My current project is not performing very well. It relies on matching the values in two variables to the converted BDC format from a battery backed up 1307 RTC. My idea is to use a variable to store the current time in minutes from midnight, so in theory it should have a value between 0 and 1439. The idea then is to convert the time the LEDs come on into a numerical value and the use the "if then " statement to determine if the LEDs should be on in the event of a power cut. For example if the on time was from 14:00 to 18:00 hrs then the values would be => then 840 but =< 1080, so if there was a power cut and power was resumed at say 15:00 hrs then as the time would be converted to 900 and the logic would then check the value against the programmed value and thus turn the LEDs on. This is my proposed code (with some of the RTC variables not included for simplicity)

    Code:
    Counter 1 var byte
    counter 2 var byte
    counter 3 var byte
    
    TimeH var byte      ' Variable to store current hour 
    TimeM var Byte      ' Variable to store current minutes 
    
    
    Main:
    
    I2CRead SDApin,SCLpin,$D0,$00,[RTCSec,RTCMin,RTCHour,RTCWDay,RTCDay,RTCMonth,RTCYear,RTCCtrl]  ; read DS1307 chip
    
    timeH=(RTCHour>>4)                               'convert the BCD format of the hours register and store in variable timeH
    timeH=(timeH &$03)*10
    timeH=timeH+(RTCHour&$0F)
    
    timeM=(RTCMin>>4)
    timeM=(timeM &$07)*10
    timeM=timeM+(RTCMin&$0F)                         'convert the BCD format of the mins register and store in variable timeM
    
    If TimeH = 0 and timeM = 0 then
        couner 3 = 0
    endif
    
    If TimeH <1 then counter 1 = 0
    If timeH >0 then counter 1 = Time H * 60
    Counter 3 = counter1 + TimeM
    Endif
    endif
    Would welcome comments
    Last edited by Scampy; - 26th October 2013 at 23:11.

Similar Threads

  1. Logic Probe Recommendations
    By retepsnikrep in forum Off Topic
    Replies: 3
    Last Post: - 12th June 2011, 20:35
  2. DS1904 RTC - How to Convert Binary Time into Real Time/Date?
    By Ioannis in forum mel PIC BASIC Pro
    Replies: 7
    Last Post: - 2nd December 2010, 10:45
  3. Logic Level Triac
    By emavil in forum mel PIC BASIC Pro
    Replies: 3
    Last Post: - 29th November 2006, 18:18
  4. Fuzzy logic?
    By Damir in forum mel PIC BASIC Pro
    Replies: 0
    Last Post: - 28th August 2006, 12:03
  5. Linx RF -> HSERIN time delay / time critical app...
    By batee in forum mel PIC BASIC Pro
    Replies: 1
    Last Post: - 15th October 2004, 15:04

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