  INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Hallo Achim, ob es lesbare Zeichen sind kann ich dir leider auch nicht beantworten. Ich habe folgendes mal ausprobiert. Leider ohne Erfolg: define value byte ' *** Daten-Definition *** define lcd_buf byte define lcd_param byte ' *** Definition LCD-Ports *** define lcd_port byteport[2] define lcd_rs port[14] define lcd_rw port[13] define lcd_e port[15] 'LCD Laden gosub LCD_INIT pause 10 '*** RS lesen *** #loop get value gosub LCD_WRITE goto loop END '*** LCD_Interface *** #LCD_INIT ' alle ports 0 lcd_port = OFF ' 8-Bit-Modus aktivieren lcd_param=&H38 : gosub LCD_WRITECMD ' mit 8-Bit-Command in 4-Bit-Modus umschalten lcd_port=&B00000010 tog lcd_e tog lcd_e ' ab jetzt 4-Bit-Modus lcd_param = &H28 : gosub LCD_WRITECMD lcd_param = &H0C : gosub LCD_WRITECMD ' Display loeschen #LCD_CLS lcd_param = &H02 : gosub LCD_WRITECMD lcd_param = &H01 : gosub LCD_WRITECMD return ' Zeilenwechsel #LCD_GOTOLINE if lcd_param = 1 then lcd_param = &H80 if lcd_param = 2 then lcd_param = &HC0 goto LCD_WRITECMD ' LCD-Kommando #LCD_WRITECMD lcd_buf = OFF goto LCD_WRITE ' Zeichenausgabe #LCD_WRITECHAR lcd_buf = &B00100000 ' Kommando oder Zeichen an Display senden #LCD_WRITE lcd_port = lcd_buf or (lcd_param shr 4) ' Hi-Nibble tog lcd_e tog lcd_e lcd_port = lcd_buf or (lcd_param and &H0F) ' Lo-Nibble tog lcd_e tog lcd_e return Ist das richtig so ? Wo habe ich evtl. was falsch gemacht? Gruß Christian |
| Antwort schreiben |
Re: RS232 Befehle im LCD Anzeigen lassen (von Achim - 22.07.2004 17:43)Re: RS232 Befehle im LCD Anzeigen lassen (von Christian Scholz - 24.07.2004 17:49)Re: RS232 Befehle im LCD Anzeigen lassen (von Achim - 24.07.2004 18:30)Re: RS232 Befehle im LCD Anzeigen lassen (von Christian Scholz - 24.07.2004 18:44)Re: RS232 Befehle im LCD Anzeigen lassen (von Achim - 24.07.2004 19:19)Re: RS232 Befehle im LCD Anzeigen lassen (von Christian Scholz - 24.07.2004 21:48)