|
|
||
|
|
||
| .. Beispiel .. EA-Kit IDE .. Border.kmc | ||
|
|
||
Das
Beispiel Border.kmc organisiert auf der Anzeigefläche die
nachfolgend gezeigte Grafik, welche die 20 monochromen
Standard-Rahmen oder Border darstellt, sowie einige der farbigen
Rahmen für Bargraphen. Das Makro entnimmt die Definition
der Rahmen der eingebundenen Datei border.kmi. In dieser sind
die der EA-Kit IDE beigefügten Rahmentypen aufgeführt.
Die Border 111- 127 zeigen die Farben, die für alle farbigen Borderdefinitionen 101-107, 111-117 und 121-127 zur Verfügung stehen. Die Farben dieser Rahmen können nicht per ESC-Anweisung geändert werden, was bei den monochromen Standardrahmen möglich ist. |
||
|
|
|
|
|
|
|
|
; 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