[SOLVED !] 16x2 welcome text and calendarclock


Closed Thread
Page 1 of 2 12 LastLast
Results 1 to 15 of 17

Thread: 16x2 welcome text and calendarclock4554 days old

  1. #1
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Talking 16x2 welcome text and calendarclock

    Hi guys

    iam an electronics engineering student, reently i have started using Proton Pic basic and am like gettin attached to it day by day

    i have yet to learn a lot

    iam making a calendar clock with a welcome display for my college project..
    i have found a calendarclock code on this site..

    After that i have to add the scrolling text to it so that when the clock is powered up it displays a welcome scrolling text and after a delay the clock starts


    here is the original code

    Device = 16F628A

    Config INTRC_OSC_NOCLKOUT, CP_OFF, WDT_OFF, PWRTE_ON, LVP_OFF, MCLRE_OFF, BODEN_off
    DelayMS 200
    ALL_DIGITAL=true
    PORTB_PULLUPS=true

    EData 0,0,0,"SUN","MON","TUE","WED","THU","FRI","SAT","J AN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP ","OCT","NOV","DEC"

    Declare LCD_DTPIN PORTB.0
    Declare LCD_RSPIN PORTA.0
    Declare LCD_ENPIN PORTA.1
    Declare LCD_LINES 2
    Cls

    Declare SCL_PIN PORTA.2
    Declare SDA_PIN PORTA.3

    Dim secs As Byte
    Dim mins As Byte
    Dim hrs As Byte
    Dim weekday As Byte
    Dim day As Byte
    Dim month As Byte
    Dim year As Byte
    Dim dummy As Byte ;dummy var for calculations
    Dim temp As Word ;temperature
    Dim q As Byte ;loopcounter
    Dim tablepos As Byte ; position of the eeprom lookup table
    Dim mode As Byte ;mode 0= normal operation, everything else= setting by hand


    DIM MESSAGE_ARRAY[16] AS BYTE ' $$$ LENGTH OF LCD
    DIM DATUM AS BYTE ' DATA STORAGE
    DIM Y AS BYTE ' JUST A COUNTER
    DIM FLASH_ARRAY[16] AS BYTE ' "FLASH-REMOVE AS YOU LIKE"
    DIM X AS BIT ' "FLASH-REMOVE AS YOU LIKE"



    Clear ;reset all variables
    TRISA=0 ;all outputs. don't leave floating pins anywhere.



    Symbol modekey=PORTB.4
    Symbol upkey=PORTB.5
    Symbol downkey=PORTB.6

    SYMBOL EOM = 1 ' END OF MESSAGE
    SYMBOL SPEED = 190 ' $$$ SCROLL SPEED
    SYMBOL LCD_LENGTH = 16 ' $$$ WE ARE USING 2x16 LCD (IN THIS CASE 0-15)

    DELAYMS 500 ' WAIT LCD TO STABILIZED
    CLS ' CLEAR SCREEN



    ;------------- initial start of RTC-oscillator
    BusIn %11010001,0,[secs] ;read seconds + bit7 (=osc. on/off)
    DelayMS 10
    Clear secs.7 ; make sure osc. = on
    BusOut %11010000,[secs] ;write back to RTC
    ;-----------------------
    BusIn %11010001,2,[hrs] ;read hours
    Clear hrs.6 ;select 24 hr clock
    BusOut %11010000,2,[hrs] ;write back to rtc

    BusOut %10010000,172,[1] ;select oneshot mode in t-sensor.
    BusOut %10010000,[238] ;start a conversion
    ;-----------------------------



    ' *** HERE IS YOUR MESSAGE *** NOTE: No double space! (1 is the End Of Message)
    DATA "Created BY Prasad",
    'DATA "[email protected]",1

    GOTO START

    '------------------------------------------------------------------------------------
    ' (REMOVE THIS LINES AS YOU LIKE)
    '----FLASH MESSAGE----
    FLASH:
    IF X=0 THEN
    STR FLASH_ARRAY=" "
    X=1
    RETURN
    ENDIF
    IF X=1 THEN
    STR FLASH_ARRAY=" PRASAD "
    X=0
    RETURN
    ENDIF
    -------------------------------------------------------------------------------------

    SCROLL_MESSAGE:
    GOSUB FLASH ' REMOVE THIS LINE AS YOU LIKE
    PRINT AT 1,1,STR MESSAGE_ARRAY ' DISPLAY THE MESSAGE
    PRINT AT 2,1,STR FLASH_ARRAY ' "REMOVE THIS LINE IF ANNOYING"
    DELAYMS SPEED ' WAIT
    FOR Y=0 TO LCD_LENGTH-7 ' MAKE A LOOP
    MESSAGE_ARRAY[y] = MESSAGE_ARRAY[y+1] ' SHIFT LEFT THE BYTES CONTENTS
    next
    FOR Y=0 TO LCD_LENGTH-9
    MESSAGE_ARRAY[y] = MESSAGE_ARRAY[y-1]
    NEXT ' FINISH THE JOB
    RETURN ' BYE!

    START:
    Y=0 ' CLEAR POINTER
    REPEAT ' DO A LOOP
    MESSAGE_ARRAY[Y]=" " ' CLEAR ARRAY
    INC Y ' INCREMENT POINTER
    UNTIL Y=LCD_LENGTH
    ' FINISH THE JOB

    LOOP:
    RESTORE ' POINT TO FIRST CHARACTER OF DATA
    WHILE 1=1 ' MAKE AN ENDLESS LOOP
    READ DATUM ' GET THE FIRST CHARACTER... AND SO ON....
    IF DATUM=EOM THEN Finish_scroll ' TRACK END OF MESSAGE & EXIT IF FOUND
    MESSAGE_ARRAY[7]=DATUM ' $$$ SAVE THE DATA TO LAST BYTE OF THE ARRAY
    MESSAGE_ARRAY[9]=DATUM+1
    GOSUB SCROLL_MESSAGE ' GO AND PLAY
    WEND ' END OF STATEMENT

    Finish_scroll:
    Delayms 500
    cls
    GOTO MAIN

    Main:


    If mode=0 Then ;read RTC only if mode=0 (no change by hand)
    BusIn %11010001,0,[secs,mins,hrs,weekday,day,month,year]
    ;don't allow some values to be 0 when starting for the first time.
    If weekday=0 Then weekday=1
    If day=0 Then day=1
    If month=0 Then month=1
    BusIn %10010001,172,[dummy] ;read config register of T-sensor
    If dummy.7=1 Then ;1=conversion ready, 0=busy
    BusIn %10010001,170,[temp] ;read T-sensor
    BusOut %10010000,[238] ;start a new temperature conversion
    End If


    ; because of the fact that each byte in the RTC is organised as a high nibble,
    ; containing the tens and a low nibble containing the singles, we have
    ; to manipulate the data a little. The tens are first masked, so we have
    ; nothing else than that.
    ; After that, we shift that value 4 bits to the righ, and we multiply it
    ; by 10 to get a good value. Then we add the singles to it.

    dummy=secs & %11110000 ;bitwise AND
    GoSub calc_tens
    secs=secs & %00001111
    secs=secs+dummy
    dummy=mins & %11110000
    GoSub calc_tens
    mins=mins & %00001111
    mins=mins+dummy
    dummy=hrs & %00110000
    GoSub calc_tens
    hrs=hrs & %00001111
    hrs=hrs+dummy
    dummy=day & %11110000
    GoSub calc_tens
    day=day & %00001111
    day=day+dummy
    dummy=month & %11110000
    GoSub calc_tens
    month=month & %00001111
    month=month+dummy
    dummy=year & %11110000
    GoSub calc_tens
    year=year & %00001111
    year=year + dummy
    End If
    Print At 1,1,DEC2 hrs,":",DEC2 mins,":",DEC2 secs

    If temp.HighByte<128 Then ;then we have a positive temperature
    Print At 1,10," "
    Print DEC2 temp.HighByte
    If temp.LowByte=0 Then
    Print ".0"
    Else
    Print ".5"
    End If
    Else ;now we're sure temp=negative
    Print At 1,10,"-"
    If temp.LowByte=0 Then
    Print DEC2 256-temp.HighByte
    Print ".0"
    Else
    Print DEC2 255-temp.HighByte
    Print ".5"
    End If
    End If


    Print 223,"C"
    Print $FE, $C0 ;go to 2nd LCD-line
    For q=0 To 2
    tablepos=weekday*3+q ; mon, tue etc. have all 3 positons
    dummy=ERead tablepos ;read 3 chars from eeprom table
    Print dummy
    Next
    Print At 2,5,DEC2 day," "
    For q=0 To 2
    tablepos=month*3+21+q
    dummy=ERead tablepos
    Print dummy
    Next
    Print " 20",DEC2 year
    If modekey=0 Then
    DelayMS 10
    Inc mode
    If mode>7 Then
    mode=0
    GoSub write_to_rtc ;convert time/date values back to BCD and send to rtc
    End If
    Repeat ;wait until modekey is released
    Until modekey=1
    End If
    ;---------- this part of the code is only executed when time/date must be set by hand.
    If mode>0 Then
    DelayMS 300
    Select Case mode
    Case 1
    Print At 1,1," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc hrs
    If hrs>23 Then
    hrs=0
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec hrs
    If hrs>254 Then ;in fact: <0
    hrs=23
    End If
    End If
    Case 2
    Print At 1,4," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc mins
    If mins>59 Then
    mins=0
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec mins
    If mins>254 Then ;<0
    mins=59
    End If
    End If
    Case 3
    Print At 1,7," "
    DelayMS 300
    If upkey=0 Or downkey=0 Then
    DelayMS 10
    secs=0
    End If
    Case 4
    Print At 2,1," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc weekday
    If weekday>7 Then
    weekday=1
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec weekday
    If weekday<1 Then
    weekday=7
    End If
    End If
    Case 5
    Print At 2,5," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc day
    If day>31 Then
    day=1
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec day
    If day<1 Then
    day=31
    End If
    End If
    Case 6
    Print At 2,8," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc month
    If month>12 Then
    month=1
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec month
    If month<1 Then
    month=12
    End If
    End If
    Case 7
    Print At 2,14," "
    DelayMS 300
    If upkey=0 Then
    DelayMS 10
    Inc year
    If year>99 Then
    year=0
    End If
    End If
    If downkey=0 Then
    DelayMS 10
    Dec year
    If year<1 Then
    year=99
    End If
    End If
    End Select
    End If
    ;-------------------------------------------------------
    GoTo main


    ;----------------------------------------------------------------------------------------
    calc_tens:
    dummy=(dummy/16)*10 ;shift value 4 positions to the right & multiply by 10.
    Return
    ;-----------------------------------------------------------------------------------------

    write_to_rtc:

    ;convert time/date values back to BCD and write it to RTC

    dummy=secs/10 ;we only want the 10s here
    dummy=dummy*16 ;shift that value to the high nibble
    secs=secs//10 ;for the singles we want the remainder of that division.
    secs=secs | dummy ;Bitwise OR to combine both values in 1 byte

    dummy=mins/10
    dummy=dummy*16
    mins=mins//10
    mins=mins | dummy

    dummy=hrs/10
    dummy=dummy*16
    hrs=hrs//10
    hrs=hrs | dummy

    dummy=day/10
    dummy=dummy*16
    day=day//10
    day=day | dummy

    dummy=month/10
    dummy=dummy*16
    month=month//10
    month=month | dummy

    dummy=year/10
    dummy=dummy*16
    year=year//10
    year=year | dummy

    BusOut %11010000,0,[secs,mins,hrs,weekday,day,month,year] ;write it al back to RTC

    Return

