Baugruppen
Aktoren
/Sensoren
|
||
 |
||
|
|
||
| .. Beispiel .. EA-Kit IDE .. Farbpalette.kmc | ||
|
|
||
|
Baugruppen
Aktoren
/Sensoren
|
||
|
|
||
|
|
||
| .. Beispiel .. EA-Kit IDE .. Farbpalette.kmc | ||
|
|
||
Das
nachfolgende Makro.kmc organisiert auf der Anzeigefläche
die nachfolgend gezeigte Grafik, die aus 32 Rechtecken besteht,
beschriftet letztere mit Ordnungsnummern und füllt die
Rechtecke mit den Farben 1..32.
Das
Makro entnimmt die Definitionen der 32 Farben der eingebundenen
Datei Farbpalette.kmi. In dieser Datei können die
Farbeinstellung geändert und den Bedürfnissen
angepasst werden. Dann kann Farbpalette.kmi in eigenen Dateien
weiterverwendet werden.
Beim Vergleich der Bildschirmfarben mit denen der Anzeige fällt auf, dass die Anzeige die obigen Farben kräftiger darstellt, und damit trennschärfer. |
||
|
|
|
|
|
|
|
|
; Farbtest
; für eDIPTFT43-A Display
; =============================================
; 12.09.2009 www.GoBlack.de, D.Schwarzer
eDIPTFT43-A "Farbtest" ; define eDIP, "Projektname" max.32 Zeichen
COM1: 115200 ; eDIP-Verbindung über COM1 mit 115200 Baud
;COM6: 230400 ; eDIP-Verbindung über COM6 mit 230400 Baud
;USB: "eDIP Programmer" ; Verbindung EA 9777-1USB eDIP Programmer
;VERIFY ; Verify nach der Programmübertragung
INCLUDE <definitionen.kmi> ; Unterdatei mit wiederkehrenden Definitionen
INCLUDE <zeichensatz.kmi> ; Unterdatei mit Zeichensätzen +Sonderzeichen
INCLUDE <border.kmi> ; Unterdatei mit Standard-Rahmen (Border)
INCLUDE <..\..\COLORS\colors.kmi>
;------------------|-------------------|-------------------|----------------|
MnPowerOn = 0
PowerOnMakro: ; wird nach dem Einschalten ausgeführt
#MN MnPowerOn
ResetMakro: ; wird nach einem externen Reset ausgeführt
#MN MnPowerOn
WatchdogMakro: ; wird nach einem Fehlerfall/Timeout >500ms ausgeführt
#MN MnPowerOn
BrownOutMakro: ; wird nach einem Spannungseinbruch <3V ausgeführt
#MN MnPowerOn
;------------------|-------------------|-------------------|----------------|
Makro: MnPowerOn
#MN Colors ; Makro-'Farbpatette setzen', aufrufen
#TA ; Terminal ausgeschaltet
#ZF SWISS30B ; Zeichensatz
#FZ ROT,TRANS ; Zeichensatz, Farbe
#ZC Xmax/2,2, "Farbpalette" ; Grafiktext
; Laufparameter für Farben und die Position der Rahmen
YS = 40
B = 80
H = 22
XA = 40
YA = 6
YNA = 6
XN = 20
XNA = 6
R = 6 ; verwendeter Rahmen (Border)
N = 1
X1 = XN
X2 = X1+XNA
Y = YS
; 32 Rahmen zeichnen und mit den Farben 1-32 einfärben
#ZF CHICAGO14 ; Zeichensatz#FZ WEISS,TRANS ; Zeichensatz, Farbe #RE R,W0 ; Rahmentyp R nur wirksam, wenn die Vorgabe-
; Border-Definitionen geladen wurden.
#ZR X1,Y+YNA,48+N ; Grafiktext, Nummer der Farbe
#FR WEISS,SCHWARZ,N ; Rahmenfarbe, Außen-/Innenrand, Innenfläche
#RR X2,Y,X2+B,Y+H ; Rahmen mit Füllfarbe zeichnen
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N ; N=2
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N ; N=3
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N ; N=4 ...
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
X1=X1+B+XA
X2=X1+XNA
Y=YS
N=N+1
#ZR X1,Y+YNA,48+N
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
X1=X1+B+XA
X2=X1+XNA
Y=YS
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'1',48+N-10
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
X1=X1+B+XA
X2=X1+XNA
Y=YS
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'2',48+N-20
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'3',48+N-30
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'3',48+N-30
#FR WEISS,SCHWARZ,N
#RR X2,Y,X2+B,Y+H
Y=Y+H+YA
N=N+1
#ZR X1,Y+YNA,'3',48+N-30
#FR WEISS,SCHWARZ,N
|
||
|
|
|
|
.de
