www.mikrocontroller.net

Forum: Mikrocontroller und Digitale Elektronik I2c zu LCD in Bascom


Autor: Troelli (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Guten Abend
Habe ich mir doch mal dieses Example angeschaut und probiert.
http://www.mcselec.com/an_118.htm
Funktioniert bis auf die string ausgabe auch perfekt.Hat schon jemand
mal dieses Example versucht und zum laufen gebracht?
Oder hat jemand eine Ahnung warum die LCD Anzeige nur Steuercodes an
nimmt?

Code:

$regfile = "2313def.dat"
'AT90S2313
$crystal = 4000000
$lib "Lcd_i2c.lib"                                          'My i2c
driver for the LCD
Const Pcf8574_lcd = &H40'Defines the address of the I/O expander for
LCD                                      'Für Bit 3 Von Portd
Config I2cdelay = 1
Config Scl = Portb.3                                        'Configure
i2c SCL
Config Sda = Portb.2                                        'Configure
i2c SDA
Dim _lcd_e As Byte                                          'Needed to
control 4 line LCD



_lcd_e = 128                                                'Upper
half of 4-line display is selected

Config Lcd = 16 * 4                                         'configure
lcd screen

Wait 1
Cursor On Blink
Display On
Do


Cls                                                         'clear the
LCD display

  'Portd.4 = 1                                               'Rote
LED (Pin PD3) an
  'Portd.3 = 1
  'Waitms 500
  'Portd.4 = 0
  'Portd.3 = 0                                               'Rote
LED aus
  'Waitms 100
Lcd "Hello world."                                          'display
this at the top line
'select the lower line
Wait 1
Lcd "Otter"                                                 'display
this
Wait 2


  'Portd.4 = 1                                               'Rote
LED (Pin PD3) an
  'Portd.3 = 1
  'Waitms 500
  'Portd.4 = 0
  'Portd.3 = 0                                               'Rote
LED aus
  'Waitms 100

'Wait 2
Loop
End

Autor: Troelli (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Kann denn keiner helfen ?

Autor: Alexander Arndt (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Hallo,

Problem noch akut...

Gruss

Autor: Ratber (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Soll das ne Frage sein oder hast "du" mit der Lib  ein Problem ?

In ersterem Fall würde ich sagen das es sich gelöst hat.
Is ja nun 3 Monate her.


Bei letzterem ,gib einfach laut :D

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.