From 1f732787b504613e872a62308264e89fc61c45c5 Mon Sep 17 00:00:00 2001
From: "Kirill Lipatov (Leency)" <lipatov.kiril@gmail.com>
Date: Wed, 11 Oct 2017 23:19:28 +0000
Subject: [PATCH] upload backgen v0.5

git-svn-id: svn://kolibrios.org@7089 a494cfbc-eb01-0410-851d-a64ba20cac60
---
 programs/cmm/backgen/Tupfile.lua          |   6 +
 programs/cmm/backgen/backgen.c            | 176 ++++++++++++++++++++++
 programs/cmm/backgen/colors_mas.h         |  82 ++++++++++
 programs/cmm/backgen/compile_en.bat       |   5 +
 programs/cmm/eolite/include/breadcrumbs.h |   2 +-
 programs/cmm/lib/gui.h                    |   9 +-
 programs/cmm/lib/kolibri.h                |  31 +++-
 programs/cmm/pipet/pipet.c                |   2 +-
 8 files changed, 305 insertions(+), 8 deletions(-)
 create mode 100644 programs/cmm/backgen/Tupfile.lua
 create mode 100644 programs/cmm/backgen/backgen.c
 create mode 100644 programs/cmm/backgen/colors_mas.h
 create mode 100644 programs/cmm/backgen/compile_en.bat

