LCD und BASCOM

Gast #105096
Lesenswert?

Hallo Jungs,

habe ein Problem mit der ansteuerung eines lcd unter bascom
es ist immer nur ein schwarzer balken in der 2. zeile zu sehen... was
mach ich falsch????

'--------------------------------------------------------------
' lcd_sisy.bas
' SiSy-AVR-Baord mit mega8 und LCD 16x2
' 4 Bit
' E=PB.0 RS=PB.2 DB4-7=PB4-7 RW=GND
'--------------------------------------------------------------
$lib "lcd4.lbx"
$regfile = "m8def.dat"
$crystal = 8000000

Config Lcd = 16 * 2
Config Portb = Output

Do
  Waitms 1000
  Cls
  Lcd "test"
  Lowerline
  Lcd "12345678"
Loop
End
Gast #105097
Lesenswert?

hi Jahn
Vesuch´s mal mit diesem Code:
 $regfile = "m8def.dat"
$crystal = 8000000

Config Lcd = 16 * 2
Config Portb = Output

Do
  Waitms 1000
  Cls
  Upperline
  Lcd "test"
  Lowerline
  Lcd "12345678"
Loop
End

Ohne $LIB
mfg ThomasB
Gast #105098
Lesenswert?

also du musst noch die pins configurieren so z.B
Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 ,
Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
Config Lcd = 16 * 4

cls
LCD "hello WOrld"

und du musst dem programm noch sagen wo das lcd dranhängt in der
configuration irgendwo
Gast #105099
Lesenswert?

danke thomas,

aber leider funzt das auch nicht... das display selbst ist aber in
ordnung... habe es aus einem anderem gerät mit nem 4433 geklemt GRINS
habe aber leider den source von dem anderen teil nicht :-( was kann das
noch sein??? so sieht es jetzt aus

'--------------------------------------------------------------
' lcd_sisy.bas
' sisy-avr-baord mit LDC
' 4 Bit
' E=PB.0 RS=PB.2 DB4-7=PB4-7 RW=GND
' KS0066 , HD44100
'--------------------------------------------------------------
$regfile = "m8def.dat"
$crystal = 8000000

Config Lcd = 16 * 2
Config Portb = Output

Do
  Waitms 1000
  Cls
  Lcd "test"
  Lowerline
  Lcd "12345678"
Loop
End
Gast #105100
Lesenswert?

sorry... geht immer noch nicht... ich bin am verzweifeln :-(
kann es was mit dem chipsatz zu tun haben? ... KS0066 , HD44100

'--------------------------------------------------------------
' lcd_sisy.bas
' mega8 sisy-avr-baord mit LDC
' 4 Bit
' E=PB.0 RS=PB.2 DB4-7=PB4-7 RW=GND
' KS0066 , HD44100
'--------------------------------------------------------------
'$lib "lcd4.lbx"
$regfile = "m8def.dat"
$crystal = 8000000

Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 ,
Db7 = Portb.7 , E = Portb.0 , Rs = Portb.2
Config Lcd = 16 * 2
Config Portb = Output

Do
  Waitms 1000
  Cls
  Lcd "test"
  Lowerline
  Lcd "12345678"
Loop
End
Gast #105101
Lesenswert?

hi,

dein code ist schon in ordnung, aber:
portd muss (oder darf?) nicht als output definiert werden, im 'config
lcdpin =...' wird portb definiert.
hast du die fusebits so gesetzt, dass der avr auch wirklich mit 8mhz
tickt? wenn das timing nicht stimmt kommt nix oder nur müll raus.

gruss, harry

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren