/*
 * BACKGEN - Background generator
 * Author: Leency
 * Licence: GPL v2
*/

#define MEMSIZE 4096*40

#include "../lib/gui.h"
#include "../lib/obj/libimg.h"
#include "../lib/patterns/rgb.h"
#include "../lib/patterns/libimg_load_skin.h"

//===================================================//
//                                                   //
//                       DATA                        //
//                                                   //
//===================================================//

#define T_TITLE "Background generator 0.62"

#define MAX_COLORS 10
#define TOOLBAR_H 24+8
#define PALLETE_SIZE 116

more_less_box x_count = { 10, TOOLBAR_H+220, NULL, 1, MAX_COLORS, 22, 23, "X count" };
more_less_box y_count = { 10, TOOLBAR_H+250, NULL, 1, MAX_COLORS, 24, 25, "Y count" };

rect preview = { 10, TOOLBAR_H+10, 200, 200 };
rect right_bar = { 230, TOOLBAR_H+10, 280, 320 };

dword active_color = 0xFFFfff;
char active_color_string[11]="0x00111222\0";

enum {
	BTN_APPLY_BACKGROUND = 10,

	BTN_NEW = 40,
	BTN_OPEN,
	BTN_SAVE,
	BTN_MOVE_LEFT,
	BTN_MOVE_RIGHT,
	BTN_MOVE_UP,
	BTN_MOVE_DOWN,
	BTN_FLIP_HOR,
	BTN_FLIP_VER,
	BTN_ROTATE_LEFT,
	BTN_ROTATE_RIGHT,

	BTN_PICK,

	BTN_PALETTE_COLOR_MAS = 100,

};

proc_info Form;

