Hi Sebastian!
Dann hätte ich nun langsam gern eine positive Rückmeldung!
Sofern dein Display in Ordnung ist!
Gruß,
Cassio
Dann hätte ich nun langsam gern eine positive Rückmeldung!
Sofern dein Display in Ordnung ist!
Gruß,
Cassio
'Testprogramm 2 für Sebo
'mit Port D und Port C
$regfile = "m8def.dat"
$crystal = 1000000
'Pc0 bis PC5 dient als Controlport für das Display
'Ddrc = &B11_1111 '1 ist Ausgang 0 ist Eingang
'Portc = &B00_0000 'auf Hi oder Low setzen
'PortD ist der Datenport für das Display
'Ddrd = &B1111_1111 '1 ist Ausgang 0 ist Eingang
'Portd = &B0000_0000 'auf Hi oder Low setzen
Ddrb = &B11_1111 '1 ist Ausgang 0 ist Eingang
Portb = &B00_0000 'auf Hi oder Low setzen
' Configuriere das LCD
'some routines to control the display are in the glcdKS108.lib file
$lib "glcdKS108.lib"
Config Graphlcd = 128 * 64sed , Dataport = Portd , Controlport = Portc , Cd = 0 , Rd = 1 , Ce = 4 , Ce2 = 3 , Enable = 2 , Reset = 5
'---------------------------------------------------
'Dim variables
Dim Y As Byte
Glcdcmd &H3E , 1 : Glcdcmd &H3E , 2 ' both displays off
Cls
Waitms 50
Glcdcmd &H3F , 1 : Glcdcmd &H3F , 2 'both on
Waitms 50
Setfont Font8x8
Cls
Portb.0 = 0
Wait 1
' Arbeitsschleife----------------------------------
Do
Portb.0 = 1
Lcdat 1 , 1 , " Testprogramm-2"
Lcdat 2 , 1 , " GLCD KS0108 am"
Lcdat 3 , 1 , " AVR-ATMega8"
Lcdat 4 , 1 , "Dataport = D"
Lcdat 5 , 1 , "Controlport = C"
Lcdat 6 , 1 , " int. OSC 1MHz"
Lcdat 7 , 1 , " Cassio by"
Lcdat 8 , 1 , " AVR-Praxis.de"
Wait 5
Portb.0 = 0
For Y = 0 To 63
Line(0 , Y) -(127 , Y) , 1 'Vorhang runter
Waitms 5
Next X
Waitms 300
Portb.0 = 1
For Y = 63 To 0 Step -1
Line(0 , Y) -(127 , Y) , 0 'Vorhang rauf
Waitms 5
Next X
Portb.0 = 0
Waitms 500
Loop
' #############################################################################
End 'end program
' ------------------------------------------------------------------------------
$include "font8x8.font"
Meinst du so ein NE555 ? Das hat man normalerweise im 20er Pack in derIst das Display auch ohne diese -5V für den Kontrast lauffähig?
Sonst muss ich gucken, wo ich dieses IC herbekomme.
Ist das ein Standart IC?
Gruß Sebastian
Also sind die Spannungen sauber? Ich kann auf den Platinen keine Festspannungsregler o.Ä. finden...
hast du für das ICL7660 einfach einen 9V Block genommen?
Geht aber auch mit nem NE555, 2 Dioden, nen paar Kondensatoren und
Widerständen (sieh mal nach Ladungspumpe).
Gruß
Dino
etwas weiter oben der Beitrag #52 von Cassio (da ist ein Link drin) oderich such mir schon die ganze Zeit nen Wolf
Hab noch einen NE555 gefunden
Kannst du mir vllt eben die Schaltung zu verfügung stellen?
Also Eingangsspannung hab ich +12V und brauchen tu ich -12V oder iwas in der Richtung