Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C Quellcode formatieren: <code>Quellcode</code> BASIC Quellcode formatieren: <basic>Quellcode</basic> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! -> I > > 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 > > <basic> > ' 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 > </basic> >
