Subversion Repositories Kolibri OS

#include "parser.h"

#include "calc.h"

#include "use_library.h"

///#include "use_library.h"

//const char header[] = "Table";

const char *sFileSign = "KolibriTable File\n";

const char sFilename[] = "Filename: ";

const char sSave[] = "Save";

const char sLoad[] = "Load";

const char sNew[] = "New";

const char er_format[] = "Error: bad format. ";

const char msg_save[] = "File saved. ";

const char msg_load[] = "File loaded. ";

const char msg_new[] = "Memory cleared. ";

Dword myPID = -1;

#define WND_W 550

#define WND_H 400

// íîâûå ðàçìåðû è êîîðäèíàòû

int wi = WND_W, he = WND_H;

int win_x, win_y;

#define GRID_COLOR 0xa0a0a0

#define TEXT_COLOR 0x000000

#define CELL_COLOR 0xffffff

#define SEL_CELL_COLOR 0xe0e0ff

#define FIXED_CELL_COLOR 0xe0e0ff

#define SEL_FIXED_CELL_COLOR 0x758FC1

#define TEXT_SEL_FIXED_COLOR 0xffffff

#define SCROLL_BAR_HEIGHT 16

#define FILENAME_BUTTON 0x10

#define SAVE_BUTTON 0x11

#define LOAD_BUTTON 0x12

#define NEW_BUTTON 0x13

#define DRAG_BUTTON 0x20

#define SCROLL_RIGHT_BUTTON 0x22

#define SCROLL_UP_BUTTON 0x23

#define SCROLL_DOWN_BUTTON 0x24

#define SCROLL_WIDTH 0x25

#define SCROLL_HEIGHT 0x26

#define ROW_BUTTON (COL_BUTTON + 0x100)

#define COL_HEAD_BUTTON (ROW_BUTTON + 0x100)

#define ROW_HEAD_BUTTON (COL_HEAD_BUTTON + 0x100)

#define CELL_BUTTON (ROW_HEAD_BUTTON + 0x100)

#define MENU_PANEL_HEIGHT 40

Dword panel_y = 0;

char edit_text[256] = "";

edit_box cell_box = {0,9*8-5,WND_H - 16-32,0xffffff,0x6a9480,0,0x808080,0,255,(dword)&edit_text,0};

DWORD def_col_width = 80, def_row_height = 16;

DWORD col_count = 200, row_count = 100;

DWORD *col_width, *row_height;

char ***cells;

char ***values;	// çíà÷åíèÿ ôîðìóë, åñëè åñòü

DWORD *col_left, *row_top;

char ***buffer = NULL;

DWORD buf_col, buf_row;

DWORD buf_old_x, buf_old_y;

DWORD scroll_x = 1, scroll_y = 1;

// ýòî âûäåëåííàÿ ÿ÷åéêà

DWORD sel_x = 1, sel_y = 1;

DWORD prev_x = 0, prev_y = 0;	// ïðåäûäóùàÿ âûäåëåííàÿ

int was_single_selection = 0;

DWORD sel_end_x = sel_x, sel_end_y = sel_y;

bool sel_moved = 0;

bool sel_end_move = 0;

// ñêîëüêî ÿ÷ååê ïîìåùàåòñÿ â îêíå ïî õ è ó

DWORD nx = 0, ny = 0;

//bool is_edit = 0;

#define ed_focus 2

#define is_edit (cell_box.flags & ed_focus)

bool fn_edit = 0;

char fname[256];

edit_box file_box = {0,9*8-5,WND_H - 16-32,0xffffff,0x6a9480,0,0x808080,0,255,(dword)&fname,0};

#define SIZE_X 1 // ñîñòîÿíèå

#define SIZE_Y 2

#define SIZE_SELECT 3

#define SIZE_DRAG 4

int size_mouse_x, size_mouse_y, size_id, size_state = 0;

int drag_x, drag_y;

int old_end_x, old_end_y;

{

	kos_DrawLine(x,y,x+width-2,y,color1,invert);

	kos_DrawLine(x,y+1,x,y+height-1,color1,invert);

	kos_DrawLine(x+width-1,y,x+width-1,y+height-2,color1,invert);

	kos_DrawLine(x+1,y+height-1,x+width-1,y+height-1,color1,invert);

}

