Subversion Repositories Kolibri OS

Rev

Rev 3992 | Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. //#include "strings.h"
  2.  
  3. :void DrawRectangle(dword x,y,w,h,color1)
  4. {
  5.         if (w<=0) || (h<=0) return;
  6.         DrawBar(x,y,w,1,color1);
  7.         DrawBar(x,y+h,w,1,color1);
  8.         DrawBar(x,y,1,h,color1);
  9.         DrawBar(x+w,y,1,h+1,color1);
  10. }
  11.  
  12. :void DrawRectangle3D(dword x,y,w,h,color1,color2)
  13. {
  14.         if (w<=0) || (h<=0) return;
  15.         DrawBar(x,y,w+1,1,color1);
  16.         DrawBar(x,y+1,1,h-1,color1);
  17.         DrawBar(x+w,y+1,1,h,color2);
  18.         DrawBar(x,y+h,w,1,color2);
  19. }
  20.  
  21. :void DrawCaptButton(dword x,y,w,h,id,color_b, color_t,text)
  22. {
  23.         DefineButton(x,y,w,h,id,color_b);
  24.         WriteText(-strlen(text)*6+w/2+x+1,h/2-3+y,0x80,color_t,text);
  25. }
  26.  
  27. :void DrawCircle(int x, y, r)
  28. {
  29.         int i;
  30.         float px=0, py=r, ii = r * 3.1415926 * 2;
  31.         FOR (i = 0; i < ii; i++)
  32.         {
  33.         PutPixel(px + x, y - py, 0);
  34.         px = py / r + px;
  35.         py = -px / r + py;
  36.         }
  37. }
  38.  
  39. :void CheckBox(dword x,y,w,h, bt_id, text, graph_color, text_color, is_checked)
  40. {
  41.         DefineButton(x-1, y-1, strlen(text)*6 + w + 17, h+2, bt_id+BT_HIDE+BT_NOFRAME, graph_color);
  42.         WriteText(x+w+10, h / 2 + y -3, 0x80, text_color, text);
  43.         DrawRectangle(x, y, w, h, graph_color);
  44.         if (is_checked == 1)
  45.         {
  46.                 DrawRectangle(x+1, y+1, w-2, h-2, 0xffffff);
  47.                 DrawBar(x+2, y+2, w-3, h-3, graph_color);      
  48.                 return; //не дадим стрелять себе в ногу
  49.         }
  50.         if (is_checked == 2) //not active
  51.         {
  52.                 DrawRectangle(x+1, y+1, w-2, h-2, 0xffffff);
  53.                 DrawBar(x+2, y+2, w-3, h-3, 0x888888); 
  54.                 return;
  55.         }
  56.         else
  57.         {
  58.                 DrawRectangle3D(x+1, y+1, w-2, h-2, 0xDDDddd, 0xffffff);
  59.                 DrawBar(x+2, y+2, w-3, h-3, 0xffffff);
  60.         }
  61. }
  62.  
  63. :void DrawProgressBar(dword st_x, st_y, st_w, st_h, col_fon, col_border, col_fill, col_text, progress_percent, status_text)
  64. {
  65.         int progress_w;
  66.         static int fill_old;
  67.            
  68.         //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;}
  69.         if (progress_percent<=0) || (progress_percent>=100) return;
  70.        
  71.         DrawRectangle(st_x, st_y, st_w,st_h, col_border);
  72.         DrawRectangle3D(st_x+1, st_y+1, st_w-2,st_h-2, 0xFFFfff, 0xFFFfff);
  73.  
  74.         if (progress_percent>0) && (progress_percent<=100)
  75.         {
  76.                 progress_w = st_w - 3 * progress_percent / 100;
  77.                 DrawBar(st_x+2, st_y+2, progress_w, st_h-3, col_fill);
  78.                 DrawBar(st_x+2+progress_w, st_y+2, st_w-progress_w-3, st_h-3, 0xFFFfff);
  79.         }
  80.        
  81.         if (status_text)
  82.         {
  83.                 DrawBar(st_x+st_w+15, st_h/2-4+st_y, fill_old, 9, col_fon);
  84.                 WriteText(st_x+st_w+15, st_h/2-4+st_y, 0x80, col_text, status_text);
  85.                 fill_old = strlen(status_text) * 6;
  86.         }
  87. }
  88.  
  89. :void DrawLink(dword x,y,font_type,btn_id, inscription)
  90. {
  91.         int w;
  92.         WriteText(x,y,font_type,0x4E00E7,inscription);
  93.         if (font_type==0x80) w = strlen(inscription)*6; else w = strlen(inscription)*7;
  94.         DefineButton(x-1,y-1,w,10,btn_id+BT_HIDE,0);
  95.         DrawBar(x,y+8,w,1,0x4E00E7);
  96. }
  97.  
  98.  
  99. :void PutShadow(dword x,y,w,h,skinned,strength)
  100. {
  101.         proc_info wForm;
  102.         dword shadow_buf, skin_height;
  103.         shadow_buf = mem_Alloc(w*h*3);
  104.         GetProcessInfo(#wForm, SelfInfo);
  105.         CopyScreen(shadow_buf, 5*skinned+x+wForm.left, GetSkinHeight()*skinned+y+wForm.top, w, h);
  106.         ShadowImage(shadow_buf, w, h, strength);
  107.         _PutImage(x,y,w,h,shadow_buf);
  108.         mem_Free(shadow_buf);
  109. }
  110.  
  111. :void DrawPopupShadow(dword x,y,w,h,skinned)
  112. {
  113.         PutShadow(w+x+1,y,1,h+2,skinned,2);
  114.         PutShadow(w+x+2,y+1,1,h+2,skinned,1);
  115.         PutShadow(x,y+h+2,w+2,1,skinned,2);
  116.         PutShadow(x+1,y+h+3,w+1,1,skinned,1);
  117. }
  118.  
  119. :void DrawPopup(dword x,y,w,h,skinned, col_work,col_border)
  120. {
  121.         DrawRectangle(x,y,w,h,col_border);
  122.         DrawBar(x+1,y+1,w-1,1,0xFFFfff);
  123.         DrawBar(x+1,y+2,1,h-3,0xFFFfff);
  124.         if (col_work!=-1) DrawBar(x+2,y+2,w-2,h-2,col_work);
  125.         DrawPopupShadow(x,y,w,h-1,skinned);
  126. }
  127.  
  128. :void GrayScaleImage(dword color_image, w, h)
  129. {
  130.         dword i,j, gray,rr,gg,bb;
  131.         for (i = 0; i < w*h*3; i+=3)
  132.         {
  133.                 rr = DSBYTE[i+color_image];
  134.                 gg = DSBYTE[i+1+color_image];
  135.                 bb = DSBYTE[i+2+color_image];
  136.                 gray = rr*rr;
  137.                 gray += gg*gg;
  138.                 gray += bb*bb;
  139.                 gray = sqrt(gray) / 3;
  140.                 DSBYTE[i  +color_image] = DSBYTE[i+1+color_image] = DSBYTE[i+2+color_image] = gray;
  141.         }
  142. }
  143.  
  144. :void ShadowImage(dword color_image, w, h, strength)
  145. {
  146.         dword col, to;
  147.         strength = 10 - strength;
  148.         to = w*h*3 + color_image;
  149.         for ( ; color_image < to; color_image++)
  150.         {
  151.                 col = strength * DSBYTE[color_image] / 10;
  152.                 DSBYTE[color_image] = col;
  153.         }
  154. }