LCD und BASCOM

[Jahn Kohlhas (Gast)]

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

[ThomasB (Gast)]

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

[hackspider (Gast)]

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

[Jahn Kohlhas (Gast)]

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

[Jahn Kohlhas (Gast)]

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

[harry (Gast)]

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

[KISHOR BANDE (Gast)]

hi freinds!
through internet i got your page. i am finding difficulty interfacing
16*1 Lcd display. my LCD disply is having 8-bit bus.
how to confgure this in BASCOM
regards
kishor