{

	if (x < scroll_x || x > nx - 1)

	{

		scroll_x = x;

		ch = 1;

	}

	if (y < scroll_y || y > ny - 1)

	{

		scroll_y = y;

		ch = 1;

	}

	if (ch)

	{

		sel_moved = 1;

		draw_window();

	}

	cell_box.left = col_left[x] + 1;

	cell_box.top = row_top[y] + 1;

	cell_box.width = col_width[x] - 2;

	//cell_box.height= row_height[y];

	memset((Byte*)edit_text, 0, sizeof(edit_text));

	if (cells[x][y])

	{

		strcpy(edit_text, cells[x][y]);

		edit_text[strlen(cells[x][y]) - 1] = '\0';

	}

	cell_box.pos = cell_box.offset = 0;

}

{

	if (is_edit)

	{

		cell_box.flags &= ~ed_focus;

		if (cells[sel_x][sel_y])

			freemem(cells[sel_x][sel_y]);

		if (strlen(edit_text) > 0)

		{

			cells[sel_x][sel_y] = (char*)allocmem(strlen(edit_text)+1);

			strcpy(cells[sel_x][sel_y], edit_text);

		}

		else

			cells[sel_x][sel_y] = NULL;

		//memset((Byte*)edit_text,0, 256);

		calculate_values();

	}

}

{

	if (!is_edit)

		return;

	cell_box.flags &= ~ed_focus;

	memset((Byte*)edit_text,0, 256);

	draw_window();

}

{

	DWORD sx0=scroll_x, sy0=scroll_y;

		//if (sel_x == nx)

			scroll_x++;

		//else

		//	scroll_x = sel_x;

	if (sel_y >= ny - 1 /*&& sel_y < row_count - ny + scroll_y */)

		//if (sel_y == ny)

			scroll_y++;

		//else

		//	scroll_y = sel_y;

		scroll_x = sel_x;

	if (sel_y < scroll_y)

		scroll_y = sel_y;

		sel_moved = 0;			// íàäî ïåðåðèñîâàòü âñå

void move_sel(DWORD new_x, DWORD new_y)

{

	sel_moved = 1;

	stop_edit();

	prev_x = sel_x;

	prev_y = sel_y;

	sel_x = new_x;

	if (sel_x < 1)

		sel_x = 1;

	if (sel_x > col_count - 1)

		sel_x = col_count - 1;

	sel_end_x = sel_x;

	sel_y = new_y;

	if (sel_y < 1)

		sel_y = 1;

	if (sel_y > row_count - 1)

		sel_y = row_count - 1;

	sel_end_y = sel_y;

	check_sel();

	draw_window();

}

{

	int x1 = x0 + sx;

	int y1 = y0 + sy;

	kos_DrawLine(x0, y0, x0, y1, 0xffffff, 0);

	kos_DrawLine(x0, y1, x1, y1, 0xc7c7c7, 0);

	kos_DrawLine(x1, y0, x1, y1, 0xc7c7c7, 0);

}

bool is_between(Dword x, Dword low, Dword high)

{

	return ((low= low && x <= high):(x >= high && x <= low));

}

{

	int i;

	int x0 = col_width[0];

	for (i = scroll_x; i < px; i++)

	{

		x0 += col_width[i];

	}

	int x1 = x0;

	x1 += col_width[px];

	int y0 = row_height[0];

	for (i = scroll_y; i < py; i++)

	{

		y0 += row_height[i];

	}

	int y1 = y0;

	y1 += row_height[py];

	kos_DrawBar(x0 + 1, y0 + 1, x1 - x0 - 1, y1 - y0 - 1, 0xffffff);

}

const int debugcolor[10]={0xff0000,0x00ff00,0x0000ff,0xffff00,0x00ffff,0xff00ff,0x800000,0x008000,0x000080,0x800080};

int debugc=0;

#define is_x_changed(v) ((v) == sel_x || (v) == prev_x)

#define is_y_changed(v) ((v) == sel_y || (v) == prev_y)

{

	int i,j;

	long x0 = 0, y0 = 0, x = 0, y = 0, dx, popravka;

	DWORD text_color;

	//int lx, ly;

//	rtlDebugOutString(debuf);

	if (sel_moved)

	{

		clear_cell_slow(sel_x, sel_y);

		clear_cell_slow(prev_x, prev_y);

	}

	else

	{

		// î÷èñòèòü âñþ îáëàñòü ÿ÷ååê

		//kos_DrawBar(col_width[0]+1, row_height[0]+1, wi - SCROLL_BAR_WIDTH-col_width[0]-1, he - SCROLL_BAR_HEIGHT-row_height[0]-1, 0xffffff);

	}

	// ÿ÷åéêè - çàãîëîâêè ñòîëáöîâ + âåðòèêàëüíûå ëèíèè

	x = col_width[0];

	nx = 1;

	for (i = 1; i < col_count; i++)

	{

		col_left[i] = -1;

		if (i >= scroll_x)

		{

			{

				if (!sel_moved || is_x_changed(i))

					kos_DrawLine(x-x0, 0, x-x0, row_height[0], GRID_COLOR, 0);

			// è çàãîëîâîê ÿ÷åéêè ïî õ

				text_color = TEXT_COLOR;

				dx = (col_width[i]-6)/2;

				int dy = (row_height[0] - 8) / 2 + 1;

				int cur_width = col_width[i] - 1;

				if (cur_width + x - x0 > wi - SCROLL_BAR_WIDTH)

					cur_width = wi - SCROLL_BAR_WIDTH - x + x0;

				if (!sel_moved || (is_x_changed(i)))

					if (is_between(i,sel_x,sel_end_x))

					{

						kos_DrawBar(x - x0 + 1,0,cur_width,row_height[0],SEL_FIXED_CELL_COLOR); //0x0000CC

						text_color = TEXT_SEL_FIXED_COLOR;

					}

					else

					{

						kos_DrawBar(x - x0 + 1,0,cur_width,row_height[0],FIXED_CELL_COLOR);

						text_color = TEXT_COLOR;

					}

				if (!sel_moved || (is_x_changed(i))) kos_WriteTextToWindow(x-x0+2+dx,dy,0,text_color,cells[i][0],strlen(cells[i][0]));

				if (x - x0 + col_width[i] <= wi - col_width[0])

					kos_DefineButton(x-x0+5,0,cur_width - 10,row_height[0]-1,0x60000000+COL_HEAD_BUTTON+i,0);

				//kos_DefineButton(x-x0+col_width[i]-10,0,15,row_height[0]-1,0x60000000+COL_SIZE_BUTTON+i,0);

				col_left[i] = x - x0;

			}

			if (x - x0 > wi - col_width[0])

			{

				x += col_width[i];

				nx++;

				break;

			}

		}

		else

		{

			x0 += col_width[i];

		}

		x += col_width[i];

		nx++;

	}

		col_left[j] = wi;

	//if (!sel_moved || (is_x_changed(nx))) kos_DrawLine(x - x0, 0, x - x0, he, GRID_COLOR, 0);

	y = row_height[0];

	ny = 1;

	row_top[0] = 0;

	for (i = 1; i < row_count && y - y0 < he - 10; i++)

	{

		row_top[i] = -1;

		if (i >= scroll_y)

		{

			{

				if (!sel_moved || (is_y_changed(i)))

					kos_DrawLine(0, y - y0, wi - SCROLL_BAR_WIDTH, y - y0, GRID_COLOR, 0);

				// è çàãîëîâîê ÿ÷åéêè ïî y

				text_color = TEXT_COLOR;

				dx = (col_width[0]-6 * strlen(cells[0][i]))/2;	// optimize this, change strlen

				int dy = (row_height[i] - 8) / 2 + 1;

				if (!sel_moved || (is_y_changed(i)))

					if (is_between(i,sel_y,sel_end_y))

					{

						kos_DrawBar(0,y-y0+1,col_width[0],row_height[i] - 1,SEL_FIXED_CELL_COLOR);

						text_color = TEXT_SEL_FIXED_COLOR;

					}

					else

					{

						kos_DrawBar(0,y-y0+1,col_width[0],row_height[i] - 1,FIXED_CELL_COLOR);

						text_color = TEXT_COLOR;

					}

					kos_WriteTextToWindow(2+dx,y-y0+dy,0,text_color,cells[0][i],strlen(cells[0][i]));

				//kos_DefineButton(0,y-y0+row_height[i]-5,col_width[0]-1,10,0x60000000+ROW_SIZE_BUTTON+i,0);

				row_top[i] = y - y0;

			}

		}

		else

		{

			y0 += row_height[i];

		}

		y += row_height[i];

		ny++;

	}

		row_top[j] = he;

	if (!sel_moved || (is_y_changed(ny)))

		kos_DrawLine(0, y - y0, wi - SCROLL_BAR_WIDTH, y - y0, GRID_COLOR, 0);

		kos_DrawBar(0,0,col_width[0],row_height[0],FIXED_CELL_COLOR);

	// Ë ÿ÷åéêà

	//rtlDebugOutString(debuf);

	//sprintf(debuf, "%U, %U", scroll_y, ny);

	//rtlDebugOutString(debuf);

	for (i = scroll_y; i < ny; i++)

	{

		x = col_width[0];

		if (!sel_moved)

			kos_DrawBar(col_width[0]+1, y+1, wi - SCROLL_BAR_WIDTH-col_width[0]-1, row_height[i]-1, 0xffffff);

		for (j = scroll_x; j < nx-1; j++)

		{

			if (!sel_moved || is_x_changed(j) || is_y_changed(i))

				kos_DrawLine(col_left[j], row_top[i], col_left[j], row_height[i], GRID_COLOR, 0);

			if (i && j)

			{

				//kos_DrawBar(x+1, y+1, col_width[i]-1, row_height[i]-1, 0xffffff);

				//if (j >= sel_x && j <= sel_end_x && i >= sel_y && i <= sel_end_y)

				if (is_between(j,sel_x,sel_end_x) && is_between(i, sel_y, sel_end_y)	// (j,i) - âûäåëåíà

					&& ((!sel_moved) || (is_x_changed(j) && is_y_changed(i))))			// è åå íóæíî íàðèñîâàòü

				{

					if (i == sel_y && j == sel_x)		// ðàìêà

					{

						kos_DrawBar(x,y,col_width[j],2,TEXT_COLOR);	// up

						kos_DrawBar(x,y,2,row_height[i],TEXT_COLOR);	// left

						kos_DrawBar(x,y+row_height[i]-2,col_width[j]-2-3,2,TEXT_COLOR);				// bottom

						kos_DrawBar(x+col_width[j]-2,y, 2,row_height[i]-2-3,TEXT_COLOR);				// right

						//kos_DefineButton(x+col_width[j]-2,y+row_height[i]-2,4,4,0x60000000+DRAG_BUTTON,0x000000);

						drag_x = x + col_width[j] - 4;

						drag_y = y + row_height[i] - 4;

					}

					else

						kos_DrawBar(x + 1,y + 1,col_width[j] - 2,row_height[i] - 2,SEL_CELL_COLOR);	//	âûäåëåíà íî íå îñíîâíàÿ(ñåðàÿ)

				//kos_DefineButton(x,y,col_width[j]-1,row_height[i]-1,0x60000000+CELL_BUTTON+((i << 8) + j),0);

				if (values[j][i] && values[j][i][0] == '#')

				{

					text = cells[j][i];

					kos_DrawRegion(x+1, y+1, col_width[j]-1, row_height[i]-1, 0xff0000, 0);

				}

				else

					text = (values[j][i] && !display_formulas ? values[j][i] : cells[j][i]);

					if (strlen(text) < col_width[j]/6)

						kos_WriteTextToWindow(x+2,y+dy,0,text_color,text,strlen(text));

					else

						kos_WriteTextToWindow(x+2,y+dy,0,text_color,text,col_width[j]/6);

			if (!sel_moved || is_x_changed(j) || is_y_changed(i))

				kos_DrawLine(col_left[j]+col_width[j], row_top[i], col_left[j]+col_width[j], row_height[i], GRID_COLOR, 0);

			x += col_width[j];

		}

		y += row_height[i];

	}

	// horizontal

	//if (!sel_moved) kos_DrawBar(scroll_x * wi / col_count, he - SCROLL_BAR_HEIGHT, wi / col_count, SCROLL_BAR_HEIGHT, SEL_FIXED_CELL_COLOR);

	if (!sel_moved)

	{

		// ãîðèçîíòàëü

		kos_DrawBar(17, he - SCROLL_BAR_HEIGHT, wi - SCROLL_BAR_WIDTH - 32, SCROLL_BAR_HEIGHT, 0xced0d0);

		// ñèíèå ëèíèè

		kos_DrawRegion(0, he - SCROLL_BAR_HEIGHT, wi - SCROLL_BAR_WIDTH, SCROLL_BAR_HEIGHT+1, 0x94aece, 0);

		// ëåâàÿ êíîïêà

		draw_custom_button(1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, 1);

		kos_WriteTextToWindow(6, he - SCROLL_BAR_HEIGHT + 5, 0, 0, "\x1B", 1);

		// ïðàâàÿ

		draw_custom_button(wi - SCROLL_BAR_WIDTH * 2 + 1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, 1);

		kos_WriteTextToWindow(wi - SCROLL_BAR_WIDTH * 2 + 6, he - SCROLL_BAR_HEIGHT + 5, 0, 0, "\x1A", 1);

		// ïîëçóíîê

		int tmp_w = (nx - scroll_x) * (wi - SCROLL_BAR_WIDTH - 2 * 14 - 14) / (col_count + 1);

		if (tmp_w < 16)

			tmp_w = 16;

		draw_custom_button(17 + (scroll_x - 1) * (wi - SCROLL_BAR_WIDTH - 2 * 14 - 14) / (col_count + 1), he - SCROLL_BAR_HEIGHT + 1,

			tmp_w, 14, 1);

// íå ïèíàéòå ìåíÿ çà ýòî, áûëî ëåíü ïåðåñòàâëÿòü ðóêàìè...

		kos_DrawBar(sw(17, wi - SCROLL_BAR_WIDTH), sw(he - SCROLL_BAR_HEIGHT - 33, SCROLL_BAR_WIDTH), 0xced0d0);

		// ñèíèå ëèíèè

		kos_DrawRegion(sw(0, wi - SCROLL_BAR_WIDTH), sw(he - SCROLL_BAR_HEIGHT, SCROLL_BAR_WIDTH+1), 0x94aece, 0); // up

		draw_custom_button(sw(1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);

		kos_WriteTextToWindow(sw(5, wi - SCROLL_BAR_WIDTH + 6), 0, 0, "\x18", 1);

		// íèæíÿÿ

		draw_custom_button(sw(he - SCROLL_BAR_HEIGHT * 2 + 1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);

		//draw_custom_button(sw(he - SCROLL_BAR_HEIGHT * 2 + 1, wi - SCROLL_BAR_WIDTH + 1), 14, 14, 1);

		kos_WriteTextToWindow(sw(he - SCROLL_BAR_HEIGHT * 2 + 5, wi - SCROLL_BAR_WIDTH + 6), 0, 0, "\x19", 1);

		// ïîëçóíîê

		int tmp_h = (ny - scroll_y) * (he - SCROLL_BAR_HEIGHT - 2 * 14 - 14) / (row_count + 1);

		if (tmp_h < 16)

			tmp_h = 16;

		draw_custom_button(sw(17 + (scroll_y - 1) * (he - SCROLL_BAR_HEIGHT - 2 * 14 - 14) / (row_count + 1), wi - SCROLL_BAR_WIDTH + 1),

			sw(tmp_h, 14), 1);

	}

#define NO_DRAW 0x60000000

	kos_DefineButton(1, he - SCROLL_BAR_HEIGHT + 1, 14, 14, NO_DRAW + SCROLL_LEFT_BUTTON,0);

	kos_DefineButton(wi - SCROLL_BAR_WIDTH * 2 + 2, he - SCROLL_BAR_HEIGHT + 1, 14, 14, NO_DRAW + SCROLL_RIGHT_BUTTON,0);

	kos_DefineButton(17, he - SCROLL_BAR_HEIGHT + 1,  (wi - SCROLL_BAR_WIDTH - 2 * 14), 14, NO_DRAW + SCROLL_WIDTH,0);

	kos_DefineButton(sw(he - SCROLL_BAR_HEIGHT * 2 + 2, wi - SCROLL_BAR_WIDTH + 1), 14, 14, NO_DRAW + SCROLL_DOWN_BUTTON,0);

	kos_DefineButton(sw(17, wi - SCROLL_BAR_WIDTH + 1),  sw((he - SCROLL_BAR_HEIGHT - 2 * 14), 14), NO_DRAW + SCROLL_HEIGHT,0);

void draw_size_grid()

{

	//rtlDebugOutString("draw size grid");

	{

		int x, x0, i;

		x0 = 0;

		for (i = 1; i < col_count && x - x0 + col_width[i] < wi - 10; i++)

		{

			if (i >= scroll_x)

			{

				if (i >= size_id)

					kos_DrawLine(x - x0, 0, x - x0, he, 0, 1);

			}

			else

				x0 += col_width[i];

			x += col_width[i];

		}

		kos_DrawLine(x - x0, 0, x - x0, he, 0, 1);

	}

	else

	{

		int y, y0, i;

		y0 = 0;

		for (i = 1; i < col_count && y - y0 + row_height[i] < he - 10; i++)

		{

			if (i >= scroll_y)

			{

				if (i >= size_id)

					kos_DrawLine(0, y - y0, wi, y - y0, 0, 1);

			}

			else

				y0 += row_height[i];

			y += row_height[i];

		}

		kos_DrawLine(0, y - y0, wi, y - y0, 0, 1);

	}

}

#define DCOLOR 0

//0xff0000

#define DINVERT 1

void draw_drag()

{

	kos_WindowRedrawStatus(1);

	int k1 = max(sel_x, sel_end_x);

	int n0 = min(sel_y, sel_end_y);

	int n1 = max(sel_y, sel_end_y);

	DWORD x1 = col_left[k1] + col_width[k1] + 1;

	DWORD y0 = row_top[n0] - 1;

	DWORD y1 = row_top[n1] + row_height[n1] + 1;

	if (x0 > wi - 1) x0 = wi - 1;

	if (x1 > wi - 1) x1 = wi - 1;

	if (y0 > he - 1) y0 = he - 1;

	if (y1 > he - 1) y1 = he - 1;

	//rtlDebugOutString(debuf);

	kos_DrawLine(x0, y0, x1, y0, DCOLOR, DINVERT);

	kos_DrawLine(x1, y0, x1, y1, DCOLOR, DINVERT);

	kos_DrawLine(x0, y1, x1, y1, DCOLOR, DINVERT);

}

{

	int i;

	double xx0=0.0, yy0=0.0;

	sProcessInfo info;

	void *p;

		sel_moved = 0;

	wi = *(Dword *)(p);

	he = *(Dword *)((Byte *)p + 4);

	win_x = *(Dword *)((Byte *)p - 8);

	win_y = *(Dword *)((Byte *)p - 4);

		wi = WND_W;

	if (he == 0)

		he = WND_H;

	wi -= 6 + 4;

	kos_WindowRedrawStatus(1);

	{

		kos_WindowRedrawStatus(2);

		return;

	}

	{

		kos_DrawBar(wi-15,he - kos_GetSkinHeight() +7,16,16,0xe4dfe1);

		kos_DrawBar(0,he - kos_GetSkinHeight() + 23,wi + 1,MENU_PANEL_HEIGHT-4,0xe4dfe1);

	}

	int y = he + kos_GetSkinHeight() - 10;

	{

		kos_WriteTextToWindow(3 + 1, y + 3, 0x80 , 0x000000, (char*)sFilename, strlen(sFilename));

	}

	//kos_DrawRegion(61, y - 2, 102, 18, fn_line_color, 0);

	file_box.left = 64;

	file_box.top = y - 1;

	file_box.width = 98;

		//editbox_h = 18;

	//kos_DefineButton(62, y + 3, 100, 16, 0x60000000+FILENAME_BUTTON, 0xd0d0d0);

	kos_DefineButton(20 + 160, y - 5, 60, 20, SAVE_BUTTON, 0xd0d0d0);

	kos_WriteTextToWindow(22 + 160 + (60 - strlen(sSave) * 6) / 2, y + 2, 0, 0x000000, (char*)sSave, strlen(sSave));

	kos_DefineButton(90 + 160, y - 5, 60, 20, LOAD_BUTTON, 0xd0d0d0);

	kos_WriteTextToWindow(92 + 160 + (60 - strlen(sLoad) * 6) / 2, y + 2, 0, 0x000000, (char*)sLoad, strlen(sLoad));

	/*

	kos_DefineButton(90 + 160 + 70, y - 5, 60, 20, NEW_BUTTON, 0xd0d0d0);

	kos_WriteTextToWindow(92 + 160 + 10 + 70, y + 2, 0, 0x000000, (char*)sNew, strlen(sNew));

	*/

	panel_y = y;

	//kos_DefineButton(0,0,WND_W,WND_H,0x60000002,0);

	//if (is_edit) KEdit();

	{

		if (is_edit)

			edit_box_draw((DWORD)&cell_box);

		edit_box_draw((DWORD)&file_box);

	}

	kos_WindowRedrawStatus(2);

	sel_moved = 0;

}

{

	Dword mouse_btn, ckeys, shift, ctrl;

	int mouse_x, mouse_y, i, p, dx = 0, dy = 0;

	int redraw = 0;

	if (kos_GetActiveSlot() != mySlot)

		return;

	edit_box_mouse((dword)&file_box);

	kos_GetScrollInfo(vert, hor);

	//rtlDebugOutString(debuf);

	{

		move_sel(sel_x, sel_y + vert);

		//move_sel(sel_x + hor, sel_y);

		return;

	}

	mouse_x -= 5;

	mouse_y -= kos_GetSkinHeight();

	shift = ckeys & 0x3;

	{

		window_is_dragged = 1;

		return;

	}

	if (window_is_dragged)

	{

		if (mouse_btn)

			return;

		else

			window_is_dragged = 0;

	}

		return;

	if (mouse_btn && !size_state)		// LMB down

	{

		//rtlDebugOutString("lmb down and not resize");

		{

			size_state = SIZE_DRAG;

			old_end_x = sel_end_x;

			old_end_y = sel_end_y;

		}

		else if (mouse_y <= row_height[0])

		{

			//rtlDebugOutString("can resize cols");

			int kx = -1, i;

			for (i = 0; i < col_count - 1; i++)

			if (mouse_x >= col_left[i] + col_width[i] - 5 &&

				mouse_x <= col_left[i + 1] + 5)

			{

				kx = i; break;

			}

			if (kx != -1)

			{

				//sprintf(debuf,"size x %U",k);

				//rtlDebugOutString(debuf);

				size_id = kx;

				size_state = SIZE_X;

			}

		}

		else if (mouse_x <= col_width[0])

		{

			int ky = -1;

			for (i = 0; i < row_count - 1; i++)

			if (mouse_y >= row_top[i] + row_height[i] - 5 &&

				mouse_y <= row_top[i + 1] + 5)

			{

				ky = i; break;

			}

			if (ky != -1)

			{

				size_id = ky;

				size_state = SIZE_Y;

			}

		}

		else		// êëèêíóòà ÿ÷åéêà

		if (mouse_x <= col_left[nx - 1] &&  mouse_y <= row_top[ny - 1])

		{

			was_single_selection = sel_x == sel_end_x && sel_y == sel_end_y;

			int kx = -1, i;

			for (i = 0; i < col_count - 1; i++)

			if (mouse_x >= col_left[i] &&

				mouse_x <= col_left[i] + col_width[i])

			{

				kx = i; break;

			}

			int ky = -1;

			for (i = 0; i < row_count - 1; i++)

			if (mouse_y >= row_top[i] &&

				mouse_y <= row_top[i] + row_height[i])

			{

				ky = i; break;

			}

			if (kx != -1 && ky != -1)

			{

				if (!shift)

				{

					move_sel(kx, ky);

					//return;

				}

				else

				{

					sel_end_x = kx;

					sel_end_y = ky;

				}

				size_state = SIZE_SELECT;

			}

		}

		if (size_state)

		{

			size_mouse_x = mouse_x;

			size_mouse_y = mouse_y;

		}

		return;

	}

	else if (!mouse_btn && size_state)

	{

		sel_moved = 0;		// ÷òîáû áûëà òðó ïåðåðèñîâêà

		//rtlDebugOutString("resize end");

		{

			fill_cells(sel_x, sel_y, sel_end_x, sel_end_y, old_end_x, old_end_y);

		}

		size_state = 0;

		draw_window();		// âñå ñäâèíóëîñü - íàäî îáíîâèòüñÿ

		return;

	}

	if (size_state == SIZE_X && mouse_x != size_mouse_x)

	{

		draw_size_grid();

		col_width[size_id] += mouse_x - size_mouse_x;

		if (col_width[size_id] < 15)

			col_width[size_id] = 15;

		else if (col_width[size_id] > wi / 2)

			col_width[size_id] = wi / 2;

		draw_size_grid();

	}

	if (size_state == SIZE_Y && mouse_y != size_mouse_y)

	{

		draw_size_grid();

		row_height[size_id] += mouse_y - size_mouse_y;

		if (row_height[size_id] < 15)

			row_height[size_id] = 15;

		else if (row_height[size_id] > he / 2)

			row_height[size_id] = he / 2;

		draw_size_grid();

	}

	if ((size_state == SIZE_SELECT || size_state == SIZE_DRAG) && (mouse_x != size_mouse_x || mouse_y != size_mouse_y))

	{

		draw_drag();

		int kx = -1, i;

		for (i = 0; i < col_count - 1; i++)

			if (mouse_x >= col_left[i] &&

				mouse_x <= col_left[i + 1])

			{

				sprintf(debuf, "yyy %U",col_left[i+1]);

				rtlDebugOutString(debuf);

				kx = i; break;

			}

		int ky = -1;

		for (i = 0; i < row_count - 1; i++)

			if (mouse_y >= row_top[i] &&

				mouse_y <= row_top[i + 1])

			{

				ky = i; break;

			}

		if (kx != -1) sel_end_x = kx;

		if (kx != -1) sel_end_y = ky;

		if (size_state == SIZE_DRAG)

		{

			if (abs(sel_end_x - sel_x) > 0)

			{

				sel_end_y = old_end_y;

			}

			else if (abs(sel_end_y - sel_y) > 0)

			{

				sel_end_x = old_end_x;

			}

		}

		draw_drag();

	}

	size_mouse_x = mouse_x;

	size_mouse_y = mouse_y;

}

{

	Dword mouse_btn, ckeys, shift, ctrl;

	int mouse_x, mouse_y, i, p, dx = 0, dy = 0;

	Byte keyCode;

	ckeys = kos_GetSpecialKeyState();

	shift = ckeys & 0x3;

	ctrl = ckeys & 0x0c;

	//if (ctrl)

	//	rtlDebugOutString("control pressed!");

	dx = 0, dy = 0;

	sel_moved = 0;

	sel_end_move = 0;

	kos_GetKey(keyCode);

	{

		mov ah, keyCode

	}

	edit_box_key((dword)&cell_box);

	edit_box_key((dword)&file_box);

	{

		case 178:			// ñòðåëêè

			//dx = 0;

			dy = -1;

			break;

		case 176:

			dx = -1;

			//dy = 0;

			break;

		case 179:

			dx = 1;

			//dy = 0;

			break;

		case 177:

			//dx = 0;

			dy = 1;

			break;

		/*

		case 183:

			if (sel_y < row_count-(ny - scroll_y))	// page down

				dy = ny - scroll_y;

			else

				dy = row_count-(ny - scroll_y) - sel_y;

			dx = 0;

			redraw = 1;

			break;

		case 184:

			if (sel_y > ny - scroll_y)		// page up

				dy= - (ny - scroll_y);

			else

				dy = - (ny - scroll_y) + sel_y;

			dx = 0;

			redraw = 1;

			break;

		*/

		case 180: //home

			dx = -sel_x + 1;

			dy = 0;

			draw_grid(); //draw_window();

			break;

		case 181: //end

			dx = col_count - (nx - scroll_x) - 1 - sel_x;

			dy = 0;

			draw_grid(); //draw_window();

			break;

		case 27:		// escape

			cancel_edit();

			break;

		case 182:			// delete

			{

				int i,j,n0,n1,k0,k1;

				n0 = min(sel_x, sel_end_x);

				n1 = max(sel_x, sel_end_x);

				k0 = min(sel_y, sel_end_y);

				k1 = max(sel_y, sel_end_y);

					for (j = k0; j <= k1; j++)

					{

						if (cells[i][j])

						{

							freemem(cells[i][j]);

							cells[i][j] = NULL;

						}

					}

				calculate_values();

				draw_grid();

				break;

			}

		case 0x0D:			// enter

			if (is_edit)

			{

				stop_edit();

				draw_window();

			}

			break;

		//case 0x08:			// backspace

			/*if (is_edit || fn_edit)

			{

				if (strlen(edit_text) != 0)

					edit_text[strlen(edit_text) - 1] = '\0';

				KEdit();

			}

			else if (cells[sel_x][sel_y])

			{

				start_edit(sel_x, sel_y);

			}

			*/

		//	break;

		case 22:	// contol-v

			{

				if (ctrl)

				{

					//rtlDebugOutString("control-v!");

					int i, j, x0, y0;

					x0 = min(sel_x, sel_end_x);

					y0 = min(sel_y, sel_end_y);

					int delta_x = x0 - buf_old_x;

					int delta_y = y0 - buf_old_y;

						for (j = 0; j < buf_row; j++)

						{

							if (i + x0 >= col_count || j + y0 >= row_count)

								continue;

							if (cells[i + x0][j + y0])

								freemem(cells[i + x0][j + y0]);

							if (buffer[i][j])

							{

								cf_x0 = buf_old_x; cf_y0 = buf_old_y;

								cf_x1 = buf_old_x + buf_col;

								cf_y1 = buf_old_y + buf_row;

								cells[i + x0][j + y0] = change_formula(buffer[i][j], delta_x, delta_y);

								//cells[i + x0][j + y0] = (char*)allocmem(strlen(buffer[i][j]));

								//strcpy(cells[i + x0][j + y0], buffer[i][j]);

							}

							else

								cells[i + x0][j + y0] = NULL;

						}

					draw_window();

					break;

				}

			}

			case 24:	// control-x

			case 03:	// control-c

			{

				if (ctrl)

				{