From 52461ceda92dd7027edc284157d44209abbfdd6d Mon Sep 17 00:00:00 2001
From: "Kirill Lipatov (Leency)" <lipatov.kiril@gmail.com>
Date: Sat, 4 Apr 2020 15:15:50 +0000
Subject: [PATCH] add forgotten tcc files

git-svn-id: svn://kolibrios.org@7760 a494cfbc-eb01-0410-851d-a64ba20cac60
---
 data/Tupfile.lua               |  3 +++
 programs/cmm/examples/window.c | 14 ++++++++++++++
 2 files changed, 17 insertions(+)

diff --git a/data/Tupfile.lua b/data/Tupfile.lua
index dfbc7ec824..16c56b7198 100644
--- a/data/Tupfile.lua
+++ b/data/Tupfile.lua
@@ -167,6 +167,9 @@ extra_files = {
  {"kolibrios/develop/oberon07/Samples/", PROGS .. "/develop/oberon07/Samples/*"},
  {"kolibrios/develop/c--/", PROGS .. "/cmm/c--/*"},
  {"kolibrios/develop/tcc/", "common/develop/tcc/*"},
+ {"kolibrios/develop/tcc/include/", "common/develop/tcc/include/*"},
+ {"kolibrios/develop/tcc/lib/", "common/develop/tcc/lib/*"},
+ {"kolibrios/develop/tcc/samples/", "common/develop/tcc/samples/*"},
  {"kolibrios/develop/TinyBasic/", "common/develop/TinyBasic/*"},
  {"kolibrios/utils/cnc_editor/cnc_editor", PROGS .. "/other/cnc_editor/cnc_editor"},
  {"kolibrios/utils/cnc_editor/kolibri.NC", PROGS .. "/other/cnc_editor/kolibri.NC"},
diff --git a/programs/cmm/examples/window.c b/programs/cmm/examples/window.c
index f27cb035f4..408add0431 100644
--- a/programs/cmm/examples/window.c
+++ b/programs/cmm/examples/window.c
@@ -20,4 +20,18 @@ void draw_window()
 	WriteText(100,50,0x80,0,"Textline small");
 	WriteText(100,70,0x90,0,"Textline big");
 	DrawBar(100, 110, 100, 100, 0x66AF86);
+	draw_ascii();
+}
+
+void draw_ascii()
+{
+	char s[2];
+	int i, x, y;
+	s[1]=EOS;
+	for (i=0; i<256; i++) {
+		y = i / 20;
+		x = i % 20;
+		s[0] = i;
+		WriteText(x*33, y*33, 0x91, 0, #s);
+	}
 }
\ No newline at end of file