Subversion Repositories Kolibri OS

Rev

Rev 2810 | Blame | Last modification | View Log | Download | RSS feed

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