diff --git a/programs/cmm/backgen/Tupfile.lua b/programs/cmm/backgen/Tupfile.lua
new file mode 100644
index 0000000000..8317ee90f6
--- /dev/null
+++ b/programs/cmm/backgen/Tupfile.lua
@@ -0,0 +1,6 @@
+if tup.getconfig("NO_CMM") ~= "" then return end
+if tup.getconfig("LANG") == "ru"
+then C_LANG = "LANG_RUS"
+else C_LANG = "LANG_ENG" -- this includes default case without config
+end
+tup.rule("backgen.c", "c-- /D=AUTOBUILD /D=$(C_LANG) %f" .. tup.getconfig("KPACK_CMD"), "backgen.com")
diff --git a/programs/cmm/backgen/backgen.c b/programs/cmm/backgen/backgen.c
new file mode 100644
index 0000000000..f5f95e7680
--- /dev/null
+++ b/programs/cmm/backgen/backgen.c
@@ -0,0 +1,176 @@
+/*
+ * BACKGEN - Background generator
+ * Author: Leency
+ * Licence: GPL v2
+*/
+
+#define MEMSIZE 4096*10
+
+#include "../lib/gui.h"
+#include "../lib/patterns/rgb.h"
+
+//===================================================//
+//                                                   //
+//                       DATA                        //
+//                                                   //
+//===================================================//
+
+#define MAX_COLORS 10
+
+more_less_box x_count = { 10, 220, NULL, 1, MAX_COLORS, 22, 23, "X count" };
+more_less_box y_count = { 10, 250, NULL, 1, MAX_COLORS, 24, 25, "Y count" };
+
+rect preview = { 10, 10, 200, 200 };
+rect right_bar = { 230, 10, 280, 400 };
+
+dword active_color = 0xFFFfff;
+char active_color_string[11]="0x00111222\0";
+
+enum {
+	APPLY_BACKGROUND_BTN = 10
+};
+
+proc_info Form;
+
+dword default_colors[] = {
+0x330000,0x331900,0x333300,0x193300,0x003300,0x003319,0x003333,0x001933,0x000033,0x190033,0x330033,0x330019,0x000000,
+0x660000,0x663300,0x666600,0x336600,0x006600,0x006633,0x006666,0x003366,0x000066,0x330066,0x660066,0x660033,0x202020,
+0x990000,0x994C00,0x999900,0x4C9900,0x009900,0x00994C,0x009999,0x004C99,0x000099,0x4C0099,0x990099,0x99004C,0x404040,
+0xCC0000,0xCC6600,0xCCCC00,0x66CC00,0x00CC00,0x00CC66,0x00CCCC,0x0066CC,0x0000CC,0x6600CC,0xCC00CC,0xCC0066,0x606060,
+0xFF0000,0xFF8000,0xFFFF00,0x80FF00,0x00FF00,0x00FF80,0x00FFFF,0x0080FF,0x0000FF,0x7F00FF,0xFF00FF,0xFF007F,0x808080,
+0xFF3333,0xFF9933,0xFFFF33,0x99FF33,0x33FF33,0x33FF99,0x33FFFF,0x3399FF,0x3333FF,0x9933FF,0xFF33FF,0xFF3399,0xA0A0A0,
+0xFF6666,0xFFB266,0xFFFF66,0xB2FF66,0x66FF66,0x66FFB2,0x66FFFF,0x66B2FF,0x6666FF,0xB266FF,0xFF66FF,0xFF66B2,0xC0C0C0,
+0xFF9999,0xFFCC99,0xFFFF99,0xCCFF99,0x99FF99,0x99FFCC,0x99FFFF,0x99CCFF,0x9999FF,0xCC99FF,0xFF99FF,0xFF99CC,0xE0E0E0,
+0xFFCCCC,0xFFE5CC,0xFFFFCC,0xE5FFCC,0xCCFFCC,0xCCFFE5,0xCCFFFF,0xCCE5FF,0xCCCCFF,0xE5CCFF,0xFFCCFF,0xFFCCE5,0xFFFFFF	
+};
+
+//===================================================//
+//                                                   //
+//                       CODE                        //
+//                                                   //
+//===================================================//
+
+#include "colors_mas.h"
+
+void main()
+{
+	word btn;
+
+	colors.set_default_values();
+	x_count.value = colors.columns;
+	y_count.value = colors.rows;
+
+	loop() switch(WaitEvent())
+	{
+		case evButton:
+			btn = GetButtonID();               
+			if (btn == CLOSE_BTN) ExitProcess();
+			if (btn == APPLY_BACKGROUND_BTN) {
+				SetBackgroundImage(colors.columns, colors.rows, colors.get_image(), DRAW_DESKTOP_BG_STRETCH);
+			}
+			if (x_count.click(btn)) EventChangeFieldSize();
+			if (y_count.click(btn)) EventChangeFieldSize();
+			if (btn >= 100) && (btn < 228) 
+			{ 
+				active_color = default_colors[btn-100]; 
+				DrawActiveColor(NULL); 
+			}
+			if (btn >= 300) && (btn < 401) 
+			{ 
+				btn-=300;
+				debugval("\n\nid",btn);
+				colors.set_color(btn/colors.columns, btn%colors.columns, active_color);
+				DrawColorsField();
+			}
+			break;
+	  
+		case evKey:
+			GetKeys();
+			if (key_scancode == SCAN_CODE_ESC) ExitProcess();
+			break;
+		 
+		case evReDraw:
+			draw_window();
+			break;
+	}
+}
+
+void draw_window()
+{
+	system.color.get();
+	DefineAndDrawWindow(215, 100, right_bar.x+right_bar.w+9, 
+		right_bar.y+right_bar.h+skin_height+5, 
+		0x34, system.color.work, "Background generator",0
+		);
+	GetProcessInfo(#Form, SelfInfo);
+
+	x_count.draw();
+	y_count.draw();
+
+	DrawColorsField();
+
+	DrawStandartCaptButton(10, 320, APPLY_BACKGROUND_BTN, "Fill background");
+
+	DrawRightBar();
+}
+
+void DrawColorsField()
+{
+	DrawRectangle(preview.x, preview.y, preview.w, preview.h, 0x808080);
+	DrawBar(preview.x+1, preview.y+1, preview.w-1, preview.h-1, 0xBFCAD2); //F3F3F3
+
+	colors.x = -colors.cell_size*colors.columns+preview.w/2 + preview.x;
+	colors.y = -colors.cell_size*colors.rows+preview.h/2 + preview.y;
+	colors.draw_all_cells();	
+}
+
+void DrawRightBar()
+{
+	int i;
+	incn y;
+	y.n = right_bar.y;
+	EDI = system.color.work;
+	WriteTextB(right_bar.x, y.inc(3), 0x90, system.color.work_text, "Active color");
+	DrawActiveColor(y.inc(22));
+	WriteTextB(right_bar.x, y.inc(34), 0x90, system.color.work_text, "Default colors");
+	DrawDefaultColors(right_bar.x, y.inc(22));
+}
+
+void DrawActiveColor(dword iny)
+{
+	static dword outy;
+	if (iny != NULL) outy = iny;
+	colors.draw_cell(right_bar.x, outy, active_color);
+	sprintf(#active_color_string, "%A", active_color);
+	EDI = system.color.work;
+	WriteText(right_bar.x + 30, outy + 3, 0xD0, system.color.work_text, #active_color_string+4);
+}
+
+void DrawDefaultColors(dword _x, _y)
+{
+	int r, c, i;
+	i = 0;
+	for (r = 0; r < 9; r++)
+	{
+		for (c = 0; c < 13; c++)
+		{
+			colors.draw_cell(c*colors.cell_size + _x, r*colors.cell_size + _y, default_colors[i]);
+			DefineHiddenButton(c*colors.cell_size + _x, r*colors.cell_size + _y, colors.cell_size, colors.cell_size, 100+i);
+			i++;
+		}
+	}
+}
+
+
+//===================================================//
+//                                                   //
+//                      EVENTS                       //
+//                                                   //
+//===================================================//
+
+void EventChangeFieldSize()
+{
+	colors.columns = x_count.value;
+	colors.rows = y_count.value;
+	DrawColorsField();
+}
diff --git a/programs/cmm/backgen/colors_mas.h b/programs/cmm/backgen/colors_mas.h
new file mode 100644
index 0000000000..6c642b4071
--- /dev/null
+++ b/programs/cmm/backgen/colors_mas.h
@@ -0,0 +1,82 @@
+struct _colors
+{
+	int x,y;
+	unsigned rows, columns;
+	unsigned cell_size;
+	dword mas[MAX_COLORS*MAX_COLORS];
+	dword image;
+	void set_default_values();
+	void set_color();
+	dword get_color();
+	dword get_image();
+	void draw_cell();
+	void draw_all_cells();
+} colors;
+
+void _colors::set_default_values()
+{
+	columns = 2;
+	rows = 2;
+	cell_size = 20;
+
+	set_color(0,0, 0x66b2ff); 
+	set_color(0,1, 0x000066); 
+
+	set_color(1,0, 0x000066);
+	set_color(1,1, 0x66b2ff);
+}
+
+void _colors::set_color(int _r, _c, _color)
+{
+	debugval("_r", _r);
+	debugval("_c", _c);
+	mas[MAX_COLORS*_r + _c] = _color;
+}
+
+dword _colors::get_color(int _r, _c)
+{
+	return mas[MAX_COLORS*_r + _c];
+}
+
+dword _colors::get_image()
+{
+	int r=0, c=0;
+	dword i;
+
+	free(image);
+	i = image = malloc(rows*columns*3);
+
+	for (r = 0; r < rows; r++)
+	{
+		for (c = 0; c < columns; c++)
+		{
+			rgb.DwordToRgb(get_color(r,c));
+			ESBYTE[i] = rgb.b;
+			ESBYTE[i+1] = rgb.g;
+			ESBYTE[i+2] = rgb.r;
+			i += 3;
+		}
+	}
+	return image;
+}
+
+void _colors::draw_cell(int _x, _y, _color)
+{
+	DrawRectangle(_x, _y, cell_size, cell_size, 0xA7B2BA);
+	DrawBar(_x+1, _y+1, cell_size-1, cell_size-1, _color);
+}
+
+void _colors::draw_all_cells()
+{
+	int r, c, i;
+	for (i=300; i<MAX_COLORS*MAX_COLORS+300; i++) DeleteButton(i);
+	for (r = 0; r < rows; r++)
+	{
+		for (c = 0; c < columns; c++)
+		{
+			draw_cell(c*cell_size + x, r*cell_size + y, get_color(r, c));
+			DefineHiddenButton(c*cell_size + x, r*cell_size + y, cell_size, cell_size, r*columns+c+300);
+		}
+	}
+}
+
diff --git a/programs/cmm/backgen/compile_en.bat b/programs/cmm/backgen/compile_en.bat
new file mode 100644
index 0000000000..eca6719676
--- /dev/null
+++ b/programs/cmm/backgen/compile_en.bat
@@ -0,0 +1,5 @@
+@del *.
+@c-- backgen.c
+@rename *.com *.
+@del warning.txt
+@pause
\ No newline at end of file
diff --git a/programs/cmm/eolite/include/breadcrumbs.h b/programs/cmm/eolite/include/breadcrumbs.h
index 2fbab9f3b8..c927fe1a73 100644
--- a/programs/cmm/eolite/include/breadcrumbs.h
+++ b/programs/cmm/eolite/include/breadcrumbs.h
@@ -14,7 +14,7 @@ void DrawPathBar()
 void DrawBreadCrumbs()
  collection_int breadCrumb;
  char PathShow_path[4096];
- obj btn;
+ rect btn;
  int i;
  unsigned text_line, area_w;
  {
diff --git a/programs/cmm/lib/gui.h b/programs/cmm/lib/gui.h
index 8cb6ac5d9f..e360a24004 100644
--- a/programs/cmm/lib/gui.h
+++ b/programs/cmm/lib/gui.h
@@ -417,14 +417,15 @@ struct more_less_box
 	unsigned value, min, max;
 	unsigned bt_id_more, bt_id_less;
 	dword text;
-	void click();
+	bool click();
 	void draw();
 };
 
-void more_less_box::click(unsigned id)
+bool more_less_box::click(unsigned id)
 {
-	if (id==bt_id_less) { value = math.max(value-1, min); draw(); }
-	if (id==bt_id_more) { value = math.min(value+1, max); draw(); }
+	if (id==bt_id_less) { value = math.max(value-1, min); draw(); return 1; }
+	if (id==bt_id_more) { value = math.min(value+1, max); draw(); return 1; }
+	return 0;
 }
 
 void more_less_box::draw()
diff --git a/programs/cmm/lib/kolibri.h b/programs/cmm/lib/kolibri.h
index c6827fc5d5..cd48313367 100644
--- a/programs/cmm/lib/kolibri.h
+++ b/programs/cmm/lib/kolibri.h
@@ -440,6 +440,33 @@ inline fastcall dword SetWindowLayerBehaviour(EDX, ESI)
 	$int 64
 }
 
+#define DRAW_DESKTOP_BG_TILE 1
+#define DRAW_DESKTOP_BG_STRETCH 2
+void SetBackgroundImage(dword w,h, image, mode)
+{
+	$mov     eax,15      // SF_BACKGROUND_SET 15 - work with desktop background graphics
+	$mov     ebx,4       // SSF_MODE_BG 4 - set drawing mode for the background
+	$mov     ecx,mode    // drawing mode - tile (1), stretch (2)
+	$int     64
+
+	$mov     eax,15      // SF_BACKGROUND_SET 15 - work with desktop background graphics
+	$mov     ebx,1       // SSF_SIZE_BG=1 - set a size of the background image
+	$mov     ecx,w       // width
+	$mov     edx,h       // height
+	$int     64
+
+	$mov     eax,15      // SF_BACKGROUND_SET 15 - work with desktop background graphics
+	$mov     ebx,5       // SSF_IMAGE_BG=5 - put block of pixels on the background image
+	$mov     ecx,image   // pointer to the data in the format BBGGRRBBGGRR...
+	$mov     edx,0       // offset in data of the background image
+	ESI      = 3*w*h;    // size of data in bytes = 3 * number of pixels
+	$int     64
+
+	$mov     eax,15      // SF_BACKGROUND_SET 15 - work with desktop background graphics
+	$mov     ebx,3       // SSF_REDRAW_BG=3 - redraw background
+	$int     64
+}
+
 :void _PutImage(dword x,y, w,h, data_offset)
 {
 	EAX = 7;
@@ -574,13 +601,13 @@ inline fastcall dword GetStartTime()
 	CreateThread(#_EventRedrawWindow,#REDRAW_BUFF_EVENT_+4092);
 }
 
-:struct obj
+:struct rect
 {
 	dword x,y,w,h;
 	void set_size();
 };
 
-:void obj::set_size(dword _x, _y, _w, _h)
+:void rect::set_size(dword _x, _y, _w, _h)
 {
 	x=_x; 
 	y=_y;
diff --git a/programs/cmm/pipet/pipet.c b/programs/cmm/pipet/pipet.c
index 5d8966efb6..bb46f75dd2 100644
--- a/programs/cmm/pipet/pipet.c
+++ b/programs/cmm/pipet/pipet.c
@@ -94,8 +94,8 @@ void EventUpdateWindowContent()
 {
 	sprintf(#picked_color_string, "%A", picked_color);
 	rgb.DwordToRgb(picked_color);
+	
 	EDI = 0xFFFfff;
-
 	WriteText(12,12, 0xD0, 0x000111, #picked_color_string+4);
 	
 	WriteNumber(12,33, 0xD0, 0xff0000, 3, rgb.r);