Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 LCD Ansteuerung mit Basic++ und M 1.1 Kategorie: C-Control I V1.1 (von Beat Stöckli - 2.01.2005 18:54)

Guten Abend,

Hab den ganzen Sonntag erfolglos versucht den LCD Initialisierungsprogrammteil und Ansteuerteil von Basic in Basic++ umzuschreiben. Ohne erfolg.
Hat jemand diesen Standard Ansteuerteil für LCD Anzeigen nach Basic++ umgeschrieben?

Kann mit Function keine verschachtelte Aufrufe gemacht werden?
Stört euch nicht am Ausdruck LCD_Latch = on oder Off

Die LCD hängt an einer Buserweiterung mit 74HC573 (total 7Latch)  Mit Basic ist das ganze Funktionsfähig, es kann nicht an der Hardware liegen. Will einfach mit einem neuen Projekt gleich mal die BASIC++ anwenden.


 FUNCTION LCD_INIT()
busport = off
  lcd_param = 38h     ' 8-Bit-Modus aktivieren
  LCD_WRITECMD()

  busport=00000010b   ' mit 8-Bit Command in 4-Bit Modus Umschalten
   LCD_LATCH = on
     tog lcd_e
     tog lcd_e
   LCD_LATCH = off

  lcd_param = 28h     ' ab jetzt 4-Bit-Modus
     LCD_WRITECMD()
  lcd_param = 0Ch
     LCD_WRITECMD()
     lcd_cls()
END FUNCTION

FUNCTION LCD_CLS()
  lcd_param = 02h
    LCD_WRITECMD()
  lcd_param = 01h
    LCD_WRITECMD()
pause 1
END FUNCTION

' LCD-Kommando
FUNCTION LCD_WRITECMD()
  lcd_buf = OFF
  LCD_WRITE()
END FUNCTION

' Zeichenausgabe
FUNCTION LCD_WRITECHAR()
  lcd_buf = 00100000b
END FUNCTION

' Kommando oder Zeichen an Display senden
FUNCTION LCD_WRITE()
  busport = lcd_buf or (lcd_param shr 4) ' Hi-Nibble
     LCD_LATCH = on
   tog lcd_e
   tog lcd_e
   busport = lcd_buf or (lcd_param and 0Fh)  ' Lo-Nibble
   tog lcd_e
   tog lcd_e
     LCD_LATCH = off
END FUNCTION

Besten Dank im Voraus

Beat


 Antwort schreiben

Bisherige Antworten:

Re: LCD Ansteuerung mit Basic++ und M 1.1 (von Stefan Tappertzhofen - 2.01.2005 22:11)
    Re: LCD Ansteuerung mit Basic++ und M 1.1 (von Beat Stöckli - 3.01.2005 6:42)
        Re: LCD Ansteuerung mit Basic++ und M 1.1 (von Stefan Tappertzhofen - 3.01.2005 12:05)
            Re: LCD Ansteuerung mit Basic++ und M 1.1 (von Beat Stöckli - 4.01.2005 17:26)