Druckbare Version
Hallo!
Ich möchte mein 16x2 LCD an meine CC1 anschließen. Jetzt gibt es da so nen Link: wieselsworld.
Ich hab den Syntax 1:1 übernommen, und auch die Pins so wie im Bsp. konfiguriert, bzw. angeschlossen.
Aber wie geb ich jetzt eine Zeichen, bzw. ein Wort oder eine Variable aus?
Kann da wer ein Bsp.-Code machen? Wäre nett.
mfg,
René.
Hallo CapSob,
Beispiele findest du im Samples-Verzeichnis deiner C-Control-Software.
Gruss, Michael
vielleicht sollte ich erwähnen, dass ich mit basic arbeite... und da gibts leider kein bsp.-code im verzeichnis...
Du musst folgendes schreiben:
val=ascii-code
gosub lcd_write
wobei der ascii-code eben der ASCII-Code des entsprechenden symbols ist. Ich füge in meine Programme immer Folgenden Code für den ASCII ein:
define a 97
define b 98
define c 99
define d 100
define e 101
define f 102
define g 103
define h 104
define i 105
define j 106
define k 107
define l 108
define m 109
define n 110
define o 111
define p 112
define q 113
define r 114
define s 115
define t 116
define u 117
define v 118
define w 119
define x 120
define y 121
define z 122
Dann muss ich ímmer nur den Buchstaben schreiben statt zu rechnen. Dass sieht dann so aus (am beispiel "m"):
val=m
gosub lcd_write
Wenn ich nen Buchstaben groß haben will muss ich folgendes schreiben:
val=m-32
gosub lcd_write
bei zahlen musst du einfach nur die Zahl plus 48 rechnen, also wenn du 7 haben willst:
val=7+48
gosub lcd_write
Den kompletten ascii-code als tabelle such ich mal... ich müsste den irgendo rumliegen haben...
das hört sich schon besser an, werde ich gleich mal nach dem mittagessen versuchen! thx.
Ich hab ne Tabelle :-)
http://www.vbarchiv.net/commands/Ascii-Codes.php
Soweit, sogut. aber es funktioniert trotzdem noch nicht.
Wäre cool, wenn mal jemand einen (kompletten) syntax posten könnte, wie ich z.b. 'r' ausgebe. entweder mache ich programmiertechnisch noch was falsch, oder das lcd ist kaputt :-s .
weil wenn ich den kotrast ändere, passiert nämlich nichts. ich habe einen poti (10kOhm) mit dem mittleren pin an pin 3 vom lcd angeschlossen, und die äußeren jeweils einmal an masse und vcc.
?...
Was für eine Pinbelegung hast du denn? Wo liegt was an?
Hab dich grade bei ICQ geADDed.
Wenn ich das richtig vertehe, könnte man genausogut neen 4 Zeiliges Display anschliesen, oder? Man müsste dann nur die andere Pinbelegung berücksichtigen.
ICh hab ne Frage zu dem Quelltext:
wenn ich val z.B.: auf 6 setze, und nun LCD_Comand ausgeführt wird, wird ja automatisch danach LCD_in ausgeführt, aber was bedeutet dann:
d7=val AND 128
d6=val AND 64
d5=val AND 32
d4=val AND 16
und was macht "pulse e"?
Bester Link zu solchen Fragen:
http://www.wolfgang-back.com/PDF/LC_Display.pdf
Bei weiteren Fragen zu Aufgaben mit der C-Control bzw. Motorola mikroCs einfach mal unter www.wolfgang-back.com unter Lallus schauen. Da hats haufenweise PDFs zu Problemen und Lösungen...
Der Link ist gut! Ich werde mir jetzt mal meine eigenen Funktionen schreiben, sodass ich wirklich nur noch val=ascii : gosub lcd_write hab...
Hab mir mal beim Reichelt ein 16x2 LCD bestellt. Wenns kommt gehts los... Muss bloß nochmal wegen Belegung gucken.
Ich hab noch ein altes 40x4 LCD rumliegen, aus einem alten Telekom Telefon. Hat jemand dafür ein Datenblatt? ich find keins.. drauf stehe tut: PC081ATN und 812A. Leider kann ich das Logo nicht entziffern, sieht so aus wie 'PoV'...
Danke auf jedenfall schonmal.
ES FUNTZT!!!
So, jetzt ist bloß mein Problem, dass das LCD bloß bis zur Hälfte schreibt. Der Hr. Back schreibt, dass ich dafür H56 übertragen muss. Aber es passiert nichts... Was muss ich übertragen?
Hmm. Ja, ein schwieriges Thema. Probiers mal mit dem immer weiterschreiben. Also immer mehr Zeichen. Irgendwann müsste es auf der anderen Seite weitergehen. Soviel Zeichen wie Du dazu benötigst, musst Du dann weiter im DDRAM des LCDs wandern.
Aber schau mal in den Datenblättern des LCDs. Da müsste es auch stehen.
Displays mit 40*4 Zeichen haben einen zweiten Enabel-Eingang. Wenn ich das richtig verstanden habe, dann steuerst Du mit E1 die linke Hälfte des Displays und mit E2 die rechte Hälfte. Bei den Displays liegen E1 und E2 meist direkt nebeneinander.
Unter http://www.display-elektronik.de/lcd...-alphanum.htm# gibt es weitere Infos
Ahh, interessant. Hatte noch nie ein 40er. Schon wieder was gelernt :)
Hi Leute, hab es auch mal ausprobiert...
aber läuft nicht!
Ich ahbe das Script von CapSob:
http://www.wieselsworld-online.de/cc...cd/lcd_par.htm
benutzt, allerdings kommt da nur datenmüll raus, kann es sein, dass PIN 5 des LCDs, dass hier gegen Masse gezogen ist auch ncoh angesteuert ist, denn wenn ich das Application-Board benutze, dann flackert, wenn man ne Diode dranschließe, diese immer kurt auf, bevor was geschrieben wird. (Habe in dem Fall CCPLUS verwendet, zum Test)
Wie steuert man das Display denn "normalerweise" mit dem CCBASIC an? kann mir jemand mal nen Quelltext posten?
Hallo CapSob,
Ich habe jetzt extra nochmal für dich die c-control-Software rausgekramt. Im Verzeichnis ../samples/ findest du die benötigten Dateien. Zu warm zum suchen?Zitat:
vielleicht sollte ich erwähnen, dass ich mit basic arbeite... und da gibts leider kein bsp.-code im verzeichnis...
siehe oben.Zitat:
Zitat von RCO
Gruss, Michael
Sorry Michael,
aber ich finde keine Samples zum Display, könntest du die nicht online stellen, würdest mich echt weiterbringen. Ich finde nur Samples zum Taster, Dioden, Variablen...
Danke
MFG Moritz
Hallo RCO,
hmmm, ich weiss nicht, womit heutzutage Conrad seine C-Controls ausliefert, bei mir waren sie dabei :)
Online stellen werd ich sie nicht, ich geb dir aber den Link darauf:
http://www.c-control.de/downloads/appboard.zip
Gruss, Michael
Edit am 21.07.2009:
Die C-Control-Software findet man mittlerweile unter:
http://www1.conrad.de/information/do..._ccontrol.html
Danke Michael, ist genau was ich gesucht habe.
Das Ding ist, ich habe ja kein Application-Board, von daher auch keine Software, nur das Display und nen Starterboard.
Eigentlich hatte ich auch auf C-control.de gesucht, aber es wohl nicht gefunden.
Danke nochmal
Hy!
Also es funtzt jetzt. Ich habe mit Matthias zusammen eine Art "Engine" programmiert für die CControl/Basic. Bei gelegenheit werde ich sie mal posten.
mfg,
CapSob.
Ich glaube so war's, oder?Code:'---------- Variblen Deklaration ----------
define lcd_out byteport[2] '9=D4 10=D5 11=D6 12=D7
define rs port[13]
define enable port[14]
'rw auf Masse
define buffer byte
define zeichen byte 'Zu uebertragendes Zeichen
'---------- Hauptprogramm ----------
gosub lcd_init 'LCD Initialisierungs-Routine
zeichen = 1
gosub lcd_line 'Start in Zeile 1
zeichen = 82
gosub lcd_write 'R
zeichen = 101
gosub lcd_write 'e
zeichen = 110
gosub lcd_write 'n
zeichen = 101
gosub lcd_write 'e
goto ende
'---------- LCD Funktionen ----------
#lcd_init
lcd_out=off
zeichen=&h38:gosub lcd_command
lcd_out=&b00000010
tog enable
tog enable
zeichen=&h28:gosub lcd_command
zeichen=&h0c:gosub lcd_command
#lcd_cls
zeichen=&h02:gosub lcd_command
zeichen=&h02:gosub lcd_command
return
#lcd_write
buffer = &b00010000
goto lcd_send
#lcd_line
if zeichen = 1 then zeichen = &h80
if zeichen = 2 then zeichen = &hC0
#lcd_command
buffer = off
#lcd_send
lcd_out = buffer or (zeichen shr 4)
tog enable
tog enable
lcd_out = buffer or (zeichen and &h0f)
tog enable
tog enable
return
#ende
end
Jein, ich hab nen Quelltext gefunden, der deinem ziemlich ähnlich ist, allerdings verstehe ich nciht, warum rw auf Masse gezogen wird, denn wenn ich das bei dem Display mache, kommt nur Müll auf dem Display an.
Oder vielleicht hab ich auch ne falsche Dokumentation vom Display, dass finde ich noch raus...
Mit der Beispieldatei läuft es auf jeden Fall wunderbar.
Sorry, war nicht inegloggt, aber kann mir das jemand sagen?
Warum ist rw auf Masse, beim C-control-Display passiert nix wenn man es auf Masse zieht, ebenfalls nix, wenn man high setzt.
CCplus steuert den irgendwie an, also wenn man ne LEd dranhängt blingt die beim Übertragen.
Ist das was MAtthias da geschhrieben hat eure Engine?
Ach ja, könnte einer von euch mir diese Beiden Zeilen erklären, also nicht was sie machen, sondern, welcher Befehl was bedeutet, und bewirkt.
lcd_out = buffer or (zeichen shr 4)
lcd_out = buffer or (zeichen and &h0f)
Danke
Ein Beispielprgramm das ich kurz aus einem meiner programme zusammengeschnitten hab als Demo mit den wichtigsten Funktionen zur LCD-Ausgabe. Es wird ein Text ausgegeben auf das Display welcher in einer Tabelle ist am Ende und danach in Wert angezeigt (8-Bit).
Die zugehörige LCD.S19 Datei mit dem Assemblerprogramm von mit das die LCD-Routinen enthält:Code:'----------------------------------------------------------------------------
' Texte und Werte ausgeben
'----------------------------------------------------------------------------
'I/O-Ports definieren
'--------------------
Define LCDPort BytePort[2] 'LC-Display Port
Define D4 Port[9] 'LCD D4 4-Bit (D0 / D4)
Define D5 Port[10] 'LCD D5 4-Bit (D1 / D5)
Define D6 Port[11] 'LCD D6 4-Bit (D2 / D6)
Define D7 Port[12] 'LCD D7 4-Bit (D3 / D7)
Define RW Port[13] 'LCD RW 0=Schreiben / 1=Lesen
Define RS Port[14] 'LCD RS 0=Befehl / 1=ASCII
Define EN Port[15] 'LCD E Datenübernahme (neg. Flanke)
'Variablen definieren
'--------------------
Define TempWort Word[9] 'Universelles Temp-Wort (16-Bit) für Berechnungen
Define TempByte Byte[19] 'Universelles Temp-Byte (8-Bit) für Berechnungen
Define VarLcdData Byte[20] 'Datenbyte an/vom LC-Display
Define LcdBuf Byte[21] 'LCD-Buffer
Define LcdParam Byte[22] 'Übergabewert an LC-Display.
Define VarTextNr Byte[23] 'Text-Ausgabe (Nr.)
Define kk Byte[24] 'Zählvariable
'Assembler-Einsprungpunkte definieren
'------------------------------------
Define LcdCmd &H0101 'Sys: Kommando an LCD senden
Define LcdChar &H0107 'Sys: Zeichen an LCD senden
Define LcdPulse &H0120 'Sys: Impuls an Enable ausgeben
'Konstanten definieren
'---------------------
Define LcdClear &B00000001
Define LcdCursorHome &B00000010
Define LcdDisplayEin &B00001100
Define LcdDisplayAus &B00001000
Define LcdCursorEin &B00001110
Define LcdCursorAus &B00001100
Define Z1S1 &H80 'Zeile 1 Spalte 1
Define Z1S2 &H81 'Zeile 1 Spalte 2
Define Z1S3 &H82 '...
Define Z1S4 &H83
Define Z1S5 &H84
Define Z1S6 &H85
Define Z1S7 &H86
Define Z1S8 &H87
Define Z1S9 &H88
Define Z1S10 &H89
Define Z1S11 &H8A
Define Z1S12 &H8B
Define Z1S13 &H8C
Define Z1S14 &H8D
Define Z1S15 &H8E
Define Z1S16 &H8F
Define Z2S1 &HC0 'Zeile 2 Spalte 1
Define Z2S2 &HC1 'Zeile 2 Spalte 2
Define Z2S3 &HC2 '...
Define Z2S4 &HC3
Define Z2S5 &HC4
Define Z2S6 &HC5
Define Z2S7 &HC6
Define Z2S8 &HC7
Define Z2S9 &HC8
Define Z2S10 &HC9
Define Z2S11 &HCA
Define Z2S12 &HCB
Define Z2S13 &HCC
Define Z2S14 &HCD
Define Z2S15 &HCE
Define Z2S16 &HCF
Define EOT &H00 'Text Ende-Kennung
Define Schreiben Off
Define Lesen On
Define CommandMode Off
Define AsciiMode On
Define Lo Off
Define Hi On
Define Enabled Off
Define Diabled On
Define Down Off
Define Up On
'ASCII-Codes definieren
'----------------------
Define xA_ &H41 ' A
Define xB_ &H42 ' B
Define xC_ &H43 ' C
Define xD_ &H44 ' D
Define xE_ &H45 ' E
Define xF_ &H46 ' F
Define xG_ &H47 ' G
Define xH_ &H48 ' H
Define xI_ &H49 ' I
Define xJ_ &H4A ' J
Define xK_ &H4B ' K
Define xL_ &H4C ' L
Define xM_ &H4D ' M
Define xN_ &H4E ' N
Define xO_ &H4F ' O
Define xP_ &H50 ' P
Define xQ_ &H51 ' Q
Define xR_ &H52 ' R
Define xS_ &H53 ' S
Define xT_ &H54 ' T
Define xU_ &H55 ' U
Define xV_ &H56 ' V
Define xW_ &H57 ' W
Define xX_ &H58 ' X
Define xY_ &H59 ' Y
Define xZ_ &H5A ' Z
Define x_a &H61 ' a
Define x_b &H62 ' b
Define x_c &H63 ' c
Define x_d &H64 ' d
Define x_e &H65 ' e
Define x_f &H66 ' f
Define x_g &H67 ' g
Define x_h &H68 ' h
Define x_i &H69 ' i
Define x_j &H6A ' j
Define x_k &H6B ' k
Define x_l &H6C ' l
Define x_m &H6D ' m
Define x_n &H6E ' n
Define x_o &H6F ' o
Define x_p &H70 ' p
Define x_q &H71 ' q
Define x_r &H72 ' r
Define x_s &H73 ' s
Define x_t &H74 ' t
Define x_u &H75 ' u
Define x_v &H76 ' v
Define x_w &H77 ' w
Define x_x &H78 ' x
Define x_y &H79 ' y
Define x_z &H7A ' z
Define xae &HE1 ' ä
Define xoe &HEF ' ö
Define xue &HF5 ' ü
Define x_0 &H30 ' 0
Define x_1 &H31 ' 1
Define x_2 &H32 ' 2
Define x_3 &H33 ' 3
Define x_4 &H34 ' 4
Define x_5 &H35 ' 5
Define x_6 &H36 ' 6
Define x_7 &H37 ' 7
Define x_8 &H38 ' 8
Define x_9 &H39 ' 9
Define x__ &H20 ' Leerzeichen
Define xPz &H25 ' %
Define xSt &H2A ' *
Define xPl &H2B ' +
Define xKo &H2C ' ,
Define xMi &H2D ' -
Define xDt &H2E ' .
Define xDP &H3A ' :
Define xGl &H3D ' =
Define ESC 27 ' ESC-Zeichen
Define Tab 9 ' Tabulator
'Textbeschreibungen
'------------------
Define TxtVersion1 0 'Hochlauf-Text (nach dem Einschalten)
Define TxtVersion2 13
'Initialisierung des Steuergeräts:
'---------------------------------
' Nach einem Reset oder nach dem Einschalten wird diese Routine durchlaufen. Dabei
' wird das digitale Potentiometer und das LC-Display initialisiert.
' Danach wird für drei Sekunden eine Hochlaufmeldung des Steuergeräts angezeigt.
#Programm
GoSub LCDReset 'Das LC-Display initialisieren im 4-Bit Modus
Sys LcdCmd LcdClear
Pause 1
'Text-String ausgeben (aus der Tabelle)
VarTextNr = TxtVersion1
Sys LcdCmd Z1S1
GoSub LCDWriteText
VarTextNr = TxtVersion2
Sys LcdCmd Z2S1
GoSub LCDWriteText
Pause 80
Sys LcdCmd LcdClear
'Wert ausgeben
TempByte = 20
Sys LcdCmd Z2S11
GoSub LCDWriteCount8Bit
End
' Routinen für das LC-Display (2x16 Zeichen):
' -------------------------------------------
' Das LC-Display wird beim Initialisieren auf 4-Bit Modus umgestellt und arbeitet
' danach nur noch auf den Datenleitungen D4 bis D7. Dabei werden bei jedem
' Kommando zuerst das niederwertigere Nibble und danach das höherwertige Nibble
' übertragen. Es stehen Einzelzeichen und komfortable Textausgaben zur Verfügung,
' welche den Umgang mit dem Display vereinfachen. Desweiteren kann auch vom
' Display gelesen werden.
#LCDReset
'Das LC-Display initialisieren und den Display-Inhalt löschen
'LC-Display initialisieren im 4-Bit Modus
LcdPort = &H80 'Alle Ports auf Low setzen
Sys LcdCmd &H38 '8-Bit-Modus aktivieren
LcdPort = &H82 'Mit 8-Bit Kommando in 4-Bit-Modus umschalten
Sys LcdPulse
Sys LcdCmd &H28 'Ab jetzt 4-Bit-Modus
Sys LcdCmd &H0C
#LCDClearZeile1
'Erste Zeile im LC-Display löschen
Sys LcdCmd Z1S1
GoTo LCDClearZeile
#LCDClearZeile2
'Zweite Zeile im LC-Display löschen
Sys LcdCmd Z2S1
#LCDClearZeile
'Ausgewählte Zeile im LC-Display löschen
For kk = 1 to 16
Sys LcdChar &H20
Next kk
Return
#LCDWriteCount8Bit
'8-Bit Integer an Display ausgeben
kk = TempByte / 100
If TempByte > 99 Then Sys LcdChar &H30 + kk
kk = (TempByte - (kk * 100)) / 10
If TempByte > 9 Then Sys LcdChar &H30 + kk
kk = TempByte MOD 10
Sys LcdChar &H30 + kk
Return
#LCDRead
'Daten von LC-Display lesen als zwei 4-Byte Blöcke (zuerst Higher, dann Lower)
Deact D4
Deact D5
Deact D6
Deact D7
RW = Lesen
Sys LcdPulse
VarLcdData = &H0F And (LCDPort ShL 4)
Sys LcdPulse
VarLcdData = VarLcdData Or (LCDPort And &H0F)
RW = Schreiben
Return
#LCDWriteText
LookTab TabTexte, VarTextNr, VarLcdData
If VarLcdData = EOT Then Return
Sys LcdChar VarLcdData
VarTextNr = VarTextNr + 1
GoTo LCDWriteText
'Texte für das LC-Display:
'-------------------------
' Zeichenfolgen welche als gesamtes ausgegeben werden. Es ist immer eine Einsprung-
' Adresse vorhanden, ab der die Zeichenfolge steht. Am Ende folgt ein ASCII-Code 0
' der das Ende der Textausgabe anzeigt, damit die Ausgabe beendet wird und der nach-
' folgende Text nicht ebenfalls ausgfegeben wird.
'
' Tabellenstruktur: ASCII-Zeichen 1, ASCII-Zeichen 2, ... Ende-Kennung (EOT)
Table TabTexte
xV_ x_e x_r x_s x_i x_o x_n xDP x__ x_1 xDt x_0 EOT '0 - Version 1.0
xW_ x_o x_l x_f x_g x_a x_n x_g x__ xS_ x_c x_h x_m x_i x_d EOT '13 - Wolfgang Schmid
TabEnd
SysCode "LCD.S19"
Viel Spass damit.Code:S11B0101A680B7B52004A6A0B7B5B69244444444CD011CB692A40FCD70
S11B0119011C81BAB5B7021C021D02811D01B692B1B727F723093CB73B
S11801311801CD014120ED3AB71901CD014120E41A011B0181AA
S9030000FC
Grüsse Woflgang[/code]
Mal kurz zwischendurch, nicht ganz zum Thema, aber wie stelle ich folgendes an?
Ich will eine if-Bedingung, und bei then sollen dann mehrer anweisungen folgen.
Folgendes funktioniert nicht:
if a then d : b : c
if a then (d : b : c)
if a tehn (d b c)
Hallo RCO!
Das geht mit der IDE auch nicht zu programmieren. Man kann nur direkt eine Aktion nach THEN schreiben. Du kannst nur eine Sprungmarke verwenden die bei Nichterfüllung über die auszuführenden Aktionen hinwegspringt.
Jetzt würde bei Wert1 = Wert2 nicht gesprungen werden und die Aktionen 1 bis 3 ausgeführt werden. Ansonsten bei Wert1 <> Wert2 springt das Programm einfach darüber hinweg.Code:...
If Not(Wert1 = Wert2) Then GoTo M001
Aktion 1
Aktion 2
Aktion 3
#M001
...
Grüsse Woflgang
Schade, dass es nicht geht, aber was du mir geschrieben hast reicht ja schon. <> bedeutet ungleich, richtig?
DAnke
Es gibt einen Compiler für eine andere Syntax-Konstruktion bei Dietmar Harlos auf der Seite. Da kann man mehrere Anweisungen in mehreren Zeilen schreiben wie von normalem Basic gewohnt.
Das mit dem <> ist ein ungleich. Das ist aber im Handbuch beschrieben. Ist damit die Gegenmenge zu =.
So, nun will ich mal zum eigenen Thema des Threads zurückkommen:
scheiße jetzt fehlen mir die Bilder.
Bis später
Ist nicht schlimm, so klappts ja auch.
Ich habe nämlich nen Infrarot-Empfänger an C-control angschlossen, und kann nun die gedrückte Zahl direkt am Display augeben, und das klappt jetzt einwandfrei.
Am Anfang hatte ich probleme, weil ich direkt 2 dumme Fehler begangen habe, aber das ist nicht so wichtig.
Mein Fehler war, dass ich übersehen habe, das PIN 16 ja als Ausgang definiert ist, und ich ihn so nicht mehr als Eingang benutzen kann...
sehr blöd!!
Ich habe 2 kleine Bildchen erstellt, die den Anschluss erleichtern sollen.
Bei Wieselsworld ist nämlich das Problem, dass RW des Displays auf Masse gezogen ist, das darf aber nicht sein, warum weiß ich nicht, aber C-control steuert den entsprechenden PIN 14 auf dem Board an, so das es klappt.
Das andere ist nur die Pinbelegung des Anschlusssteckers, die mich am Anfang sehr verwirrt hat.
RCO,
Was is die gute lcd_init bei die bilde?
Meine lcd giebt sonst nichts mehr als schwartze blokke an line 1 und nichts an line 2 :(
Die verbindungen hat ich viele malen controleerd, so keine ahnung was der fehler ist
Oder ist der Pinbelegung.gif das Madchen oder der Man? :-s
Der Poti wirkt aber sonst gut
PS meine deutch is nicht so gut, so bare with me :-#
Hallo!
Ich weiß, ich war schon lange nicht mehr hier, aber da ich jetzt des öfteren emails wegen einem datenblatt für das PC081ATN 4x40 lcd anfragen erhalten habe, schreibe ich nun mal eine kleine erklärung:
das 4x40 PC081ATN lcd ist ein stink-normales 4x40 lcd. die aufschrift "PC081ATN" ist nur die modellbezeichnung des herstellers. ein datenblatt wegen der anschlussbelegung kann man z.b. bei reichelt.de downloaden. einfach nach lcd 4x40 suchen.
peace out,
cap.