From 3e0b5920ee7d9d5cee7465de39141a902fca13e7 Mon Sep 17 00:00:00 2001
From: pavelyakov <pavelyakov@kolibrios.org>
Date: Sat, 14 Nov 2020 13:53:08 +0000
Subject: [PATCH] addition new example

git-svn-id: svn://kolibrios.org@8191 a494cfbc-eb01-0410-851d-a64ba20cac60
---
 programs/cmm/examples/leotag/info.xml      | 22 ++++++++++++++++++++++
 programs/cmm/examples/leotag/tags/base.xml | 17 +++++++++++++++++
 2 files changed, 39 insertions(+)
 create mode 100755 programs/cmm/examples/leotag/info.xml
 create mode 100644 programs/cmm/examples/leotag/tags/base.xml

diff --git a/programs/cmm/examples/leotag/info.xml b/programs/cmm/examples/leotag/info.xml
new file mode 100755
index 0000000000..d0149ed7ab
--- /dev/null
+++ b/programs/cmm/examples/leotag/info.xml
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="utf-8"?>
+<application window="main">
+	<resources>
+		<color name="textColor">#55FFFF</color>
+		<color name="rectColor">#FF5555</color>
+		<color name="backgroundColor">#554141</color>
+		<string name="revision"> REV 7321 </string>
+		<string name="date"> 17.09.2018 </string>
+	</resources>
+	<keyboard language="c--" type="press" key="KEY_ESC">
+		ExitProcess();
+	</keyboard>
+	<keyboard language="lisp" type="press" key="KEY_ESC">
+		(exit)
+	</keyboard>
+	<window name="main" type="UnDragable" right="15" bottom="15" width="150" height="80">
+		<DrawFillRect left="0" top="0" width="150" height="80" color="@color/backgroundColor" />
+		<DrawRect left="0" top="0" width="150" height="80" weight="3" color="@color/rectColor" />
+		<DrawText left="15" top="20" type="0x81" color="@color/textColor" value="@string/revision" />
+		<DrawText left="15" top="45" type="0x81" color="@color/textColor" value="@string/date" />
+	</window>
+</application>
diff --git a/programs/cmm/examples/leotag/tags/base.xml b/programs/cmm/examples/leotag/tags/base.xml
new file mode 100644
index 0000000000..e7618d8517
--- /dev/null
+++ b/programs/cmm/examples/leotag/tags/base.xml
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="utf-8"?>
+<tags>
+	<resources>
+		<integer name="default">0</integer>
+		<integer name="defaultTypeDrawText">0x81</integer>
+		<color name="black">#000000</color>
+		<string name="default"></string>
+	</resources>
+	<DrawText left="@integer/default" top="@integer/default" type="@integer/defaultTypeDrawText" color="@color/black" value="@string/default">
+		<code language="c--">
+			DrawText({{left}},{{top}},{{type}},{{color}},{{value}});
+		</code>
+		<code language="lisp">
+			(DrawText {{left}} {{top}} {{type}} {{color}} {{value}})
+		</code>
+	</DrawText>
+</tags>
\ No newline at end of file