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

Lcd graficzny (KS108)-BASCOM

adi84_84 05 Sty 2011 19:00 2922 2
REKLAMA
  • #1 8962241
    adi84_84
    Poziom 14  
    Witam wszystkich.
    Zakupiłem taki wyświetlacz z myślą o sterowaniu nim Atmegą32 + BASCOM.Niestety po wielu próbach nadal nic nie chce działać,dioda miga prawidłowo :( JTAG oczywiście wyłączony,regulacja kontrastu tez działa poprawnie.Jedyne co mi się udaje to jak w chwili resetu mikroprocesora (reset + Gnd) pojawiają się oczekiwane napisy na około 1s.Po tym czasie znowu zero odzewu.Obrazek w ogóle sie nie wyświetla.
    Proszę wszystkich o pomoc :)

    '        D0 (LCD_GRAPH/con12) - PA0 (con15)
    '        D1 (LCD_GRAPH/con12) - PA1 (con15)
    '        D2 (LCD_GRAPH/con12) - PA2 (con15)
    '        D3 (LCD_GRAPH/con12) - PA3 (con15)
    '        D4 (LCD_GRAPH/con12) - PA4 (con15)
    '        D5 (LCD_GRAPH/con12) - PA5 (con15)
    '        D6 (LCD_GRAPH/con12) - PA6 (con15)
    '        D7 (LCD_GRAPH/con12) - PA7 (con15)
    '
    
    '        RS (LCD_GRAPH/con12) - PC0 (con17)
    '        RW (LCD_GRAPH/con12) - PC1 (con17)
    '        E  (LCD_GRAPH/con12) - PC2 (con17)
    '        CS1(LCD_GRAPH/con12) - PC4 (con17)
    '        CS2(LCD_GRAPH/con12) - PC3 (con17)
    '
    '******************************************************************************
    
    $regfile = "m32def.dat"
    $crystal = 16000000
    $baud = 1200
    $hwstack = 64
    $swstack = 64
    $framesize = 64
    
    $include "font6x8.font"
    $lib "glcdKS108.lbx"
    
    Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 3 , Ce2 = 4 , Cd = 0 , Rd = 1 , Reset = 5 , Enable = 2
    Config Pinb.0 = Output
    Led Alias Portb.0
    Cls
    Setfont Font5x8
    
    Do
    Cls
    Lcdat 1 , 12 , "   Cos tam"
    Lcdat 2 , 12 , "witam wszystkich"
    
    Lcdat 4 , 12 , " -- ZL15AVR --  "
    Lcdat 5 , 12 , "jest na atmega32"
    Led = 0
    Wait 2
    
    Showpic 0 , 0 , Kamami
    Led = 1
    Wait 2
    
    
    Loop
    End
    
    Kamami:
    $bgf "kamami.bgf"
  • REKLAMA
  • #2 8962759
    august_a
    Poziom 21  
    a zmień może to tak :


    Cls 
    Lcdat 1 , 12 , "   Cos tam" 
    Lcdat 2 , 12 , "witam wszystkich" 
    Lcdat 4 , 12 , " -- ZL15AVR --  " 
    Lcdat 5 , 12 , "jest na atmega32" 
    Led = 0 
    Showpic 0 , 0 , Kamami 
    Do
    Led = 1 
    Wait 2 
    
    
    Loop 
    End
  • #3 8962960
    adi84_84
    Poziom 14  
    Problem rozwiązany.Trzeba było połączyć reset lcd z resetem atmegi :)
REKLAMA