initlcd mit glcd?

[albundy]

Wie es aussieht ($crystal = 1000000), hast du an den FUSE Bit's noch nichts geändert.
Somit kannst du Portc nicht benutzen, da dieser standartmässig für ein JTAG Interface vorgesehen ist.
Entweder, du nimmst einen anderen Port, oder du musst per FUSE, JTAG disablen.
Aber als Neueinsteiger musst du dich vor einer Änderung genau über die Bedeutung der FUSE Bit's informieren ! Man kann da leicht Fehler machen !

[chr-mt]

Hi,
wenn die LED nicht mehr bklinkt, dann kann es ja nicht am Display hängen.
Kannst nochmal probieren, bei den Ports A und C die Pullups einzuschalten.
Sicher das du einen 10 MHz Quarz hast und auch die Fuses entsprechend gesetzt hast ?
Wenn das Timing falsch ist, geht auch nix.
JTAG hast du ausgeschaltet ?

Gruß
Christopher

[milkbubi]

Wie es aussieht ($crystal = 1000000), hast du an den FUSE Bit's noch nichts geändert.
Somit kannst du Portc nicht benutzen, da dieser standartmässig für ein JTAG Interface vorgesehen ist.
Entweder, du nimmst einen anderen Port, oder du musst per FUSE, JTAG disablen.
!

Ich hab die Fuses tatsächlich nicht angerührt, das Display ist aber samt controller auf nem eval. Board von Deltawave und die haben JTAG disabled zumindest stehts in Bascom so und es ging ja auch schonmal mit dem Demoprogramm. Dieses hab ich nur leider vorschnell mit eigenen Versuchen überspielt und steht mir somit nicht mehr zur Verfügung. (Dabei die Frage: wie lese ich mit Bascom ein Programm aus, also aus dem MC).

@Christpher: Hab wie oben erwähnt den internen 1Mhz Takt, weiß nicht wie du auf die 10Mhz kommst.
Das mit der Led war ein Test ob das Programm überhaupt durchläuft aber vielleicht kann es ja auch so gar nicht funktionieren. Meiner Ansicht nach hängt er schon bei der Configuration fest, ist da irgendwo ein fehler drin?

mfg milkbubi

[milkbubi]

Sooo,
also ich hab jetzt nach 2 Tagen Suche endlich das Demoprogramm gefunden was am anfang drauf war - aufgespielt - Display geht nur stimmt da was mit Timing nicht ganz. Mein Problem ist nur, dass das ganze in c ist und ich nun noch weniger Ahnung von c hab als von Basic.
Werd mal die Hex-im Anhang einfügen und den vermeintlichen Quellcode in c vielleicht kann mir ja jemand dann sagen, was ich bei der Ansteuerung falsch gemahct hab.
Vielen Dank im voraus

mfg mikbubi

[chr-mt]

@Christpher: Hab wie oben erwähnt den internen 1Mhz Takt, weiß nicht wie du auf die 10Mhz kommst.

Mmmm... man sollte mit starker Erkältung keine 0en zählen..sorry..

Gruß
Christopher

[Vitis]

ähm hallo? wir reden hier über ein GLCD .... Mit LCD"Hello xy" wird
das vermutlich nix werden. Das ist kein 4*20 Display mit eingebautem
Zeichensatz usw. sondern da ist jeder pixel für sich zu setzen
normalerweise.
In dem Demo ist z.B. "logo.h" drinne, das ist nix anderes als
Das Herstellerlogo als Bilddatei, die da auf das Disp geladen wird.

Der t6963c hat nen Graph und nen Zeichen-Mode, hat auch ein Font
Eingebaut, aber ob Bascom das unterstützt ? glaub ich nicht.

[milkbubi]

Es steht aber so in der Bascom Hilfe drin

hier noch ein Teil des Bsp.Programms aus der language reference:

Example

'-----------------------------------------------------------------------------------------

'name                     : t6963_240_128.bas

'copyright                : (c) 1995-2005, MCS Electronics

'purpose                  : T6963C graphic display support demo 240 * 128

'micro                    : Mega8535

