logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

[Atmega8][Bascom] Konfiguracja wyświetlacza LCD 2*16

Hubert1998 08 Sie 2011 13:59 1699 3
REKLAMA
  • #1 9803249
    Hubert1998
    Poziom 9  
    Witam
    Buduję właśnie stacje meteo na atmedze8 i LCD 2*16.
    Napisałem program testowy do LCD ale kiedy tylko próbuję go wrzucić Bascom się zwiesza :( Proszę o pomoc.

    kod:

    $regfile "m8def.dat"
    $crystal = 4.000

    Config Lcdpin = Pin , Db4 = Portb.2 , Db6 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.1 , Rs = Portb.0
    Config Lcd = 16 * 2
    Dim A As Byte
    Cls
    Lcd "STACJA METEO"
    Do
    Locate 1 , 2
    Lcd "STACJA METEO"
    Wait 1
    'Shiftlcd Right
    Cls
    Loop
    End

    Proszę o pomoc.
  • REKLAMA
  • Pomocny post
    #2 9803256
    snnaap
    Poziom 25  
    Co to za twór $crystal = 4.000???

    Powinno chyba być $crystal = 4000000

    Poza tym masz 2 razy DB6
    Config Lcdpin = Pin , Db4 = Portb.2 , Db6 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.1 , Rs = Portb.0
  • REKLAMA
  • #3 9803803
    xamrex
    Poziom 28  
    Hubert1998 napisał:
    Do
    Locate 1 , 2
    Lcd "STACJA METEO"
    Wait 1
    'Shiftlcd Right
    Cls
    Loop

    Nie wiem co chciałeś uzyskać (wydaje mi się, zeby tekst co sekundę przesuwał się w prawo) ale text nie będzie ci się cały czas w prawo przesuwał.
    Bo za każdym razem na samym początku pętli masz ustawianie tekstu w pozycji 1,2(Locate 1,2)
  • #4 9804113
    Hubert1998
    Poziom 9  
    Dzięki za wszytkie odp.
    Okazało się że było to złe podpisanie kwarca w Bascom.
    snnaap dzięki za odp.
    Pozdrawiam Hubert -Temat zamykam :)
REKLAMA