Rev 2803 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1971 | lev | 1 | //HTML Viewer in C-- |
2433 | leency | 2 | //Copyright 2007-2012 by Veliant & Leency |
2739 | leency | 3 | //Asper, lev, Lrz, Barsuk, Nable. |
2696 | leency | 4 | //home icon - rachel fu, GPL licence |
5 | |||
2413 | leency | 6 | #include "..\lib\kolibri.h--" |
2660 | leency | 7 | #include "..\lib\encoding.h--" |
2413 | leency | 8 | #include "..\lib\file_system.h--" |
9 | #include "img\toolbar_icons.c" |
||
10 | #include "img\URLgoto.txt"; |
||
11 | #include "..\lib\mem.h--" |
||
12 | #include "..\lib\libio_lib.h--" |
||
13 | #include "..\lib\libimg_lib.h--" |
||
14 | #include "..\lib\edit_box_lib.h--" |
||
15 | #include "..\lib\dll.h--" |
||
2739 | leency | 16 | #include "..\lib\scroll_bar\scroll_lib.h--" |
1971 | lev | 17 | |
18 | //переменные |
||
2558 | leency | 19 | char URL[4096], |
1971 | lev | 20 | editURL[4096], |
21 | page_links[12000], |
||
22 | header[512]; |
||
23 | |||
2810 | leency | 24 | int lines_visible, |
25 | lines_all, |
||
26 | lines_first, |
||
27 | lines_column_max, |
||
1971 | lev | 28 | mouse_dd; |
29 | |||
30 | edit_box edit1= {250,207,16,0xffffff,0x94AECE,0xffffff,0xffffff,0,248,#editURL,#mouse_dd,2,19,19}; |
||
2739 | leency | 31 | scroll_bar scroll1 = { 18,200,398, 44,18,0,115,15,0,0xeeeeee,0xD2CED0,0x555555,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1}; //details in scroll_lib.h-- |
1971 | lev | 32 | |
2413 | leency | 33 | proc_info Form; |
2764 | leency | 34 | dword stak[100]; //меню ПКМ |
35 | mouse m; |
||
1971 | lev | 36 | |
2413 | leency | 37 | #include "TWB.h" |
2764 | leency | 38 | #include "include\menu_rmb.h" |
1971 | lev | 39 | |
40 | |||
41 | void main() |
||
42 | { |
||
2153 | leency | 43 | int btn; |
44 | byte key; |
||
2810 | leency | 45 | int half_scroll_size; |
2153 | leency | 46 | |
2739 | leency | 47 | mem_Init(); |
48 | load_dll2(libio, #libio_init,1); |
||
49 | load_dll2(libimg, #libimg_init,1); |
||
50 | load_dll2(boxlib, #edit_box_draw,0); |
||
51 | load_dll2(#abox_lib, #boxlib_init,0); |
||
2248 | leency | 52 | |
2810 | leency | 53 | if (param) strcpy(#URL, #param); |
54 | else strcpy(#URL, "/sys/index.htm"); |
||
55 | strcpy(#editURL, #URL); |
||
2248 | leency | 56 | |
2764 | leency | 57 | OpenPage(); |
2420 | leency | 58 | |
1971 | lev | 59 | SetEventMask(0x27); |
60 | loop() |
||
61 | { |
||
2764 | leency | 62 | WaitEventTimeout(2); |
2739 | leency | 63 | switch(EAX & 0xFF) |
1971 | lev | 64 | { |
2739 | leency | 65 | CASE evMouse: |
66 | /*scrollbar_v_mouse (#scroll1); //конченый скролл притормажимает, идём "своим путём" |
||
2810 | leency | 67 | if (lines_first <> scroll1.position) |
2739 | leency | 68 | { |
2810 | leency | 69 | lines_first = scroll1.position; |
2739 | leency | 70 | WB1.ParseHTML(buf, filesize); |
71 | //break; |
||
72 | };*/ |
||
2803 | leency | 73 | |
2764 | leency | 74 | btn=GetSlot(Form.ID); |
75 | IF (btn<>ActiveProcess()) break; //если окно не активно на события мыши не реагируем |
||
76 | |||
2803 | leency | 77 | edit_box_mouse stdcall (#edit1); |
78 | |||
1971 | lev | 79 | m.get(); |
2764 | leency | 80 | |
81 | if (m.pkm) && (m.y>WB1.top) && (m.y |
||
82 | { |
||
83 | CreateThread(#menu_rmb,#stak); |
||
84 | } |
||
2739 | leency | 85 | |
1971 | lev | 86 | IF (m.vert==65535) //прокрутка колёсиком |
87 | { |
||
2810 | leency | 88 | IF (lines_first==0) break; |
89 | IF (lines_first>3) lines_first-=2; ELSE lines_first=1; |
||
1971 | lev | 90 | WB1.Scan(ID1); |
2739 | leency | 91 | break; |
1971 | lev | 92 | } |
93 | IF (m.vert==1) |
||
94 | { |
||
2810 | leency | 95 | IF(lines_visible+lines_first+3>=lines_all) WB1.Scan(181); |
1971 | lev | 96 | ELSE { |
2810 | leency | 97 | lines_first+=2; |
1971 | lev | 98 | WB1.Scan(ID2); |
99 | } |
||
2739 | leency | 100 | break; |
1971 | lev | 101 | } |
2739 | leency | 102 | |
2810 | leency | 103 | IF (lines_all |
104 | half_scroll_size = WB1.height - 16 * lines_visible / lines_all - 3 /2; |
||
2085 | leency | 105 | if (m.x>=WB1.width-14) && (m.x<=WB1.width+6) |
106 | && (m.y>WB1.top+16) && (m.y |
||
2810 | leency | 107 | && (lines_all>lines_visible) while (m.lkm) |
1971 | lev | 108 | { |
2810 | leency | 109 | IF (half_scroll_size/2+WB1.top>m.y) || (m.y<0) || (m.y>4000) m.y=half_scroll_size/2+WB1.top; //если курсор над окном |
110 | btn=lines_first; //сохраняем старое количество |
||
111 | lines_first = m.y -half_scroll_size -WB1.top * lines_all / WB1.height; |
||
112 | IF (lines_visible+lines_first>lines_all) lines_first=lines_all-lines_visible; |
||
113 | IF (btn<>lines_first) WB1.ParseHTML(buf, filesize); //чтоб лишний раз не перерисовывать |
||
1971 | lev | 114 | m.get(); |
2739 | leency | 115 | } |
116 | |||
2413 | leency | 117 | break; |
1971 | lev | 118 | case evButton: |
119 | btn=GetButtonID(); |
||
2413 | leency | 120 | IF (btn==1) |
121 | { |
||
122 | KillProcess(downloader_id); |
||
123 | ExitProcess(); |
||
124 | } |
||
1971 | lev | 125 | ELSE |
126 | { |
||
127 | WB1.Scan(btn); |
||
128 | } |
||
2764 | leency | 129 | break; |
1971 | lev | 130 | case evKey: |
131 | key = GetKey(); |
||
2803 | leency | 132 | |
133 | if (edit1.flags == 66) || (edit1.flags == 98) SWITCH(key) //если активна строка адреса игнорируем некоторые кнопки |
||
134 | { CASE 52: CASE 53: CASE 54: goto _EDIT_MARK; } |
||
135 | |||
1971 | lev | 136 | WB1.Scan(key); |
2803 | leency | 137 | |
138 | _EDIT_MARK: |
||
1974 | yogev_ezra | 139 | IF (key<>0x0d) && (key<>183) && (key<>184) && (key<>173) {EAX=key<<8; edit_box_key stdcall(#edit1);} //адресная строка |
2764 | leency | 140 | break; |
1971 | lev | 141 | case evReDraw: |
142 | Draw_Window(); |
||
143 | break; |
||
2739 | leency | 144 | default: |
145 | if (downloader_id<>0) |
||
146 | { |
||
147 | if (GetProcessSlot(downloader_id)<>0) break; |
||
148 | downloader_id=0; |
||
2810 | leency | 149 | lines_first = lines_all = 0; |
2764 | leency | 150 | ReadHtml(); |
151 | if (filesize) wintodos(buf); |
||
2739 | leency | 152 | Draw_Window(); |
153 | } |
||
1971 | lev | 154 | } |
155 | } |
||
156 | } |
||
157 | |||
158 | |||
159 | void Draw_Window() |
||
160 | { |
||
2810 | leency | 161 | int j; |
1971 | lev | 162 | DefineAndDrawWindow(215,100,640,480,0x73,0x00E4DFE1,0,0,0); |
2764 | leency | 163 | |
2250 | leency | 164 | GetProcessInfo(#Form, SelfInfo); |
2810 | leency | 165 | if (Form.status_window>2) //если свернуто в заголовок, ничего не рисуем |
1971 | lev | 166 | { |
167 | DrawTitle(#header); |
||
168 | return; |
||
169 | } |
||
2810 | leency | 170 | if (Form.height<120) MoveSize(OLD,OLD,OLD,120); |
171 | if (Form.width<280) MoveSize(OLD,OLD,280,OLD); |
||
2155 | leency | 172 | |
173 | PutPaletteImage(#toolbar,200,42,0,0,8,#toolbar_pal); |
||
2413 | leency | 174 | if (GetProcessSlot(downloader_id)<>0) PutImage(#stop_btn,24,24,88,10); |
175 | |||
2155 | leency | 176 | DrawBar(200,0,onLeft(200,9),43,0xE4DFE1); //закрашиваем фон под тулбаром |
1971 | lev | 177 | DrawBar(0,42,onLeft(5,4),1,0xE2DBDC); //выпуклость |
178 | DrawBar(0,43,onLeft(5,4),1,0xD2CED0); //выпуклость |
||
2810 | leency | 179 | for (j=0; j<5; j++) DefineButton(j*37+11, 7, 29, 29, 300+j+BT_HIDE, 0x00E4DFE1); |
1971 | lev | 180 | PutImage(#URLgoto,40,19,onLeft(57,0),14); |
2152 | leency | 181 | DefineButton(onLeft(37,0),15, 18, 16, GOTOURL+BT_HIDE, 0xE4DFE1); |
182 | DefineButton(onLeft(56,0),15, 17, 16, SEARCHWEB+BT_HIDE, 0xE4DFE1); |
||
2739 | leency | 183 | DrawRegion(205,14,onLeft(58,205),18,0x94AECE); //ободок полосы адреса |
184 | DrawRegion(206,15,onLeft(59,205),16,0xE4ECF3); |
||
2764 | leency | 185 | |
1971 | lev | 186 | edit1.width=Form.width-266; |
187 | WB1.top=44; |
||
2739 | leency | 188 | WB1.width=Form.width-13; |
1971 | lev | 189 | WB1.height=onTop(43,5); |
2810 | leency | 190 | lines_column_max = WB1.width - 30 / 6; |
191 | lines_visible = WB1.height - 3 / 10 - 2; |
||
2764 | leency | 192 | |
2399 | leency | 193 | WB1.ShowPage(#URL); |
1971 | lev | 194 | } |
195 | |||
2238 | leency | 196 | int onLeft(dword right,left) {return Form.width-right-left;} |
197 | int onTop(dword down,up) {return Form.height-GetSkinWidth()-down-up;} |
||
1971 | lev | 198 | |
199 | |||
200 | stop:5;>>280)>120)>>>8;><8;>>>>>>0)> |