'suited for demo          : yes

'commercial addon needed  : no

'-----------------------------------------------------------------------------------------


$regfile = "m8535.dat"                                      ' specify the used micro

$crystal = 8000000                                          ' used crystal frequency

$baud = 19200                                               ' use baud rate

$hwstack = 32                                               ' default use 32 for the hardware stack

$swstack = 10                                               ' default use 10 for the SW stack

$framesize = 40                                             ' default use 40 for the frame space


'-----------------------------------------------------------------

'                     (c) 2001-2003 MCS Electronics

'                 T6963C graphic display support demo 240 * 128

'-----------------------------------------------------------------


'The connections of the LCD used in this demo

'LCD pin                  connected to

' 1        GND            GND

'2        GND            GND

'3        +5V            +5V

'4        -9V            -9V potmeter

'5        /WR            PORTC.0

'6        /RD            PORTC.1

'7        /CE            PORTC.2

'8        C/D            PORTC.3

'9        NC             not conneted

'10       RESET          PORTC.4

'11-18    D0-D7           PA

'19       FS             PORTC.5

'20       NC             not connected


'First we define that we use a graphic LCD

' Only 240*64 supported yet

Config Graphlcd = 240 * 128 , Dataport = Porta , Controlport = Portc , Ce = 2 , Cd = 3 , Wr = 0 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 8

'The dataport is the portname that is connected to the data lines of the LCD

'The controlport is the portname which pins are used to control the lcd

'CE, CD etc. are the pin number of the CONTROLPORT.

' For example CE =2 because it is connected to PORTC.2

'mode 8 gives 240 / 8 = 30 columns , mode=6 gives 240 / 6 = 40 columns


'Dim variables (y not used)

Dim X As Byte , Y As Byte



'Clear the screen will both clear text and graph display

Cls

'Other options are :

' CLS TEXT   to clear only the text display

' CLS GRAPH  to clear only the graphical part


Cursor Off


Wait 1

'locate works like the normal LCD locate statement

' LOCATE LINE,COLUMN LINE can be 1-8 and column 0-30



Locate 1 , 1


'Show some text

Lcd "MCS Electronics"

'And some othe text on line 2

Locate 2 , 1 : Lcd "T6963c support"

Locate 3 , 1 : Lcd "1234567890123456789012345678901234567890"

Locate 16 , 1 : Lcd "write this to the lower line"


Wait 2


Cls Text



'use the new LINE statement to create a box

'LINE(X0,Y0) - (X1,Y1), on/off

Line(0 , 0) -(239 , 127) , 255                              ' diagonal line

Line(0 , 127) -(239 , 0) , 255                              ' diagonal line

Line(0 , 0) -(240 , 0) , 255                                ' horizontal upper line

Line(0 , 127) -(239 , 127) , 255                            'horizontal lower line

Line(0 , 0) -(0 , 127) , 255                                ' vertical left line

Line(239 , 0) -(239 , 127) , 255                            ' vertical right line



Wait 2

' draw a line using PSET X,Y, ON/OFF

' PSET on.off param is 0 to clear a pixel and any other value to turn it on

For X = 0 To 140

   Pset X , 20 , 255                                        ' set the pixel

Next


For X = 0 To 140

   Pset X , 127 , 255                                       ' set the pixel

Next

[Vitis]

hmmm ... ok, dann ham die Bascommer mehr drinn als ich dachte ... Asche aufs Haupt streu.

Haste mal versucht das Demoprogramm auf Dein Board zu spielen?
Brauchste ja nur den regfile und den crystal ändern.

[coCo]

Only 240*64 supported yet


Vielleicht gehts deswegen net?

[milkbubi]

ja hab zumindest den anfang der Demo raufgespielt aber das ist ja dann auch nicht viel anders als ich es hatte, die pins musst ich ja dennoch ändern.

Ich bin leider grad nicht zu Hause aber wenn ich das Ding wieder vor mir hab dann probier ich mal da einfach 240*64 einzustellen, vielleicht gibt er ja dann wenigstens irgendwas aus.
Dank euch erstmal

mfg milkbubi