bool pick_active = false;

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;

	load_dll(libio,  #libio_init,  1);
	load_dll(libimg, #libimg_init, 1);
	Libimg_LoadImage(#skin, "/sys/icons16.png");

	colors.set_default_values();
	x_count.value = colors.columns;
	y_count.value = colors.rows;

	SetEventMask(EVM_REDRAW+EVM_KEY+EVM_BUTTON+EVM_MOUSE+EVM_MOUSE_FILTER);

	loop() switch(WaitEvent())
	{
		case evMouse:
			mouse.get();
			if (pick_active) EventPickColor();

		case evButton:
			btn = GetButtonID(); 
			if (x_count.click(btn)) EventChangeFieldSize();
			if (y_count.click(btn)) EventChangeFieldSize();
			switch(btn)
			{
				case BTN_MOVE_LEFT:
					colors.move(DIRECTION_LEFT);
					break;
				case BTN_MOVE_RIGHT:
					colors.move(DIRECTION_RIGHT);
					break;
				case BTN_MOVE_UP:
					colors.move(DIRECTION_UP);
					break;
				case BTN_MOVE_DOWN:
					colors.move(DIRECTION_DOWN);
					break;
				case CLOSE_BTN:
					ExitProcess();
				case BTN_APPLY_BACKGROUND:
					EventApplyBackground();
					break;
				case BTN_PICK:
					EventPickActivate();
					break;
			}              
			if (btn >= BTN_PALETTE_COLOR_MAS) && (btn < BTN_PALETTE_COLOR_MAS+PALLETE_SIZE) 
			{ 
				active_color = default_colors[btn-BTN_PALETTE_COLOR_MAS]; 
				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();
			if (key_scancode == SCAN_CODE_ENTER) EventApplyBackground();
			if (key_scancode == SCAN_CODE_KEY_I) EventPickActivate();
			break;
		 
		case evReDraw:
			draw_window();
			break;
	}
}

void DrawToolbarButton(dword _id, _x, _icon_n)
{
	DrawWideRectangle(_x, 4, 24, 24, 4, 0xFFFfff);
	DefineHiddenButton(_x, 4, 23, 23, _id);
	img_draw stdcall(skin.image, _x+4, 8, 16, 16, 0, _icon_n*16);
}

void draw_window()
{
	#define TB_ICON_PADDING 26
	incn tx;
	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, T_TITLE,0
		);
	GetProcessInfo(#Form, SelfInfo);

	tx.n = preview.x - TB_ICON_PADDING;
	// DrawToolbarButton(BTN_NEW,    tx.inc(TB_ICON_PADDING), 2);
	// DrawToolbarButton(BTN_OPEN,   tx.inc(TB_ICON_PADDING), 0);
	// DrawToolbarButton(BTN_SAVE,   tx.inc(TB_ICON_PADDING), 5);
	DrawToolbarButton(BTN_MOVE_LEFT,  tx.inc(TB_ICON_PADDING),   30);
	DrawToolbarButton(BTN_MOVE_RIGHT, tx.inc(TB_ICON_PADDING),   31);
	DrawToolbarButton(BTN_MOVE_UP,    tx.inc(TB_ICON_PADDING),   32);
	DrawToolbarButton(BTN_MOVE_DOWN,  tx.inc(TB_ICON_PADDING),   33);
	
	DrawToolbarButton(BTN_PICK,   tx.inc(TB_ICON_PADDING+8), 38);
	
	// DrawToolbarButton(BTN_FLIP_HOR,   tx.inc(TB_ICON_PADDING+8), 34);
	// DrawToolbarButton(BTN_FLIP_VER,   tx.inc(TB_ICON_PADDING),   35);
	// DrawToolbarButton(BTN_ROTATE_LEFT,   tx.inc(TB_ICON_PADDING), 36);
	// DrawToolbarButton(BTN_ROTATE_RIGHT,  tx.inc(TB_ICON_PADDING), 37);

	DrawBar(0, TOOLBAR_H-1, Form.cwidth, 1, system.color.work_dark);
	DrawBar(0, TOOLBAR_H, Form.cwidth, 1, system.color.work_light);

	x_count.draw();
	y_count.draw();

	DrawColorsField();

	DrawStandartCaptButton(preview.x, 320, BTN_APPLY_BACKGROUND, "Fill background");

	DrawRightBar();
}

void DrawColorsField()
{
	DrawRectangle(preview.x, preview.y, preview.w, preview.h, system.color.work_graph); //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, "Palette");
	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[PALLETE_SIZE-i]);
			DefineHiddenButton(c*colors.cell_size + _x, r*colors.cell_size + _y, 
				colors.cell_size-1, colors.cell_size-1, BTN_PALETTE_COLOR_MAS+PALLETE_SIZE-i);
			i++;
		}
	}
	DrawRectangle(_x-1, _y-1, c*colors.cell_size+1, r*colors.cell_size+1, system.color.work_light);
	DrawRectangle(_x-2, _y-2, c*colors.cell_size+3, r*colors.cell_size+3, system.color.work_dark);
}


//===================================================//
//                                                   //
//                      EVENTS                       //
//                                                   //
//===================================================//

void EventChangeFieldSize()
{
	colors.columns = x_count.value;
	colors.rows = y_count.value;
	DrawColorsField();
}

void EventPickActivate()
{
	SetEventMask(EVM_REDRAW+EVM_KEY+EVM_BUTTON+EVM_MOUSE);
	pick_active = true;
}

void EventPickColor()
{
	active_color = GetPixelColorFromScreen(mouse.x + Form.left + 5, mouse.y + Form.top + skin_height);
	DrawActiveColor(NULL);
	if (mouse.down) && (mouse.key&MOUSE_LEFT) {
		pick_active = false;
		SetEventMask(EVM_REDRAW+EVM_KEY+EVM_BUTTON+EVM_MOUSE+EVM_MOUSE_FILTER);
	}
}

void EventApplyBackground()
{
	SetBackgroundImage(colors.columns, colors.rows, colors.get_image(), DRAW_DESKTOP_BG_STRETCH);
}