Subversion Repositories Kolibri OS

Rev

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

  1.  
  2. enum { BACK=300, FORWARD, REFRESH, HOME, NEWTAB, GOTOURL, SEARCHWEB, INPUT_CH, INPUT_BT };
  3. enum { _WIN, _DOS, _KOI, _UTF };
  4.  
  5. #define ID1         178
  6. #define ID2         177
  7.  
  8.                      
  9.  
  10. dword get_URL_part(int len) {
  11.         char temp1[sizeof(URL)];
  12.         strcpy(#temp1, #URL);
  13.         temp1[len] = 0x00;
  14.         return #temp1;
  15. }
  16.  
  17. inline byte chTag(dword text) {return strcmp(#tag,text);}
  18.  
  19.  
  20. void GetURLfromPageLinks(int id)
  21. {
  22.         int i, j = 0;
  23.         for (i = 0; i <= id - 401; i++)
  24.         {
  25.                 do
  26.                 {
  27.                         j++;
  28.                         if (j>=strlen(#page_links)) return;
  29.                 }
  30.                 while (page_links[j] <>'|');
  31.         }
  32.         page_links[j] = 0x00;
  33.         strcpy(#URL, #page_links+strrchr(#page_links, '|'));
  34. }
  35.  
  36.  
  37. //Ó íàñ íåò íàêëîííûõ øðèôòîâ, ïîýòîìó äåëàåì êîñòûëü èç
  38. //ïàëî÷åê äëÿ ìîðîæåíîãî è æåâàòåëüíîé ðåçèíêè:
  39. //Ñíèìàåì îáëàñòü ýêðàíà è âûâîäèì å¸ îáðàòíî ïîëîñêàìè ñî ñìåùåíèåì,
  40. //÷òî äà¸ò ïåðåêîñ êàðòèíêè
  41. //Ïðè íàëè÷èè ôîíà è ò.ï. ïðîÿâèòñÿ âñÿ êîñòûëüíîñòü ðåøåíèÿ :)
  42.  
  43. inline void Skew(dword x,y,w,h)
  44. {
  45.         dword italic_buf;
  46.         int tile_height=2,
  47.         shift=-2,
  48.         i, skin_height;
  49.  
  50.         italic_buf = mem_Alloc(w*h*3);
  51.         skin_height = GetSkinHeight();
  52.         CopyScreen(italic_buf, x+Form.left+2, y+Form.top+skin_height, w, h);
  53.  
  54.         FOR (i=0;i*tile_height<h;i++)
  55.                 _PutImage(x+shift-i+1,i*tile_height+y, w,tile_height, w*3*tile_height*i+italic_buf);
  56.        
  57.         mem_Free(italic_buf);
  58. }
  59.