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

Atmega 8 i wyświetlacz szeregowy - drugie starcie

toya123 07 Lut 2009 19:41 1218 2
REKLAMA
  • #1 6117456
    toya123
    Poziom 11  
    Mam wyświetlacz z portem szeregowym - nota katalogowa jest tutaj:
    http://s89402622.onlinehome.us/vfd/us202sd01ad.pdf
    Podłączyłem wyświetlacz po sprzętowym SPI, a kod wygląda tak:

    $regfile = "m8def.dat"
    $crystal = 1000000
    
    
    Dim A As Byte
    
    Config Spi = Hard , Interrupt = On , Data Order = Lsb , Master = Yes , Polarity = High , Phase = 1 , Clockrate = 4
    Portc.5 = 1
    Enable Spi
    Spiinit
    A = &H04                                                    'Ustawienie jasności'
    Spiout A , 1
    A = &HFF
    Spiout A , 1                                                'Jasność 100%'
    Waitms 2
    A = &H02                                                    'Ustawienie kursora'
    Spiout A , 1
    A = &H01                                                    'Lewy górny róg ekranu'
    Spiout A , 1
    Waitms 2
    A = &H42         ' WYŚWIETLENIE ZNAKU R'
    Spiout A , 1
    End
    


    Jest to moje pierwsze podejście do tego typu wyświetlaczy i SPI więc jeśli ktoś może powiedzieć dlaczego na ekranie nic się nie wyświetla to będę wdzięczny. Jak powinien wyglądać ten kod?

    Pozdrawiam
  • REKLAMA
  • Pomocny post
    #2 6119354
    Konto nie istnieje
    Konto nie istnieje  
  • #3 6119793
    toya123
    Poziom 11  
    Dzięki za pomoc, pokombinowałem i to powinno wyglądać tak:
    
    
    $regfile = "m8def.dat"
    $crystal = 8000000
    
    
    
    Dim A As Byte
    Dim B(10) As Byte
    Dim C As Byte
    Config Portc = Output
    Config Spi = Hard , Interrupt = On , Data Order = Msb , Master = Yes , Polarity = High , Phase = 1 , Clockrate = 64
    
    
    'DANE i ZEGAR PODŁĄCZONE DO SPI SPRZĘTOWEGO SCK / MOSI
    
    
    Enable Spi
    Spiinit
    
    'Wykonanie resetu na PORTC.5 - podłączone do RESET wyświetlacza
    Portc.5 = 1
    Waitms 1
    Portc.5 = 0
    Waitms 1
    'Koniec resetu
    
    
    'Konfiguracja jasności'
    A = &H04
    Spiout A , 1
    Waitms 2
    'Ustaw jasnosc na 100%'
    A = &HFF
    Spiout A , 1
    Waitms 2
    
    
    'CLS
    A = &H01
    Spiout A , 1
    Waitms 2
    
    'Definicja napisu
    B(1) = "T"
    B(2) = "A"
    B(3) = "T"
    B(4) = "O"
    B(5) = " "
    B(6) = "!"
    
    'WYŚWIETLENIE ZNAKÓW'
    For C = 1 To 6
    Spiout B(c) , 1
              Next C
    
    
    End


    Dzięki za pomoc
REKLAMA