Attention

This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

The advertisements we display are relevant to this web site and your browsing history

Please consider supporting us by disabling your ad blocker.


Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

If you can, please report issues in the forum area WebSite / Forum Issues


Thank you for your attention.

  • #2
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default

    The calendar clock code was written by Mr.Galaxy ..



    I added the Scrolling text code from some other user on this forum


    the above code runs pretty good but i have a small problem

    well my problem is how do i display the welcome text every 10 mins for a few seconds and then the clock display returns ... this continues

    Do i have to add any timer control so that the timer runs on th background with the clock and when it is the right time the scrolling text is diaplayed and then after it is done the clock display is back

    request helping heads to please guide me

    Thankyou

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #3
    Tasos Stratis
    Guest Tasos Stratis's Avatar

    0 Not allowed!

    Default

    If you just want a random of 10 sec then use the timer0 or timer1 or whatever and make a loop on each interrupt, when the count it is equal to the 10 sec then print the message reset the counter and come back where you are before, else use a select case for 00 Sec 10 Sec 20 Sec e.t.c.

    I hope to help you.

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #4
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default

    a small code would help me a lot

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #5
    Tasos Stratis
    Guest Tasos Stratis's Avatar

    0 Not allowed!

    Default

    Here is an example for every 1 Sec if you want more then change the i to word and use 2000

    Device = 16F648A
    XTAL 4
    Config INTRC_OSC_NOCLKOUT,WDT_OFF,PWRTE_ON,BODEN_OFF,LVP_ OFF,CP_OFF,MCLRE_OFF,DATA_CP_OFF

    TRISB.0 = 1
    TRISB.1 = 0
    TRISB.2 = 0

    Dim i As Byte

    INTCON = %00100000 ' Enable TIMER 0 (intcon.5 = 1)
    OPTION_REG = %10000100 ' Set Prescaler to 32 (option_reg.2 and 7 = 1)
    TMR0 = 99 ' Initialize TMR0

    On Interrupt GoTo int_ISR

    i = 0
    PORTB.1 = 0
    PORTB.2 = 0

    Main:
    If i = 200 Then ' 200 = 1 Sec
    Toggle PORTB.1
    i = 0
    EndIf
    GoTo Main

    Disable
    int_ISR:
    If INTCON.2 = 1 Then ' Timer0 Overflow
    TMR0 = 99 ' Initialize TMR0
    INTCON.2 = 0 ' Crear flag
    Inc i
    EndIf
    Resume Enable

    I Hope this help you.

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #6
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default

    i will add your code to my sc and will give it a try

    I appreciate your help

    thankyou

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #7
    ADLIN SYSTEMS
    Guest ADLIN SYSTEMS's Avatar

    0 Not allowed!

    Default clock

    Thanks Tasos I managed to do my clock with the interrupt. Your code helped a lot. More of an experiment. Struggled to get it working though.

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #8
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default Hi adlin

    It would be a help to noobs like me if you could post your working code

    iam still struggling to make it work

    Regards

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #9
    ADLIN SYSTEMS
    Guest ADLIN SYSTEMS's Avatar

    0 Not allowed!

    Default Clock

    I used Tasos code as above.

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #10
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default

    Hi adlin

    I would appreciate if you post your code so i know how you did it ,,, as iam still in the learning phase i need some help in understanding how others finish the code in 10 lines that i take 30 to do


    ragrads

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #11
    mister_e
    Guest mister_e's Avatar

    0 Not allowed!

    Default

    Nice code Tasos

    Prasad, Bellow is another example for a 10Sec timer interrupt

    Code:
            Device = 16F628
            XTAL 4
            REMINDERS FALSE
            Config INTRC_OSC_NOCLKOUT,WDT_OFF,PWRTE_ON,BODEN_OFF,LVP_OFF,CP_OFF,MCLRE_OFF
    
            Symbol LEDTMR1     = PORTB.0
            Symbol LED10Second = PORTB.1
            Symbol LEDMain     = PORTB.2
            
            Symbol TMR1IF  = PIR1.0     ' TMR1 Overflow Interrupt Flag bit
            Symbol TMR1ON  = T1CON.0    ' Timer1 ON
    
            Symbol T1Reload = 26473     ' 1 Second reload value
            
            Dim T1REG As TMR1L.Word
            Dim HalfSecondCounter As Byte
            HalfSecondCounter=0
     
            On_Interrupt GoTo int_ISR
            GoTo JumpOverISR
    
    int_ISR:
            Toggle LEDTMR1
            
            If HalfSecondCounter=20 Then ' 20*.5 second=10 Second?
                Toggle LED10Second
                HalfSecondCounter=0
                EndIf
    
            TMR1ON=0        ' stop the timer
            T1REG=T1REG + T1Reload
            TMR1ON=1        '
            TMR1IF = 0      ' Clear flag
            HalfSecondCounter=HalfSecondCounter+1
    Context Restore
    
    JumpOverISR:
    
            PORTB = 0        
            TRISB = 0
                              
            INTCON = %11000000      ' Enable Global, Peripheral
    
            PIE1  = %00000001       ' Enable TMR1 int
            T1CON = %00110001       ' TMR1 prescaler 1:1
                                    ' Clock source = internal
                                    ' start TMR1
    
            T1REG= T1Reload         ' load TMR1
    
    Main:
            Toggle LEDMain
            DelayMS 500
            GoTo Main

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #12
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default

    Hi adlin

    when i added the tasos code to my calendar clock abd scrolling text display

    the scrolling display started with a delay and after the scrolling is finished the clock started but the clock doesnot run but it is frozen

    could you please guide me on how to add the code to the calendar clock code
    so that i can see the scrolling text display every 20 secs and then the clock display comes back on the lcd


    i would appreciate if you guide me

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #13
    Prasad
    Guest Prasad's Avatar

    0 Not allowed!

    Default success

    well i did it atlast
    i just had to add the following code and a little tweakin with it and the calendar clock code to get it going smoothly with a scrolling display and a screensaver in the 16x2 lcd



    VAR1 = 1
    REPEAT

    'calendarclock code

    DELAYMS 200
    INC VAR1
    UNTIL VAR1 > 10






  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #14
    ADLIN SYSTEMS
    Guest ADLIN SYSTEMS's Avatar

    0 Not allowed!

    Default clock

    All I did was:

    if seconds = 0 or seconds =15 or seconds = 30 or seconds=45 then
    print at 1,1,"Helo world"
    print at 2,1, " "
    delayms 2000
    endif

    When the display returns the date and time will overwrite the message.

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

  • #15
    Senior Member chuckieboy's Avatar
    Join Date
    Mar 2003
    Posts
    992
    Thumbs Up
    Received: 8
    Given: 17
    Total Downloaded
    520.81 MB

    0 Not allowed!

    Default

    Prasad well done a good job looks like a nice project
    Steve

  • Attention

    This valuable resource relies upon the very small amount of revenue generated by displaying online advertisements to our visitors.

    The advertisements we display are relevant to this web site and your browsing history

    Please consider supporting us by disabling your ad blocker.


    Note: Some users have reported issues related to ad-blockers rendering parts of this wesite unusable,
    where possible we will rectify the issues to enable you to use this resource with adblocking enabled.

    If you can, please report issues in the forum area WebSite / Forum Issues


    Thank you for your attention.

    Thread Information

    Users Browsing this Thread

    There are currently 1 users browsing this thread. (0 members and 1 guests)

       

    Similar Threads

    1. DS2408 and LCD 16x2
      By Shaman in forum Proton Plus Compiler v3
      Replies: 0
      Last Post: 10th March 2015, 19:44
    2. [SOLVED !] 8 bit 16x2 LCD Code for 16F84A
      By Jessica in forum Absolute Beginners Section
      Replies: 11
      Last Post: 1st September 2014, 16:51
    3. Problem with 16X2 LCD and PIC16F877A for Proton
      By lexma89 in forum Proton Plus Compiler v3
      Replies: 1
      Last Post: 8th December 2011, 14:35
    4. [SOLVED !] LCD display modules 16x2 charcters HD44780
      By Matt_C in forum Wanted and For Sale
      Replies: 0
      Last Post: 9th October 2009, 14:45
    5. Alpha 16x2 LCD
      By rrakke in forum Wish List / Product Feedback
      Replies: 0
      Last Post: 18th March 2003, 14:10

    Members who have read this thread since 11th November 2019, 10:51 : 0

    Actions :  (Set Date)  (Clear Date)

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

    Tags for this Thread

    Posting Permissions

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