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

[atmega128][bascom] Wyswietlacz graficzny

avatar 30 Paź 2009 15:35 4846 5
REKLAMA
  • #1 7193922
    avatar
    Poziom 36  
    Witam mam wyswietlacz oparty na T6963c
    240x64
    Problem polega na tym ze nie dziala wyswietlanie obrazow BGF
    Wyswietlanie napisow , linii i innych elementow dziala poprawnie poza obrazami bgf
    Wyprobowalem wszystkie ustawienia w konwterze bmp<> i BGF i najlepiej wychodzi
    6x8 240x64 - tylko ze obraz kola wyglada jak poszatkowany (tak jak by zapis w kolejnej linijce byl przesuniety o parenascie pixli od linii powyzej)

    
    $regfile = "m128def.dat"
    '$crystal = 11059200
    $crystal = 1000000
    $loadersize = 512
    $hwstack = 100
    $swstack = 75
    $framesize = 40
    '$lib "GLCD.Lbx"
    Config Graphlcd = 240 * 64 , Dataport = Porta , Controlport = Portc , Ce = 2 , Cd = 3 , Wr = 0 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 6
    
    
    'mode 8 gives 240 / 8 = 30 columns , mode=6 gives 240 / 6 = 40 columns
    
    Dim X As Byte , Y As Byte
    Dim I As Byte
    Cls
    Cursor Off
    
    Wait 1
    
    'locate works like the normal LCD locate statement
    ' LOCATE LINE,COLUMN LINE can be 1-8 and column 0-30
    
    
    
    Pic0:
    $bgf "fan0.bgf"
    
    Pic1:
    $bgf "fan1.bgf"
    
    Locate 1 , 1
    Lcd "Test"
    Locate 2 , 1 : Lcd "Prosze czekac | Pleas Wait"
    Locate 3 , 1 : Lcd " Test kolejny"
    'Cls
    For I = 1 To 20
       Circle(38 , 39) , I , 255
       Waitms 130
       Next
    
    
    
    
    Cls
    Waitms 100
    Showpic 0 , 0 , Pic0
    Wait 10
    
    
    Cls
    Waitms 100
    Showpic 0 , 0 , Pic1
    Wait 8
    
    Do
     nop
    Waitms 100
    
    Loop
    End
    
  • REKLAMA
  • REKLAMA
  • #3 7197027
    Konto nie istnieje
    Poziom 1  
  • REKLAMA
  • #4 7204702
    avatar
    Poziom 36  
    Mode zmienilem na 8 - efekt - zadny
    Wyswietlacz dziala poprawnie dla rysowania lub wyswietlania tekstu
    nota katalogowa wyswietlacza:
    http://download.maritex.com.pl/pdfs/op/TG24064A-07.pdf


    Zdjecia
    Jedno przedstawia kolo narysowane za pomoca funkcji

    Kolejne przedstawia bitmape (ktora zalaczam) wyswietlona jako bgf
    jak widac po zsunieciu linii wyszlo by jajowate kolo .... a jak widac na zalaczonej bitmapie kolo raczej winno byc okragle
    bitmapa 2 kolorowa (cz-b) rozmiar 240x64

    Zegar zwolnilem od 11,56Mhz do 1Mhz
    Zamienilem porty z portow F ktore ponoc nie nadaja sie do obslugi wyswietlacza na porty A i C

    jescze male info rysowanie za pomoca box - nie dziala poprawnie zawsze mam otwarte pudelko z bardzo dluga linia , natomiast boxfill dziala w 100% poprawnie tak samo jak rysowanie kola linii i pset ...
  • REKLAMA
  • #5 7206114
    avatar
    Poziom 36  
    Tak wiec - nie mam zielonego pojecia co jest nie tak
    stworzylem proste menu do odtwarzacza mp3 za pomoca boxfill i tekstu oraz linii - zalaczam zdjecie
    Wszystko jest w 1000% poprawnie
    natomiast narysowanie czegos za pomoca samej komendy box konczy sie otwartym kwadracikiem
    (zdjecie)
  • #6 7206268
    Konto nie istnieje
    Poziom 1  
REKLAMA