upload Pipet app

git-svn-id: svn://kolibrios.org@6919 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/cmm/lib/patterns/rgb.h

@@ -10,9 +10,9 @@
 
 :void _rgb::DwordToRgb(dword _dword)
 {
-	r = _dword & 0xFF; _dword >>= 8;
-	g = _dword & 0xFF; _dword >>= 8;
 	b = _dword & 0xFF; _dword >>= 8;
+	g = _dword & 0xFF; _dword >>= 8;
+	r = _dword & 0xFF; _dword >>= 8;
 }
 
 :dword _rgb::RgbToDword()

programs/cmm/pipet/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("pipet.c", "c-- /D=AUTOBUILD /D=$(C_LANG) %f" .. tup.getconfig("KPACK_CMD"), "pipet.com")

programs/cmm/pipet/compile_en.bat

@@ -0,0 +1,5 @@
+@del pipet.kex
+@c-- pipet.c
+@rename *.com *.kex
+@del warning.txt
+@pause

programs/cmm/pipet/pipet.c

@@ -0,0 +1,133 @@
+#define MEMSIZE 4096*10
+
+#include "../lib/gui.h"
+#include "../lib/clipboard.h"
+#include "../lib/patterns/rgb.h"
+
+//===================================================//
+//                                                   //
+//                       DATA                        //
+//                                                   //
+//===================================================//
+
+proc_info Form;
+Clipboard clipboard;
+dword pick_active = true;
+dword picked_color = 0;
+char picked_color_string[10];
+#define FORM_W 167
+#define FORM_H 60
+#define COLOR_BLOCK_SIZE 42
+#define COLOR_BLOCK_PADDING FORM_H - COLOR_BLOCK_SIZE / 2
+#define COLOR_BLOCK_X FORM_W - COLOR_BLOCK_SIZE - COLOR_BLOCK_PADDING
+#define BUTTON_ID_CLOSE 1
+#define BUTTON_ID_COPY  2
+#define BUTTON_ID_PICK  3
+
+//===================================================//
+//                                                   //
+//                       CODE                        //
+//                                                   //
+//===================================================//
+
+void main()
+{
+	int btn;
+	SetEventMask(000100111b);
+	SetWindowLayerBehaviour(-1, ZPOS_ALWAYS_TOP);
+	loop() switch(WaitEvent())
+	{
+		case evMouse:
+			mouse.get();
+			
+			if (mouse.x>0) && (mouse.x<FORM_W) && (mouse.y>0) && (mouse.y<FORM_H) 
+			{
+				EventDragWindow();
+			}
+			else if (pick_active)
+			{
+				picked_color = GetPixelColorFromScreen(mouse.x + Form.left, mouse.y + Form.top);
+				EventUpdateWindowContent();
+				if (mouse.down) && (mouse.key&MOUSE_LEFT) pick_active = false;
+			}
+			break;
+
+		case evButton:
+			btn = GetButtonID();
+			if (btn == BUTTON_ID_CLOSE) ExitProcess();
+			if (btn == BUTTON_ID_COPY) EventCopyIntoSystemBuffer();
+			if (btn == BUTTON_ID_PICK) pick_active = true;
+			break;
+
+		case evKey:
+			GetKeys();
+			if (key_scancode == SCAN_CODE_ESC) ExitProcess();
+			if (key_modifier&KEY_LCTRL) || (key_modifier&KEY_RCTRL) 
+				if (key_scancode==SCAN_CODE_KEY_C) EventCopyIntoSystemBuffer();
+			break;
+		 
+		case evReDraw:
+			draw_window();
+			break;
+	}
+}
+
+void draw_window()
+{
+	DefineDragableWindow(215, 100, FORM_W, FORM_H);
+	GetProcessInfo(#Form, SelfInfo);
+	DrawRectangle3D(0, 0, FORM_W, FORM_H, 0xCCCccc, 0x888888);
+	DrawRectangle3D(1, 1, FORM_W-2, FORM_H-2, 0xCCCccc, 0x888888);
+	DrawBar(2,2,FORM_W-3,FORM_H-3,0xFFFfff);
+
+	DrawRectangle(COLOR_BLOCK_X-2, COLOR_BLOCK_PADDING-2, COLOR_BLOCK_SIZE+3, COLOR_BLOCK_SIZE+3, 0xCBC6C5);
+
+	DefineHiddenButton(0, 0, COLOR_BLOCK_X, skin_height, 476+BT_NOFRAME);
+	DefineHiddenButton(COLOR_BLOCK_X-1, COLOR_BLOCK_PADDING-1, COLOR_BLOCK_SIZE+1, COLOR_BLOCK_SIZE+1, BUTTON_ID_PICK);
+
+	DrawCopyButton(67, 11, 35, 14, 0x777777);
+
+	EventUpdateWindowContent();
+}
+
+
+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);
+	WriteNumber(43,33, 0xD0, 0x008000, 3, rgb.g);
+	WriteNumber(73,33, 0xD0, 0x0000ff, 3, rgb.b);
+
+	DrawBar(COLOR_BLOCK_X, COLOR_BLOCK_PADDING, COLOR_BLOCK_SIZE, COLOR_BLOCK_SIZE, picked_color);
+}
+
+void DrawCopyButton(dword _x, _y, _w, _h, _color)
+{
+	DefineHiddenButton(_x+1, _y+1, _w-2, _h-2, BUTTON_ID_COPY);
+	DrawRectangle(_x, _y, _w, _h, _color);
+	WriteTextCenter(_x, _h-8/2 + _y, _w, _color, "Copy");
+}
+
+struct _clipboard_pipet_data_text
+{
+	dword size;
+	dword type;
+	dword encoding; //encoding 0=UTF, 1=866, 2=1251
+	char color_text[7];
+};
+
+void EventCopyIntoSystemBuffer()
+{
+	_clipboard_pipet_data_text clipboard_buf;
+	clipboard_buf.size = 19;
+	clipboard_buf.type = SLOT_DATA_TYPE_TEXT;
+	clipboard_buf.encoding = 1; 
+	strcpy(#clipboard_buf.color_text, #picked_color_string+4);
+	clipboard_buf.color_text[7] = NULL;
+	clipboard.SetSlotData(clipboard_buf.size, #clipboard_buf);
+}