#ifndef INCLUDE_GUI_H
#define INCLUDE_GUI_H
#ifndef INCLUDE_KOLIBRI_H
#include "../lib/kolibri.h"
#endif
#ifndef INCLUDE_STRING_H
#include "../lib/strings.h"
#endif
#ifndef INCLUDE_RGB_H
#include "../lib/patterns/rgb.h"
#endif
#ifndef INCLUDE_MATH_H
#include "../lib/math.h"
#endif
#include "../lib/gui/tabs.h"
#include "../lib/gui/more_less_box.h"
#include "../lib/gui/checkbox.h"
:int last_free_button_id = 1000;
:int GetFreeButtonId()
{
last_free_button_id++;
return last_free_button_id;
}
:void DrawRectangle(dword x,y,w,h,color1)
{
DrawBar(x,y,w,1,color1);
DrawBar(x,y+h,w,1,color1);
DrawBar(x,y,1,h,color1);
DrawBar(x+w,y,1,h+1,color1);
}
:void DrawWideRectangle(dword x,y,w,h,boder,color1)
{
DrawBar(x, y, w, boder, color1);
DrawBar(x, y+h-boder, w, boder, color1);
DrawBar(x, y+boder, boder, h-boder-boder, color1);
DrawBar(x+w-boder, y+boder, boder, h-boder-boder, color1);
}
:void DrawRectangle3D(dword x,y,w,h,color1,color2)
{
DrawBar(x,y,w+1,1,color1);
DrawBar(x,y+1,1,h-1,color1);
DrawBar(x+w,y+1,1,h,color2);
DrawBar(x,y+h,w,1,color2);
}
:void DrawCaptButton(dword x,y,w,h,id,color_b, color_t,text)
{
dword tx = -strlen(text)*8+w/2+x;
dword ty = h/2-7+y;
if (id>0) DefineButton(x,y,w,h,id,color_b);
WriteText(tx+1,ty+1,0x90,MixColors(color_b,0,230),text);
WriteText(tx,ty,0x90,color_t,text);
}
:int active_button_id = 0;
:int DrawStandartCaptButton(dword x, y, id, text)
{
#define padding_v 5
#define padding_h 15
#define right_margin 12
#define h padding_v + padding_v + 16 //16 font height
int tx = x + padding_h;
int ty = y + padding_v+1;
int tw = strlen(text)*8;
int w = tw + padding_h + padding_h;
if (id>0) DefineButton(x,y,w,h,id,system.color.work_button);
WriteText(tx+1,ty+1,0x90,MixColors(system.color.work_button,0,230),text);
WriteText(tx,ty,0x90,system.color.work_button_text,text);
if (active_button_id==id) {
DrawBar(tx,ty+15,tw,1, MixColors(system.color.work_button,0,230));
DrawBar(tx,ty+14,tw,1, system.color.work_button_text);
}
return w + right_margin;
}
:void ActiveButtonSwitch(int min, max)
{
active_button_id++;
if (active_button_id>max) || (active_button_id<max) active_button_id=min;
}
:void WriteTextCenter(dword x,y,w,color_t,text)
{
WriteText(-strlen(text)*6+w/2+x+1,y,0x80,color_t,text);
}
:void DrawCircle(int x, y, r, color)
{
int i;
float px=0, py=r, ii = r * 3.1415926 * 2;
FOR (i = 0; i < ii; i++)
{
PutPixel(px + x, y - py, color);
px = py / r + px;
py = -px / r + py;
}
}
:void DrawEditBox(dword edit_box_pointer)
{
dword x,y,w,h,bg,t;
ESI = edit_box_pointer;
x = ESI.edit_box.left;
y = ESI.edit_box.top;
w = ESI.edit_box.width+1;
h = 22;
if (ESI.edit_box.flags & 100000000000b) bg = 0xCACACA; else bg = 0xFFFfff;
edit_box_draw stdcall (edit_box_pointer);
DrawRectangle3D(x-1, y-1, w+1, h+1, 0xE7E7E7, bg);
DrawRectangle(x-2, y-2, w+3, h+3, system.color.work_graph);
DrawRectangle3D(x-3, y-3, w+5, h+5, system.color.work_dark, system.color.work_light);
}
:void DrawEditBoxPos(dword x,y, edit_box_pointer)
{
ESI = edit_box_pointer;
ESI.edit_box.left = x;
ESI.edit_box.top = y;
DrawEditBox(dword edit_box_pointer);
}
:void DrawProgressBar(dword st_x, st_y, st_w, st_h, col_fon, col_border, col_fill, col_text, progress_percent)
{
int progress_w;
static int fill_old;
//if (progress_percent<=0) {DrawBar(st_x,st_y, st_x + st_w + fill_old + 15,st_h+1, col_fon); fill_old=0; return;}
if (progress_percent<=0) || (progress_percent>=100) return;
DrawRectangle(st_x, st_y, st_w,st_h, col_border);
DrawRectangle3D(st_x+1, st_y+1, st_w-2,st_h-2, 0xFFFfff, 0xFFFfff);
if (progress_percent>0) && (progress_percent<=100)
{
progress_w = st_w - 3 * progress_percent / 100;
DrawBar(st_x+2, st_y+2, progress_w, st_h-3, col_fill);
DrawBar(st_x+2+progress_w, st_y+2, st_w-progress_w-3, st_h-3, 0xFFFfff);
}
}
:void DrawLink(dword x,y,font_type,btn_id, inscription)
{
int w;
WriteText(x,y,font_type,0x4E00E7,inscription);
if (font_type==0x80) w = strlen(inscription)*6; else w = strlen(inscription)*8;
DefineButton(x-1,y-1,w,10,btn_id+BT_HIDE,0);
DrawBar(x,y+8,w,1,0x4E00E7);
}
:void PutShadow(dword x,y,w,h,skinned,strength)
{
proc_info wForm;
dword shadow_buf, skin_height;
shadow_buf = mem_Alloc(w*h*3);
GetProcessInfo(#wForm, SelfInfo);
CopyScreen(shadow_buf, 5*skinned+x+wForm.left, GetSkinHeight()*skinned+y+wForm.top, w, h);
ShadowImage(shadow_buf, w, h, strength);
_PutImage(x,y,w,h,shadow_buf);
mem_Free(shadow_buf);
}
:void DrawPopup(dword x,y,w,h,skinned, col_work,col_border)
{
DrawRectangle(x,y,w,h,col_border);
DrawBar(x+1,y+1,w-1,1,0xFFFfff);
DrawBar(x+1,y+2,1,h-2,0xFFFfff);
if (col_work!=-1) DrawBar(x+2,y+2,w-2,h-2,col_work);
DrawPopupShadow(x,y,w,h-1,skinned);
}
:void DrawPopupShadow(dword x,y,w,h,skinned)
{
PutShadow(w+x+1,y,1,h+2,skinned,2);
PutShadow(w+x+2,y+1,1,h+2,skinned,1);
PutShadow(x,y+h+2,w+2,1,skinned,2);
PutShadow(x+1,y+h+3,w+1,1,skinned,1);
}
:void GrayScaleImage(dword color_image, w, h)
{
dword i,gray,to,rr,gg,bb;
to = w*h*3 + color_image;
for (i = color_image; i < to; i+=3)
{
rr = DSBYTE[i];
gg = DSBYTE[i+1];
bb = DSBYTE[i+2];
gray = rr*rr;
gray += gg*gg;
gray += bb*bb;
gray = sqrt(gray) / 3;
DSBYTE[i] = DSBYTE[i+1] = DSBYTE[i+2] = gray;
}
}
:void ShadowImage(dword color_image, w, h, strength)
{
dword col, to;
strength = 10 - strength;
to = w*h*3 + color_image;
for ( ; color_image < to; color_image++)
{
col = strength * DSBYTE[color_image] / 10;
DSBYTE[color_image] = col;
}
}
:void WriteTextLines(dword x,y,byte fontType, dword color, text_pointer, line_h)
{
dword next_word_pointer = strchr(text_pointer, '\n');
if (next_word_pointer) WriteTextLines(dword x, y+line_h, byte fontType, dword color, next_word_pointer+2, line_h);
ESBYTE[next_word_pointer] = NULL;
WriteText(dword x, y, byte fontType, dword color, text_pointer);
ESBYTE[next_word_pointer] = '\n';
}
/*
We have a long text and need to show it in block.
Normal line break '\n' must be applied.
Long lines should be breaked by word.
TODO: scroll
*/
:int DrawTextViewArea(int x,y,w,h, dword buf_start, bg_col, text_col)
{
dword write_start;
dword buf_end;
int line_h = 15;
int label_length_max;
int write_length;
bool end_found;
write_start = buf_start;
buf_end = strlen(buf_start) + buf_start;
label_length_max = w / 8; // 8 big font char width
loop()
{
if (bg_col!=-1) DrawBar(x, y, w+1, line_h, bg_col);
end_found = false;
write_length = strchr(write_start, '\n') - write_start; //search normal line break
if (write_length > label_length_max) || (write_length<=0) //check its position: exceeds maximum line length or not found
{
if (buf_end - write_start < label_length_max) //check does current line the last
{
write_length = buf_end - write_start;
end_found = true;
}
else
{
for (write_length=label_length_max; write_length>0; write_length--) { //search for white space to make the line break
if (ESBYTE[write_start+write_length] == ' ') {
end_found = true;
break;
}
}
}
if (end_found != true) write_length = label_length_max; //no white space, so we write label_length_max
}
ESI = write_length; //set text length attribute for WriteText()
WriteText(x, y, 0x10, text_col, write_start);
// if (editpos >= write_start-buf_start) && (editpos <= write_start-buf_start + write_length) {
// WriteTextB(-write_start+buf_start+editpos * 8 + x - 5 +1, y, 0x90, 0xFF0000, "|");
// }
write_start += write_length + 1;
y += line_h;
if (write_start >= buf_end) break;
}
if (bg_col!=-1) DrawBar(x,y,w+1,h-y+line_h-4,bg_col);
return y+line_h;
}
//this function increase falue and return it
//useful for list of controls which goes one after one
:struct incn
{
dword n;
dword inc(dword _addition);
};
:dword incn::inc(dword _addition)
{
n+=_addition;
return n;
}
//block with hover
struct block {
int x,y,w,h;
bool hovered();
void set_size();
};
:bool block::hovered() {
if ((mouse.x>x) && (mouse.y>y)
&& (mouse.y<y+h) && (mouse.x<x+w))
return true;
return false;
}
:void block::set_size(dword _x, _y, _w, _h)
{
x=_x;
y=_y;
w=_w;
h=_h;
}
#endif