Scrolling thermo

[mackrackit]

$_hit happens...
Do not be so hard on yourself.

[fratello]

Still need help...I try to write code for setting clock ; I use parts from the great code of Melanie's (Thanks !). In Proteus I see what happens but... In real-life I need to display each digit of clock-time ; if set hour I need to see, first tens hour digit, then hour digit, tens minutes, minutes.
How can I display on this matrix static number ? Please, give me a clue !

[cncmachineguy]

Do you mean how do you display 4 digits on an 8x8 display without scrolling? That I don't think you can do and still be able to read it.

Maybe I just don't understand the question

[fratello]

Sorry for my poor english...
So, If set tens hour : on matrix appears (without scrolling) tens hour digit only.
If set hour : on matrix appears (without scrolling) hour digit only.
etc, etc.
Otherwise I can't setting the clock, because I don't see what happens ...

[fratello]

I DID IT !
Full working () version of scroll-thermo-clock, using PIC16F877A. With buttons for setting hours/minutes !
Enjoy !

LE : The answer on my previous question:

    portb=0
    portd=0
    pause 1
    FOR counter = 0 TO 4
        READ oraa*5+counter,leddata [counter]    
    NEXT 
        PORTB=%11111111
        PORTD = 1
        FOR counter = 0 TO 4
           PORTB = leddata [counter]       
           PORTD = PORTD * 2
        leddata [counter] = leddata [counter+1]
        NEXT

[cncmachineguy]

Awesome!!!!!!!!

[fratello]

Bug of setting hours (23-->0) solved :

                '    Decrement Units Hours
                '    ---------------
        If CounterC=1 then
            if setdechour=2 then
              IF SetHour=0 THEN
                 SetHour= 3
                 else    
                 SetHour=SetHour-1
              Endif
            else
              if sethour=0 then
                sethour=9
                else
                sethour=sethour-1
              endif            
            endif
        endif

and

                '    Increment Units Hours
                '    ---------------
        If CounterC=1 then
            if SetDecHour=2  then
                if SetHour=3 then
                    SetHour=0
                else
                    SetHour=SetHour+1
                endif
             else
                if SetHour=9 then
                   SetHour=0
                else
                   SetHour=SetHour+1
                endif         
            Endif    
       endif

This is it ! Best regards !

[wellyboot]

I use 4k7 pullup resistors on the I2C bus, as i read somewhere that its a bit fussy with 10K....dont know how true this is

[fratello]

Now I intend to use two 5x7 led matrix, since some ports of PIC (16F877A) are free...
Please, I need help : how can making scroll in this case ?
Note : PortB are lines (7) ; PortC are columns from 0 to 7 ; PortD are columns from 8 to 15.

[fratello]

I found a way...but I think it's not the BETTER way .

    '
    '    Display RTC & temp.
    '    -----------
LOOPing:
FOR scroll = 0 TO 70
    FOR scan = 0 TO 7
        PORTB=%11111111
        PAUSE 1
        PORTc = 1 
        PORTd = 1
        FOR counter = 0 TO 15
              PORTB = leddata [counter]
              pause 1
                if counter > 7 then      
                    PORTD = PORTD * 2
                else
                    portc = portc * 2
                endif 
        NEXT
    NEXT        
    FOR counter = 0 TO 70
        leddata [counter] = leddata [counter+1]
    NEXT
NEXT

LED's on column 7 (PortD 0) are, sometimes, on ... What @##%$@ is this ?

[mackrackit]

Thanks for making this an article!
http://www.picbasic.co.uk/forum/cont...ng-thermometer

[fratello]

My first working variant of scroll-thermo-clock :
Used : 16F877A, DS1307, home-made LED's matrix (7x7) and DS18B20 (missing in video, don't have anyone ).
Different code from previous example (because of my custom matrix). Enjoy !