Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum

Re: KS0073 LCD Lib Anpassung? Kategorie: Sonstige Hardware (von ffmspider - 15.06.2009 21:45)
Als Antwort auf KS0073 LCD Lib Anpassung? von Michael - 8.06.2009 10:05

> Hallo zusammmen,
>
> Nach vieler Sucherei hier und in anderen Foren bin ich leider nicht weitergekommen..
>
> Ich habe mir das EA DIP204-4 (KS0073) besorgt und habe das problem das ich die Zeilen nicht
> vernünftig ansteuern kann..logisch LCD Lib passt ja nicht. Daher die Frage hier sind doch bestimmt
> Profies die das schon erledigt haben.
>
> Kann mir die Angepasste Version zur Verfügung stellen bitte?
>
> GruÃ?
> Michael

Da ich scheibar der erste bin der diese Anpassung macht brauche ich mal etwas Hilfe
von den Profies hier. Derzeit habe ich das folgende Problem. Die Anzeige erscheint nur in Zeile 4
wenn ich aber die LCDTxT2-4 auf 19 zeichen kürze erscheinen alle Zeilen


' Aquarium Steuerung
' Michael Klopp
' PH Wert, Temeratur, Wasserstand, High Power LED Licht, RC5 Fernbedienung
' Gezeitensteuerung und DCF Uhr
' (c) 2009 mkl
'

#ifdef MEGA32                   ' Wird ein Mega32 verwendet wird der
#define aPort 10                ' Ausgabeport auf diese Weise deklariert.
#define DCF_IN 31
#endif

'#ifdef KS0073                   ' KS0073 4*20 Zeilen Display
'#define
'#endif


Dim LCDTxT1(20) As Char
Dim LCDTxT2(20) As Char
Dim LCDTxT3(20) As Char
Dim LCDTxT4(20) As Char



Sub main()
    LCDTxT1 = "12345678901234567890"
    LCDTxT2 = "22222222222222222222"
    LCDTxT3 = "33333333333333333333"
    LCDTxT4 = "44444444444444444444"



    LCD_Init()                  ' Display initialisieren 4 Bit
    LCD_ClearLCD()              ' Display löschen
    LCD_CursorOff()             ' Display Cursur ausschalten
    LCD_CursorPos(0x00)
    LCD_WriteText(LCDTxT1)
    LCD_CursorPos(0x40)
    LCD_WriteText(LCDTxT2)
    LCD_CursorPos(0x20)
    LCD_WriteText(LCDTxT3)
    LCD_CursorPos(0x60)
    LCD_WriteText(LCDTxT4)


End Sub




    Antwort schreiben


Antworten: