Subversion Repositories Kolibri OS

#define MEMSIZE 4096*40

#include "../lib/gui.h"

#include "../lib/io.h"

#include "../lib/collection.h"

#include "../lib/list_box.h"

#include "../lib/fs.h"

#define ITEM_H 19

#define SEP_H 4

llist menu1;

collection names;

collection hotkeys;

int selected, win_x, win_y;

int max_name_len;

int max_hotkey_len;

int menu_w, menu_h;

void GetWindowPosition()

{

	int position;

	shared_mem = memopen(#shared_name, 16, SHM_OPEN + SHM_WRITE);

	selected = ESDWORD[shared_mem     ];

	win_x    = ESDWORD[shared_mem +  4];

	win_y    = ESDWORD[shared_mem +  8];

	position = ESDWORD[shared_mem + 12];

	if (position == MENU_ALIGN_TOP_RIGHT) win_x -= menu1.w;

	if (position == MENU_ALIGN_BOT_LEFT) win_y -= menu1.h;

	if (position == MENU_ALIGN_BOT_RIGHT) {

		win_x -= menu1.w;

		win_y -= menu1.h;

	}

}

void GetMenuWidths()

{

	int i;

	for (i=0; i

		max_name_len = math.max(max_name_len, strlen(names.get(i)));

	}

	for (i=0; i

		max_hotkey_len = math.max(max_hotkey_len, strlen(hotkeys.get(i)));

	}

	max_name_len = max_name_len * 6;

	max_hotkey_len *= 6;

	if (max_hotkey_len) max_name_len += 12;

}

void GetMenuItems(dword current_name)

{

	dword next_name = strchr(current_name, '\n');

	dword hotkey = strchr(current_name, '|');

	ESBYTE[next_name] = '\0';

	if (hotkey) && (hotkey < next_name) {

		ESBYTE[hotkey] = '\0';

	} else {

		if (hotkey) && (!next_name) {

			ESBYTE[hotkey] = '\0';

		} else {

			hotkey = " ";

		}

	}

	hotkeys.add(hotkey+1);

	names.add(current_name);

	if (next_name) GetMenuItems(next_name+2);

}

int GetSeparatorsCount()

{

	int i, count=0;

	for (i=0; i

		if (streq(names.get(i), "-")) count++;

	}

	return count;

}

int MoveMouseToHandleSeparators(int _mouse_y)

{

	int i, item_y=menu1.y;

	int item_i=0;

	for (i=0; i

	{

		if (streq(names.get(i), "-")) {

			item_y += SEP_H;

		} else {

			item_y += ITEM_H;

			item_i++;

		}

		if (_mouse_y >= item_y) && (_mouse_y < item_y + ITEM_H) {

			return item_i * ITEM_H + menu1.y;

		}

	}

	return _mouse_y;

}

void main()

{

	proc_info Form;

	if (!param) die("'Menu component is for developers only' -I");

	GetMenuItems(#param);

	GetMenuWidths();

	menu_w = max_name_len + max_hotkey_len + 23;

	menu_h = GetSeparatorsCount() * SEP_H

		+ calc(names.count - GetSeparatorsCount() * ITEM_H);

	menu1.count = names.count;

	menu1.SetFont(6, 9, 0x80);

	menu1.SetSizes(2,2, menu_w, menu_h, ITEM_H);

	menu1.cur_y = -1;

	GetWindowPosition();

	SetEventMask(EVM_REDRAW + EVM_KEY + EVM_BUTTON + EVM_MOUSE);

	loop() switch(WaitEvent())

	{

		case evMouse:

			GetProcessInfo(#Form, SelfInfo);

			if (!CheckActiveProcess(Form.ID)) exit();

			mouse.get();

			if (menu1.MouseOver(mouse.x, mouse.y)) {

				mouse.y = MoveMouseToHandleSeparators(mouse.y);

				if (menu1.ProcessMouse(mouse.x, mouse.y)) draw_list();

				if (mouse.lkm)&&(mouse.up) click();

			}

			break;

		case evKey:

			GetKeys();

			ProcessKeys();

			break;

		case evReDraw:

			DefineAndDrawWindow(win_x, win_y, menu1.w+4, menu1.h+4, 0x01, 0, 0, 0x01fffFFF);

			sc.get();

			Draw3DPopup(0,0,menu1.w+2,menu1.h+2);

			draw_list();

	}

}

void CorrectLastItem()

{

	if (menu1.cur_y > menu1.count - GetSeparatorsCount() - 1) {

		menu1.cur_y = menu1.count - GetSeparatorsCount() - 1;

	}

}

void ProcessKeys()

{

	switch(key_scancode)

	{

		case SCAN_CODE_ESC:

			exit();

		case SCAN_CODE_ENTER:

			click();

		case SCAN_CODE_DOWN:

			if (!menu1.KeyDown())

			|| (menu1.count - menu1.cur_y - GetSeparatorsCount() -1 < 0) menu1.KeyHome();

			draw_list();

			break;

		case SCAN_CODE_UP:

			if (!menu1.KeyUp()) {

				menu1.KeyEnd();

				CorrectLastItem();

			}

			draw_list();

			break;

		case SCAN_CODE_END:

			menu1.KeyEnd();

			CorrectLastItem();

			draw_list();

			break;

		default:

			if (menu1.ProcessKey(key_scancode)) draw_list();

	}

}

void draw_list()

{

	int i, item_y=menu1.y, item_i=0;

	dword name_color;

	dword hotkey_color;

	static dword inactive_background_color;

	static dword active_background_color;

	static dword active_top_border_color;

	static dword inactive_text_shadow_color;

	static bool skin_dark;

	static bool colors_set;

	if (!colors_set) {

		colors_set = true;

		inactive_background_color = MixColors(sc.work, 0xFFFfff,230);

		active_background_color = MixColors(sc.button, sc.work,230);

		active_top_border_color = MixColors(sc.work_graph, sc.button,240);

		inactive_text_shadow_color = MixColors(sc.work,0xFFFfff,120);

		skin_dark = skin_is_dark();

	}

	for (i=0; i

	{

		if (streq(names.get(i), "-")) {

			DrawBar(menu1.x, item_y+0, menu1.w, 1, inactive_background_color);

			DrawBar(menu1.x-1, item_y+1, menu1.w+1, 1, sc.work_dark);

			DrawBar(menu1.x, item_y+2, menu1.w, 1, sc.work_light);

			DrawBar(menu1.x, item_y+3, menu1.w, 1, inactive_background_color);

			//DrawBar(menu1.x, item_y+0, menu1.w, 4, inactive_background_color);

			//DrawBar(13, item_y+1, menu1.w-24, 1, sc.work_dark);

			//DrawBar(13, item_y+2, menu1.w-24, 1, sc.work_light);

			item_y += SEP_H;

		} else {

			if (item_i==menu1.cur_y) {

				hotkey_color = name_color = sc.button_text;

				DrawBar(menu1.x, item_y+1,        menu1.w, ITEM_H-2, active_background_color);

				DrawBar(menu1.x, item_y,          menu1.w, 1, active_top_border_color);

				DrawBar(menu1.x, item_y+ITEM_H-1, menu1.w, 1, sc.work_light);

			} else {

				name_color = sc.work_text;

				hotkey_color = sc.work_graph;

				DrawBar(menu1.x, item_y, menu1.w, ITEM_H, inactive_background_color);

				if (!skin_dark) WriteText(13+1, item_y + menu1.text_y +1, 0x80,

					inactive_text_shadow_color, names.get(i));

			}

			WriteText(-strlen(hotkeys.get(i))*6 + 13 + max_name_len + max_hotkey_len,

				item_y + menu1.text_y, 0x80, hotkey_color, hotkeys.get(i));

			WriteText(13, item_y + menu1.text_y, 0x80, name_color, names.get(i));

			item_y += ITEM_H;

			item_i++;

		}

	}

	if (selected) WriteText(5, selected-1*ITEM_H + menu1.y + menu1.text_y, 0x80, 0xEE0000, "\x10");

}

void click()

{

	ESDWORD[shared_mem] = menu1.cur_y + 1;

	ExitProcess();

}

void exit()

{

	ESDWORD[shared_mem] = 0;

	ExitProcess();

}