| 905 |
leency |
1 |
//Leency & Veliant -=- KolibriOS Team -=- 2008 |
|
|
2 |
|
|
|
3 |
#codesize |
|
|
4 |
#include "lib\kolibri.h--" |
|
|
5 |
#include "lib\memory.h--" |
|
|
6 |
#include "lib\edit_box_lib.h--" |
|
|
7 |
#include "include\run_file.h--" |
|
|
8 |
#include "include\icons_f.h--" |
|
|
9 |
#include "imgs\toolbar_new.cpp" |
|
|
10 |
#include "imgs\left_p.cpp" |
|
|
11 |
|
|
|
12 |
//локализация и настройки |
|
|
13 |
byte header[27] = "Eolite File Manager v0.96.7"; |
|
|
14 |
#define videlenie 0x94AECE; //цвет выделенного элемента из списка файлов |
|
|
15 |
int toolbar_buttons_x[6]={14,51,90,139,172,208}; |
|
|
16 |
// |
|
|
17 |
dword but_num=0, kolichestvo=0, curbtn=0, za_kadrom=0; |
|
|
18 |
byte cut_active, rename_active, del_active; |
|
|
19 |
byte show_actions=1, show_preview=0, sort_num=1, isdir; |
|
|
20 |
dword razm_scrl; //для скрола |
|
|
21 |
byte path[256]="/rd/1/", edit_path[256], PathHistory[2560], temp[256]; //для путей |
|
|
22 |
byte file_path[256], file_name[256]; //для файлов |
|
|
23 |
byte copyfile[256],copy_name[256]; //копирование |
|
|
24 |
dword i; //для циклов |
|
|
25 |
dword file_mas[6898]; //список файлов |
|
|
26 |
dword temp_int; |
|
|
27 |
dword stak[100]=0; //окно About |
|
|
28 |
|
|
|
29 |
edit_box edit1= {250,252,17,0xffffff,0x94AECE,0xD3DDEB,0xffffff,0,248,#edit_path,64,6,6}; |
|
|
30 |
edit_box edit2= {250,218,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,64,6,6}; |
|
|
31 |
|
|
|
32 |
proc_info Form; |
|
|
33 |
|
|
|
34 |
struct { |
|
|
35 |
int func; |
|
|
36 |
int pos; |
|
|
37 |
int rezerv; |
|
|
38 |
int sizefile; |
|
|
39 |
int buffer; |
|
|
40 |
char rezerv2; |
|
|
41 |
int stroka; |
|
|
42 |
}open_file_70; |
|
|
43 |
dword buf=0, off; //для текста и буфера |
|
|
44 |
dword devbuf=0, dev_num; |
|
|
45 |
#include "include\LVabout.c--" |
|
|
46 |
|
|
|
47 |
|
|
|
48 |
void main() |
|
|
49 |
byte pressed, key, id; |
|
|
50 |
mouse m; |
|
|
51 |
{ |
|
|
52 |
devbuf= malloc(3112); //буфер где-то на 10 девайсов в левой панели |
|
|
53 |
open_file_70.func = 1; |
|
|
54 |
open_file_70.pos = 0; |
|
|
55 |
open_file_70.rezerv = 0; |
|
|
56 |
open_file_70.sizefile = 10; |
|
|
57 |
open_file_70.buffer = devbuf; |
|
|
58 |
open_file_70.rezerv2 = 0; |
|
|
59 |
open_file_70.stroka = "/"; |
|
|
60 |
$mov eax,70 |
|
|
61 |
$mov ebx,#open_file_70.func |
|
|
62 |
$int 0x40 |
|
|
63 |
dev_num=EBX; |
|
|
64 |
load_dll(); //подгружает либу с едит_боксом |
|
|
65 |
IF (param[0]<>'') {copystr(#param,#edit_path); Goto_edit_path();} |
|
|
66 |
Open_Dir(#path,2); |
|
|
67 |
SetEventMask(); |
|
|
68 |
loop() |
|
|
69 |
{ |
|
|
70 |
switch(WaitEvent()) |
|
|
71 |
{ |
|
|
72 |
CASE evMouse: |
|
|
73 |
id = 0; |
|
|
74 |
IF (del_active==1) break; |
|
|
75 |
m.get(); |
|
|
76 |
// |
|
|
77 |
IF (vert==65535) IF (curbtn==0) FileList_ReDraw(-3); ELSE FileList_ReDraw(-1); |
|
|
78 |
IF (vert==1) IF (curbtn==but_num-1) FileList_ReDraw(3); ELSE FileList_ReDraw(1); |
|
|
79 |
//выделение используя ПКМ |
|
|
80 |
//IF (m.pkm==1) && (m.x>197) && (m.x56) |
|
|
81 |
// IF (m.y-skin_width-56/18<>curbtn) FileList_ReDraw(m.y-skin_width-56/18-curbtn); |
|
|
82 |
//скролл |
|
|
83 |
IF (m.y>Form.width) || (57+razm_scrl>m.y) m.y=57+razm_scrl; //если курсор над окном |
|
|
84 |
IF (m.lkm==0) pressed=0; ELSE |
|
|
85 |
IF (m.x>=Form.width-21) && (m.x<=Form.width-6) pressed=1; |
|
|
86 |
IF (pressed==1) |
|
|
87 |
{ |
|
|
88 |
temp_int=za_kadrom; //сохраняем старое количество |
|
|
89 |
za_kadrom = m.y -57-razm_scrl * kolichestvo / onTop(22,57); |
|
|
90 |
IF (but_num+za_kadrom>kolichestvo) za_kadrom=kolichestvo-but_num; |
|
|
91 |
IF (temp_int<>za_kadrom) List_ReDraw(); //чтоб лишний раз не перерисовывать |
|
|
92 |
} |
|
|
93 |
break; |
|
|
94 |
//Button pressed----------------------------------------------------------------------------- |
|
|
95 |
case evButton: |
|
|
96 |
IF (edit1.flags<>64) {edit1.flags=64; edit_box_draw stdcall(#edit1);} //сбрасываем выделение при нажатии на батон |
|
|
97 |
id=GetButtonID(); |
|
|
98 |
IF (id==1) ExitProcess(); |
|
|
99 |
IF (del_active==1) {IF (id==301) || (id==302) Del_File(302-id); break;} |
|
|
100 |
switch(id) |
|
|
101 |
{ |
|
|
102 |
CASE 21: GoBack(); break;//Назад |
|
|
103 |
CASE 23: IF (strcmp(#path,"/")<>0) Dir_Up(); break;//up! |
|
|
104 |
CASE 24: key=24; //cut |
|
|
105 |
CASE 25: goto CTRLC_MARK; //copy |
|
|
106 |
CASE 26: Paste(); break;//paste |
|
|
107 |
CASE 27: Goto_edit_path(); break; //goto edit_path |
|
|
108 |
CASE 31...33: //sort |
|
|
109 |
IF (sort_num==id-30) break; |
|
|
110 |
IF(sort_num==1)DrawBar(onLeft(197,163)/2+215,45,6,9,0xE4DFE1); |
|
|
111 |
IF(sort_num==2)DrawBar(onLeft(110,0),45,6,9,0xE4DFE1); |
|
|
112 |
IF(sort_num==3)DrawBar(onLeft(39,0),45,6,9,0xE4DFE1); |
|
|
113 |
sort_num=id-30; |
|
|
114 |
Open_Dir(#path,1); |
|
|
115 |
break; |
|
|
116 |
case 30: //about |
|
|
117 |
EAX = 51; EBX = 1; |
|
|
118 |
ECX = #authors; EDX = #stak; |
|
|
119 |
$int 40h; |
|
|
120 |
break; |
|
|
121 |
case 50: //стрелка вверх на скроле |
|
|
122 |
FileList_ReDraw(-1); |
|
|
123 |
BREAK; |
|
|
124 |
case 51: //стрелка вниз на скроле |
|
|
125 |
FileList_ReDraw(1); |
|
|
126 |
BREAK; |
|
|
127 |
case 78: //preview |
|
|
128 |
IF (show_preview==1) show_preview=0; ELSE show_preview=1; |
|
|
129 |
Preview(); |
|
|
130 |
BREAK; |
|
|
131 |
case 77: //actions |
|
|
132 |
IF (show_actions==1) show_actions=0; ELSE show_actions=1; |
|
|
133 |
Actions(); Preview(); |
|
|
134 |
BREAK; |
|
|
135 |
case 80: goto REN_MARK; //rename |
|
|
136 |
case 81: Del_Form(); BREAK;//Delete file |
|
|
137 |
} |
|
|
138 |
if (id>200) //кнопки из списка файлов |
|
|
139 |
{ |
|
|
140 |
IF (curbtn!=id-201) {FileList_ReDraw(id-201-curbtn); break;} |
|
|
141 |
else OPEN_MARK: |
|
|
142 |
if (!isdir) Run_File(#file_path); else |
|
|
143 |
if (strcmp(za_kadrom+curbtn+1*304 + buf+72,"..")==0) Dir_Up(); else |
|
|
144 |
{ OPEN_DEV: |
|
|
145 |
copystr(#file_path, #path); |
|
|
146 |
copystr("/", #path+strlen(#path)); |
|
|
147 |
DrawBar(197,curbtn*18+57,onLeft(22,197),18,0xFFFFFF); //закрашиваем старое выделение |
|
|
148 |
za_kadrom=curbtn=0; |
|
|
149 |
Open_Dir(#path,1); |
|
|
150 |
} |
|
|
151 |
break; |
|
|
152 |
} |
|
|
153 |
if (id>=100) && (id<130) //подключённые носители информации |
|
|
154 |
{ DEVICE_MARK: |
|
|
155 |
copystr(id-100*304+ devbuf+72, #path); |
|
|
156 |
IF (strcmp(#path,"rd")==0) copystr("/rd/1",#file_path); |
|
|
157 |
ELSE { |
|
|
158 |
copystr("/", #file_path); |
|
|
159 |
copystr(#path, #file_path+strlen(#file_path)); |
|
|
160 |
} |
|
|
161 |
GOTO OPEN_DEV; |
|
|
162 |
} |
|
|
163 |
break; |
|
|
164 |
//Key pressed----------------------------------------------------------------------------- |
|
|
165 |
case evKey: |
|
|
166 |
key = GetKey(); |
|
|
167 |
IF (del_active==1) |
|
|
168 |
{ |
|
|
169 |
IF (key==013) Del_File(true); |
|
|
170 |
IF (key==027) Del_File(false); |
|
|
171 |
break; |
|
|
172 |
} |
|
|
173 |
IF (edit1.flags<>64) || (edit2.flags<>64) SWITCH (key) { CASE 8: CASE 180...182: CASE 051...056: goto EDIT_KEY_MARK; } //1..10 и ноум/енд в едитбоксах |
|
|
174 |
switch (key) |
|
|
175 |
{ |
|
|
176 |
case 209...217: id=key-109; IF(dev_num>id-100)GOTO DEVICE_MARK; break; |
|
|
177 |
case 8: GoBack(); break; //Назад |
|
|
178 |
case 014: MoveSize(80,80,OLD,OLD); Run_Program("/sys/File Managers/Eolite", #path); break; //новое окно |
|
|
179 |
case 024: //Ctrl+X cut |
|
|
180 |
case 089: //Ctrl+Ins copy |
|
|
181 |
case 003: //Ctrl+C copy |
|
|
182 |
CTRLC_MARK: |
|
|
183 |
IF (isdir) break; //папки пока что копировать не умеем |
|
|
184 |
copystr(#file_name,#copy_name); |
|
|
185 |
copystr(#file_path,#copyfile); //вычисляем какой файл копировать |
|
|
186 |
IF (key==24) cut_active=1; ELSE cut_active=0; |
|
|
187 |
break; |
|
|
188 |
case 022: Paste(); break;//Ctrl+V paste |
|
|
189 |
case 027: //Esc |
|
|
190 |
IF (rename_active==1) Line_ReDraw(videlenie, 100); |
|
|
191 |
break; |
|
|
192 |
case 013: //Enter |
|
|
193 |
IF (rename_active==1) {Line_ReDraw(videlenie, curbtn); break;} |
|
|
194 |
IF (strcmp(#path,#edit_path)<>0) Goto_edit_path(); |
|
|
195 |
ELSE GOTO OPEN_MARK; |
|
|
196 |
break; |
|
|
197 |
case 56: //IF (rename_active==1) break;//up |
|
|
198 |
case 178: //up |
|
|
199 |
FileList_ReDraw(-1); |
|
|
200 |
break; |
|
|
201 |
case 177: //down |
|
|
202 |
FileList_ReDraw(1); |
|
|
203 |
break; |
|
|
204 |
case 180: //home |
|
|
205 |
FileList_ReDraw(-za_kadrom-curbtn); |
|
|
206 |
break; |
|
|
207 |
case 181: //end |
|
|
208 |
FileList_ReDraw(kolichestvo-za_kadrom-curbtn+but_num); |
|
|
209 |
break; |
|
|
210 |
case 183: //Page Down |
|
|
211 |
FileList_ReDraw(but_num-1); |
|
|
212 |
break; |
|
|
213 |
case 184: //Page Up |
|
|
214 |
FileList_ReDraw(-but_num+1); |
|
|
215 |
break; |
|
|
216 |
case 051: //Нажата F2 |
|
|
217 |
REN_MARK: |
|
|
218 |
IF (isdir==1) break; //папки пока что копировать не умеем |
|
|
219 |
edit2.flags=66; //делаем компонент активным |
|
|
220 |
DeleteButton(curbtn+201); //это чтоб можно было выделять мышью |
|
|
221 |
edit2.width=onLeft(24,217); |
|
|
222 |
edit2.top=curbtn*18+59+skin_width; |
|
|
223 |
edit2.size=strlen(#file_name); edit2.pos=strlen(#file_name); |
|
|
224 |
edit_box_draw stdcall (#edit2); |
|
|
225 |
DrawBar(218,curbtn*18+58,edit2.width+1,1,0xFFFFCC); //полоса желтая сверху для одинаковости |
|
|
226 |
rename_active=1; |
|
|
227 |
BREAK; |
|
|
228 |
case 052: //Нажата F3 |
|
|
229 |
IF (isdir==false) Run_Program("/sys/tinypad", #file_path); BREAK; |
|
|
230 |
case 054: Open_Dir(#path,1); BREAK; //перерисовать окно F5 |
|
|
231 |
case 182: Del_Form(); BREAK; //delete file |
|
|
232 |
default: EDIT_KEY_MARK: |
|
|
233 |
EAX=key <<8; |
|
|
234 |
IF (rename_active==0) edit_box_key stdcall (#edit1); ELSE edit_box_key stdcall (#edit2); |
|
|
235 |
} |
|
|
236 |
break; |
|
|
237 |
case evReDraw: draw_window(); BREAK; |
|
|
238 |
} |
|
|
239 |
IF (rename_active==0) edit_box_mouse stdcall(#edit1); ELSE edit_box_mouse stdcall(#edit2); |
|
|
240 |
} |
|
|
241 |
free(buf); //free memory |
|
|
242 |
ExitProcess(); |
|
|
243 |
} |
|
|
244 |
|
|
|
245 |
|
|
|
246 |
inline fastcall void draw_window() |
|
|
247 |
{ |
|
|
248 |
WindowRedrawStatus(1); |
|
|
249 |
skin_width = GetSkinWidth(); |
|
|
250 |
DefineAndDrawWindow(100,100,600,410,0x43,0x10E4DFE1,0,0,#header); //DrawTitle(#header); |
|
|
251 |
Form.getme(); |
|
|
252 |
IF (Form.height==skin_width+3) {WindowRedrawStatus(2); return;} //это зачёт! |
|
|
253 |
IF (Form.height<280) MoveSize(OLD,OLD,OLD,280); |
|
|
254 |
IF (Form.width<480) MoveSize(OLD,OLD,480,OLD); |
|
|
255 |
//toolbar buttons |
|
|
256 |
PutImage(#toolbar,246,39,5,0); |
|
|
257 |
FOR (j=0; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,0xE4DFE1); |
|
|
258 |
//полоса адреса |
|
|
259 |
DrawBar(251,0,onLeft(251,60),12,0xE4DFE1); //фон над полосой адреса |
|
|
260 |
edit1.width=Form.width-314; |
|
|
261 |
edit1.top=13+skin_width; |
|
|
262 |
KEdit(); |
|
|
263 |
DrawRegion(251,12,onLeft(61,251),16,0x94AECE); //ободок |
|
|
264 |
DrawBar(251,29,onLeft(251,60),10,0xE4DFE1); //фон под полосой адреса |
|
|
265 |
DefineButton(onLeft(34,0),6,27,28,30+BT_HIDE+BT_NOFRAME,0xE4DFE1); //about |
|
|
266 |
DefineButton(onLeft(61,0),12,18,16,27+BT_HIDE,0xE4DFE1); //кнопка перехода |
|
|
267 |
PutImage(#goto_about,56,40,onLeft(60,0),0); |
|
|
268 |
//прямоугольники внутри |
|
|
269 |
DrawRegion(6,40,Form.width-12,Form.height-skin_width-46,0x94AECE); //синий ободок |
|
|
270 |
DrawRegion(5,39,Form.width-10,Form.height-skin_width-44,0xE4DFE1); //фон |
|
|
271 |
Devices(); //панель слева на синем фоне |
|
|
272 |
//Buttons |
|
|
273 |
DrawFlatButton(197,40,onLeft(197,163),16,31,0xE4DFE1,"File"); |
|
|
274 |
DrawFlatButton(onLeft(163,0),40,73,16,32,0xE4DFE1,"Type"); |
|
|
275 |
DrawFlatButton(onLeft(90,0),40,68,16,33,0xE4DFE1,"Size"); |
|
|
276 |
IF (sort_num==1) WriteText(onLeft(197,163)/2+197+18,45,0x80,0x4E78AC,"\x19",0); |
|
|
277 |
ELSE IF (sort_num==2) WriteText(onLeft(110,0),45,0x80,0x4E78AC,"\x19",0); |
|
|
278 |
ELSE WriteText(onLeft(39,0),45,0x80,0x4E78AC,"\x19",0); |
|
|
279 |
//прокрутка |
|
|
280 |
DrawFlatButton(onLeft(22,0),40,16,16,50,0xE4DFE1,"\x18"); //прокрутка вверх |
|
|
281 |
DrawFlatButton(onLeft(22,0),onTop(22,0),16,16,51,0xE4DFE1,"\x19");//прокрутка вниз |
|
|
282 |
DrawBar(onLeft(22,0),57,1,onTop(22,57),0x94AECE); //линия слева от прокрутки |
|
|
283 |
but_num=onTop(6,57)/18; |
|
|
284 |
IF (but_num>100) but_num=1; ELSE IF (kolichestvo |
|
|
285 |
FOR (j=0;j |
|
|
286 |
List_ReDraw(); |
|
|
287 |
IF (del_active==1) Del_Form(); |
|
|
288 |
WindowRedrawStatus(2); |
|
|
289 |
} |
|
|
290 |
|
|
|
291 |
|
|
|
292 |
void KEdit() |
|
|
293 |
{ |
|
|
294 |
edit1.size=strlen(#edit_path); edit1.pos=strlen(#edit_path); |
|
|
295 |
edit_box_draw stdcall (#edit1); |
|
|
296 |
} |
|
|
297 |
|
|
|
298 |
|
|
|
299 |
inline fastcall void TVScroll() { //Прокрутка |
|
|
300 |
dword on_y = za_kadrom * onTop(22,57) / kolichestvo +57; |
|
|
301 |
razm_scrl=onTop(22,57) * but_num - but_num / kolichestvo; |
|
|
302 |
IF (razm_scrl<20) razm_scrl = 20; //устанавливаем минимальный размер скролла |
|
|
303 |
IF (razm_scrl>onTop(22,57)-on_y+56) || (za_kadrom+but_num>=kolichestvo) on_y=onTop(23+razm_scrl,0); //для большого списка |
|
|
304 |
DrawFlatButton(onLeft(22,0),on_y,16,razm_scrl,0,0xE4DFE1,"");//ползунок |
|
|
305 |
DrawBar(onLeft(21,0),57,15,on_y-57,0xCED0D0);//поле до ползунка |
|
|
306 |
DrawBar(onLeft(21,0),on_y+razm_scrl+1,15,onTop(22,57)-razm_scrl-on_y+56,0xCED0D0); //поле после ползунка |
|
|
307 |
} |
|
|
308 |
|
|
|
309 |
|
|
|
310 |
void FileList_ReDraw(int curbtn_) |
|
|
311 |
{ |
|
|
312 |
if (curbtn_<=0) //вверх |
|
|
313 |
{ |
|
|
314 |
IF (za_kadrom==0) && (curbtn==0) return; |
|
|
315 |
IF (-curbtn_-1 |
|
|
316 |
{ |
|
|
317 |
Line_ReDraw(0xFFFFFF, curbtn); //белая полоса |
|
|
318 |
curbtn+=curbtn_; |
|
|
319 |
Line_ReDraw(videlenie, curbtn); //выделение |
|
|
320 |
return; |
|
|
321 |
} |
|
|
322 |
ELSE |
|
|
323 |
{ |
|
|
324 |
IF (-curbtn_ |
|
|
325 |
curbtn=0; |
|
|
326 |
List_ReDraw(); |
|
|
327 |
return; |
|
|
328 |
} |
|
|
329 |
} |
|
|
330 |
else //вниз |
|
|
331 |
{ |
|
|
332 |
IF (za_kadrom==kolichestvo-but_num) && (curbtn==but_num-1) return; |
|
|
333 |
IF (but_num-curbtn>curbtn_) |
|
|
334 |
{ |
|
|
335 |
Line_ReDraw(0xFFFFFF, curbtn); //белая полоса |
|
|
336 |
curbtn+=curbtn_; |
|
|
337 |
Line_ReDraw(videlenie, curbtn); //выделение |
|
|
338 |
return; |
|
|
339 |
} |
|
|
340 |
ELSE |
|
|
341 |
{ |
|
|
342 |
IF(but_num+za_kadrom+curbtn_>=kolichestvo) za_kadrom=kolichestvo-but_num; ELSE za_kadrom+=curbtn_+curbtn-but_num+1; |
|
|
343 |
curbtn=but_num; |
|
|
344 |
List_ReDraw(); |
|
|
345 |
} |
|
|
346 |
} |
|
|
347 |
} |
|
|
348 |
|
|
|
349 |
|
|
|
350 |
void List_ReDraw() |
|
|
351 |
{ |
|
|
352 |
IF (kolichestvo-za_kadrom |
|
|
353 |
{ za_kadrom=kolichestvo-but_num; DrawBar(197,curbtn*18+57,onLeft(22,197),18,0xFFFFFF); curbtn=but_num-1; } |
|
|
354 |
ELSE IF (curbtn>but_num-1) curbtn=but_num-1; //это если выделение после схлопывания окна за кадром |
|
|
355 |
// |
|
|
356 |
FOR (j=0; jj) Line_ReDraw(0xFFFFFF, j); ELSE Line_ReDraw(videlenie, curbtn); |
|
|
357 |
temp_int=but_num-1*18+75; |
|
|
358 |
DrawBar(197,temp_int,onLeft(22,197),onTop(temp_int,6),0xFFFFFF); //заливка белым доконца |
|
|
359 |
DrawBar(onLeft(163,0),temp_int,1,onTop(temp_int,6),0xE4DFE1); //полоса серая вертикальная 1 |
|
|
360 |
DrawBar(onLeft(90,0),temp_int,1,onTop(temp_int,6),0xE4DFE1); //полоса серая вертикальная 2 |
|
|
361 |
TVScroll(); |
|
|
362 |
} |
|
|
363 |
|
|
|
364 |
|
|
|
365 |
void Line_ReDraw(dword color, filenum){ |
|
|
366 |
dword y, size; |
|
|
367 |
if (rename_active==1) |
|
|
368 |
{ |
|
|
369 |
rename_active=0; |
|
|
370 |
edit2.flags=64; |
|
|
371 |
DefineButton(197,curbtn+1*18+39,onLeft(22,197),18,curbtn+201+BT_HIDE+BT_NOFRAME,0xFFFFFF); |
|
|
372 |
IF (filenum==100) filenum=curbtn; ELSE |
|
|
373 |
{ |
|
|
374 |
copystr(#path,#temp); |
|
|
375 |
copystr(#file_name,#temp+strlen(#temp)); |
|
|
376 |
IF (strcmp(#file_path,#temp)<>0) && (strlen(#file_name)>0) |
|
|
377 |
{ CopyFile(#file_path,#temp); Del_File(true); } |
|
|
378 |
} |
|
|
379 |
} |
|
|
380 |
DrawBar(197,filenum*18+57,onLeft(22,197),18,color); //полоса белая или выделения |
|
|
381 |
// |
|
|
382 |
y= filenum*18+85; //положение текста по Y |
|
|
383 |
IF (strcmp(".",buf+72)<>0) off=file_mas[filenum+za_kadrom]*304 + buf+72; ELSE off=file_mas[filenum+za_kadrom+1]*304 + buf+72; |
|
|
384 |
temp_int = onLeft(220,160)/6; |
|
|
385 |
IF (strlen(off) |
|
|
386 |
WriteText(220,y-22,0,0,off,temp_int); //имя файла |
|
|
387 |
size=ESDWORD[off-8]; |
|
|
388 |
EAX=ESDWORD[off-40]; |
|
|
389 |
$shr eax,4 |
|
|
390 |
$and eax,1 |
|
|
391 |
IF (color==videlenie) isdir=EAX; //надо обьединить с тем шо снизу |
|
|
392 |
IF (!EAX) |
|
|
393 |
{ |
|
|
394 |
temp_int = Put_icon(off+strlen(off)-4, y); |
|
|
395 |
WriteText(7-strlen(ConvertSize(size))*6+onLeft(75,0),y-22,0x80,0,ConvertSize(size),0); |
|
|
396 |
} ELSE IF (strcmp("..",off)==0) temp_int=Put_icon(" ", y); ELSE temp_int=Put_icon("", y); |
|
|
397 |
IF (color==videlenie) |
|
|
398 |
{ |
|
|
399 |
IconFairing(temp_int, y, videlenie); //закрашиваем иконку |
|
|
400 |
copystr(#path,#file_path); |
|
|
401 |
copystr(off,#file_name); |
|
|
402 |
copystr(off,#file_path+strlen(#file_path)); //итак, file_path=файлу, т.к. по-умолчанию это прога |
|
|
403 |
} |
|
|
404 |
DrawBar(onLeft(163,0),filenum*18+57,1,18,0xE4DFE1); //полоса серая вертикальная 1 |
|
|
405 |
DrawBar(onLeft(90,0),filenum*18+57,1,18,0xE4DFE1); //полоса серая вертикальная 2 |
|
|
406 |
//Preview(); |
|
|
407 |
} |
|
|
408 |
|
|
|
409 |
|
|
|
410 |
void Open_Dir(dword path_,redraw){ |
|
|
411 |
IF (buf) free(buf); |
|
|
412 |
//open_file_70.func = 1; //а нафига, они сверху есть... |
|
|
413 |
//open_file_70.pos = 0; |
|
|
414 |
//open_file_70.rezerv = 0; |
|
|
415 |
open_file_70.sizefile = 6898; |
|
|
416 |
buf = malloc(2097152); |
|
|
417 |
open_file_70.buffer = buf; |
|
|
418 |
//open_file_70.rezerv2 = 0; |
|
|
419 |
open_file_70.stroka = path_; |
|
|
420 |
$mov eax,70 |
|
|
421 |
$mov ebx,#open_file_70.func |
|
|
422 |
$int 0x40 |
|
|
423 |
kolichestvo=EBX; |
|
|
424 |
// |
|
|
425 |
if (kolichestvo<>-1) && (redraw>0) |
|
|
426 |
{ |
|
|
427 |
FOR (j=0;j0) ChangeCase(off);} //регистр |
|
|
428 |
FOR (j=0;j |
|
|
429 |
but_num=onTop(6,57)/18; |
|
|
430 |
IF (strcmp(".",buf+72)==0) kolichestvo--; //фильтруем элемент "." |
|
|
431 |
//IF (strcmp(".",buf+72)==0) copystr(304+buf+72,buf); |
|
|
432 |
IF (but_num>100) but_num=1; ELSE//эта странная строчка для того если размеры окна слишком маленькие |
|
|
433 |
IF (kolichestvo |
|
|
434 |
FOR (j=0;j |
|
|
435 |
FoldesGoUp(); |
|
|
436 |
IF (redraw==1) List_ReDraw(); |
|
|
437 |
copystr(path_,#edit_path); |
|
|
438 |
KEdit(); |
|
|
439 |
copystr("|",#PathHistory+strlen(#PathHistory)); |
|
|
440 |
copystr(#path,#PathHistory+strlen(#PathHistory)); |
|
|
441 |
} |
|
|
442 |
} |
|
|
443 |
|
|
|
444 |
|
|
|
445 |
|
|
|
446 |
void FoldesGoUp() |
|
|
447 |
{ |
|
|
448 |
dword k=0, l=0; off=buf+72; |
|
|
449 |
IF (strcmp(#path,"/rd/1/")==0) || (strcmp(#path,"/fd/1/")==0) kolichestvo--; |
|
|
450 |
IF (strcmp(".",buf+72)<>0) && (strlen(#path)>6) kolichestvo--; //фак! это бред! хз как оно работает |
|
|
451 |
FOR (i=0;i<=kolichestvo;i++) //а папки всё выше и выше... |
|
|
452 |
{ |
|
|
453 |
EAX=ESDWORD[off-40]; |
|
|
454 |
$shr eax,4 |
|
|
455 |
$and eax,1 |
|
|
456 |
IF (EAX) {file_mas[k]=i; k++;} |
|
|
457 |
ELSE {file_mas[kolichestvo-l]=i; l++;} |
|
|
458 |
off += 304; |
|
|
459 |
} |
|
|
460 |
//k=0; l=kolichestvo; |
|
|
461 |
switch(sort_num) |
|
|
462 |
{ |
|
|
463 |
CASE 1: //упорядочиваем файлы по имени |
|
|
464 |
WriteText(onLeft(197,163)/2+215,45,0x80,0x4E78AC,"\x19",0); |
|
|
465 |
IF (strcmp(#path,"/")==0) break; |
|
|
466 |
IF (strcmp("..",buf+72+304)<>0) Sort_by_Name(k,kolichestvo-1); ELSE Sort_by_Name(k,kolichestvo); |
|
|
467 |
break; |
|
|
468 |
case 2: //упорядочиваем файлы по типу |
|
|
469 |
WriteText(onLeft(110,0),45,0x80,0x4E78AC,"\x19",0); |
|
|
470 |
IF (strcmp("..",buf+72+304)<>0) Sort_by_Type(k, kolichestvo-1); ELSE Sort_by_Type(k, kolichestvo); |
|
|
471 |
break; |
|
|
472 |
case 3: |
|
|
473 |
WriteText(onLeft(39,0),45,0x80,0x4E78AC,"\x19",0); |
|
|
474 |
IF (strcmp("..",buf+72+304)<>0) Sort_by_Size(k,kolichestvo-1); ELSE Sort_by_Size(k,kolichestvo); |
|
|
475 |
BREAK; |
|
|
476 |
} |
|
|
477 |
IF (strcmp(#path,"/")<>0) IF (strcmp("..",304+buf+72)<>0) Sort_by_Name(0,k-1); ELSE Sort_by_Name(2,k-1); //иногда имя папки начинается с !,&... |
|
|
478 |
IF (strcmp(".",buf+72)<>0) && (strlen(#path)>6) kolichestvo++; |
|
|
479 |
} |
|
|
480 |
|
|
|
481 |
|
|
|
482 |
dword onLeft(dword right,left) {return Form.width-right-left;} |
|
|
483 |
dword onTop(dword down,up) {return Form.height-skin_width-down-up;} |
|
|
484 |
|
|
|
485 |
|
|
|
486 |
void Del_Form() |
|
|
487 |
{ |
|
|
488 |
IF (isdir==true) return; //папки пока что удалять не умеем |
|
|
489 |
temp_int=Form.width-200+197/2; |
|
|
490 |
//типа окно |
|
|
491 |
FOR (i=5;i<11;i++) DeleteButton(201+i); //удаляем кнопки под формой |
|
|
492 |
DrawFlatButton(temp_int,160,200,80,0,0xE4DFE1, ""); //форма |
|
|
493 |
WriteText(temp_int+19,175,0x80,0,"Do you really want to delete",28); |
|
|
494 |
IF (strlen(#file_name)<28) |
|
|
495 |
{ |
|
|
496 |
WriteText(strlen(#file_name)*6+temp_int+20,190,0x80,0,"?",1); |
|
|
497 |
WriteText(temp_int+20,190,0x80,0,#file_name,24); //пишем имя |
|
|
498 |
} |
|
|
499 |
ELSE |
|
|
500 |
{ |
|
|
501 |
WriteText(164+temp_int,190,0x80,0,"...?",4); |
|
|
502 |
WriteText(temp_int+20,190,0,0,#file_name,24); //пишем имя |
|
|
503 |
} |
|
|
504 |
//кнопочки |
|
|
505 |
DrawFlatButton(temp_int+20,208,70,20,301,0xFFB6B5,"Yes"); |
|
|
506 |
DrawFlatButton(temp_int+111,208,70,20,302,0xC6DFC6,"No"); |
|
|
507 |
del_active=1; |
|
|
508 |
} |
|
|
509 |
|
|
|
510 |
void Del_File(byte dodel) |
|
|
511 |
{ |
|
|
512 |
IF (dodel==true){ |
|
|
513 |
run_file_70.func = 8; |
|
|
514 |
run_file_70.flag = 0; |
|
|
515 |
run_file_70.param= 0; |
|
|
516 |
run_file_70.rez1 = 0; |
|
|
517 |
run_file_70.rez2 = 0; |
|
|
518 |
run_file_70.rezerv2 = 0; |
|
|
519 |
run_file_70.stroka = #file_path; |
|
|
520 |
$mov eax,70 |
|
|
521 |
$mov ebx,#run_file_70.func |
|
|
522 |
$int 0x40} |
|
|
523 |
del_active=0; |
|
|
524 |
DeleteButton(301); DeleteButton(302); //удаляем кнопочки Yes/No |
|
|
525 |
Open_Dir(#path,1); |
|
|
526 |
} |
|
|
527 |
|
|
|
528 |
|
|
|
529 |
void Paste() |
|
|
530 |
{ |
|
|
531 |
IF (strcmp(#copyfile,"")==0) return; //отмена, еши ещё ничё не скопировали |
|
|
532 |
copystr(#path,#temp); |
|
|
533 |
copystr(#copy_name,#temp+strlen(#temp)); |
|
|
534 |
if (strcmp(#copyfile,#temp)==0) //если мы копируем и вставляем в одной и той же папке |
|
|
535 |
{ |
|
|
536 |
copystr(#path,#temp); |
|
|
537 |
copystr("new_",#temp+strlen(#temp)); |
|
|
538 |
copystr(#copy_name,#temp+strlen(#temp)); |
|
|
539 |
} |
|
|
540 |
CopyFile(#copyfile,#temp); |
|
|
541 |
IF (cut_active==1) //если мы выбрали вырезать |
|
|
542 |
{ |
|
|
543 |
copystr(#copyfile,#file_path); |
|
|
544 |
Del_File(true); |
|
|
545 |
copyfile=''; |
|
|
546 |
cut_active=0; |
|
|
547 |
} |
|
|
548 |
Open_Dir(#path,1); |
|
|
549 |
} |
|
|
550 |
|
|
|
551 |
|
|
|
552 |
void Tip(int y, dword caption, id, arrow) |
|
|
553 |
{ |
|
|
554 |
DrawBar(22,y,160,17,0xE4DFE1); //серое сверху |
|
|
555 |
WriteText(30,y+5,0x80,0,caption,0); //text Goto: |
|
|
556 |
IF (id<>0) DefineButton(164,y+1,16,16,id+BT_HIDE+BT_NOFRAME,0xE4DFE1); //кнопа для стрелки |
|
|
557 |
WriteText(170,y+5,0x80,0,arrow,0); //стрелка вниз |
|
|
558 |
DrawBar(22,y+17,160,1,0x94AECE); //подчёркивание |
|
|
559 |
} |
|
|
560 |
|
|
|
561 |
|
|
|
562 |
void Devices() |
|
|
563 |
{ |
|
|
564 |
byte dev_icon; dword drive_name[30]; char dev_name[4]; |
|
|
565 |
DrawBar(7,41,190,15,0x00699C); //синий прямоугольник - сверху |
|
|
566 |
DrawBar(7,56,15,onTop(21,41),0x00699C); //синий прямоугольник - слева |
|
|
567 |
DrawBar(182,56,15,onTop(21,41),0x00699C); //синий прямоугольник - справа |
|
|
568 |
//список дисков |
|
|
569 |
Tip(56, "Goto:", 0, ""); |
|
|
570 |
DrawBar(22,74,160,dev_num*16+1,0xFFFFFF); //белое |
|
|
571 |
for (i=0;i |
|
|
572 |
{ |
|
|
573 |
DefineButton(22,i*16+74,159,16,100+i+BT_HIDE,0xE4DFE1); //создаём кнопки, а потом выводим названия дисков |
|
|
574 |
copystr("Unknown drive",#drive_name); //изначально неизвесный носитель |
|
|
575 |
dev_icon=3; //по-умолчанию устройство выглядит как жестяк |
|
|
576 |
copystr(i*304+ devbuf+72, #dev_name); |
|
|
577 |
IF (dev_name[0]=='f') { copystr("Floppy disk /",#drive_name); dev_icon=2; } |
|
|
578 |
IF (dev_name[0]=='h') { copystr("Hard disk drive /",#drive_name);} |
|
|
579 |
IF (dev_name[0]=='b') { copystr("SATA disk drive /",#drive_name);} |
|
|
580 |
IF (dev_name[0]=='c') {copystr("CD-drive /",#drive_name); dev_icon=1;} |
|
|
581 |
copystr(#dev_name,#drive_name+strlen(#drive_name)); |
|
|
582 |
copystr("/",#drive_name+strlen(#drive_name)); |
|
|
583 |
IF (dev_name[0]=='r') { copystr("RAM-disk /rd/1/",#drive_name); dev_icon=0; } |
|
|
584 |
WriteText(45,i*16+79,0x80,0,#drive_name,0); |
|
|
585 |
PutImage(dev_icon*14*13*3+#devices,14,13,26,i*16+76); |
|
|
586 |
} |
|
|
587 |
Actions(); //функции файлов и папок |
|
|
588 |
Preview(); |
|
|
589 |
} |
|
|
590 |
|
|
|
591 |
void Actions() |
|
|
592 |
{ |
|
|
593 |
DrawBar(22,dev_num*16+75,160,15,0x00699C); //синий прямоугольник - под девайсами |
|
|
594 |
if (show_actions==1) |
|
|
595 |
{ |
|
|
596 |
Tip(dev_num*16+90, "Actions", 77, "\x19"); |
|
|
597 |
DrawBar(22,dev_num*16+108,160,51,0xFFFFFF); //белое |
|
|
598 |
PutImage(#factions,16,44,26,dev_num*16+113); //пиктограмки |
|
|
599 |
//rename file |
|
|
600 |
DefineButton(22,dev_num*16+108,159,16,80+BT_HIDE,0xE4DFE1); |
|
|
601 |
WriteText(47,dev_num*16+113,0x80,0,"Rename file ",0); |
|
|
602 |
//delete file |
|
|
603 |
DefineButton(22,dev_num*16+125,159,16,81+BT_HIDE,0xE4DFE1); |
|
|
604 |
WriteText(47,dev_num*16+130,0x80,0,"Delete file ",0); |
|
|
605 |
//create folder |
|
|
606 |
DefineButton(22,dev_num*16+142,159,16,82+BT_HIDE,0xE4DFE1); |
|
|
607 |
WriteText(47,dev_num*16+147,0x80,0,"Create folder ",0); |
|
|
608 |
DrawBar(22,dev_num*16+159,160,15,0x00699C); //синее после Actions |
|
|
609 |
} |
|
|
610 |
ELSE |
|
|
611 |
{ |
|
|
612 |
DeleteButton(80); DeleteButton(81); DeleteButton(82); |
|
|
613 |
Tip(dev_num*16+90, "Actions", 77, "\x18"); |
|
|
614 |
DrawBar(22,dev_num*16+108,160,51,0x00699C); //синее |
|
|
615 |
} |
|
|
616 |
} |
|
|
617 |
|
|
|
618 |
|
|
|
619 |
/*void Dir_Up() |
|
|
620 |
{ |
|
|
621 |
byte temp_[256]; |
|
|
622 |
i=strlen(#path)-1; |
|
|
623 |
path[i]=0x00; |
|
|
624 |
do i--; while (path[i]<>'/'); copystr(#path+i+1,#temp_); |
|
|
625 |
path[i+1]=0x00; |
|
|
626 |
ChangeCase(#temp_); |
|
|
627 |
za_kadrom=curbtn=0; //вверх списка |
|
|
628 |
Open_Dir(#path,2); |
|
|
629 |
FOR (i=kolichestvo; i>0; i--;) IF(strcmp(file_mas[i]*304+buf+72,#temp_)==0) BREAK; |
|
|
630 |
// |
|
|
631 |
IF (i0) za_kadrom=i; ELSE za_kadrom=i-1;} |
|
|
632 |
ELSE {za_kadrom=kolichestvo-but_num; curbtn=i-kolichestvo+but_num;} |
|
|
633 |
List_ReDraw(); |
|
|
634 |
}*/ |
|
|
635 |
|
|
|
636 |
/*void Dir_Up() |
|
|
637 |
{ |
|
|
638 |
i=strlen(#path)-1; |
|
|
639 |
do i--; while (path[i]<>'/'); |
|
|
640 |
path[i+1]=0x00; |
|
|
641 |
za_kadrom=0; curbtn=0; //вверх списка |
|
|
642 |
Open_Dir(#path,1); |
|
|
643 |
}*/ |
|
|
644 |
|
|
|
645 |
//баг - если сверху, то сверху,а не снизу |
|
|
646 |
void Dir_Up() |
|
|
647 |
{ |
|
|
648 |
byte temp_[256]; |
|
|
649 |
i=strlen(#path)-1; |
|
|
650 |
path[i]=0x00; |
|
|
651 |
do i--; while (path[i]<>'/'); copystr(#path+i+1,#temp_); |
|
|
652 |
path[i+1]=0x00; |
|
|
653 |
ChangeCase(#temp_); |
|
|
654 |
za_kadrom=curbtn=0; //вверх списка |
|
|
655 |
Open_Dir(#path,2); |
|
|
656 |
FOR (i=kolichestvo; i>0; i--;) IF(strcmp(file_mas[i]*304+buf+72,#temp_)==0) BREAK; |
|
|
657 |
// |
|
|
658 |
if (i>kolichestvo-but_num) |
|
|
659 |
{ |
|
|
660 |
za_kadrom=kolichestvo-but_num; |
|
|
661 |
IF (strcmp(".",buf+72)<>0) curbtn=i-kolichestvo+but_num; ELSE curbtn=i-kolichestvo+but_num-1; |
|
|
662 |
} |
|
|
663 |
ELSE IF (strcmp(".",buf+72)<>0) FileList_ReDraw(i); ELSE FileList_ReDraw(i-1); |
|
|
664 |
List_ReDraw(); |
|
|
665 |
} |
|
|
666 |
|
|
|
667 |
|
|
|
668 |
void Preview() |
|
|
669 |
{ |
|
|
670 |
dword top_pr=dev_num*16+123; |
|
|
671 |
top_pr+=show_actions*51; //ничинаем ниже, если Акшнс видимы |
|
|
672 |
DeleteButton(78); |
|
|
673 |
if (show_preview==1) |
|
|
674 |
{ |
|
|
675 |
Tip(top_pr,"Preview",78,"\x19"); |
|
|
676 |
DrawBar(22,top_pr+18,160,100,0xFFFFFF); //белое |
|
|
677 |
//WriteText(30,top_pr+30,0x80,0,"kolichestvo:",0); WriteText(105,top_pr+30,0x80,0,IntToStr(kolichestvo),0); |
|
|
678 |
//WriteText(30,top_pr+40,0x80,0,"but_num:",0); WriteText(105,top_pr+40,0x80,0,IntToStr(but_num),0); |
|
|
679 |
//WriteText(30,top_pr+50,0x80,0,"curbtn",0); WriteText(105,top_pr+50,0x80,0,IntToStr(curbtn),0); |
|
|
680 |
//WriteText(30,top_pr+60,0x80,0,"ra_kadrom:",0); WriteText(105,top_pr+60,0x80,0,IntToStr(za_kadrom),0); |
|
|
681 |
//WriteText(30,top_pr+70,0x80,0,#file_path,0); |
|
|
682 |
//WriteText(30,top_pr+80,0x80,0,#file_name,0); |
|
|
683 |
WriteText(30,top_pr+60,0x80,0,"Not realized... Yet.",0); |
|
|
684 |
//WriteText(30,top_pr+70,0x80,0,"Nable, I'm waiting (:",0); |
|
|
685 |
DrawBar(22,top_pr+118,160,onTop(top_pr+118,6),0x00699C); //синее |
|
|
686 |
} |
|
|
687 |
ELSE { |
|
|
688 |
Tip(top_pr,"Preview",78,"\x18"); |
|
|
689 |
DrawBar(22,top_pr+18,160,onTop(top_pr+18,6),0x00699C); //синее |
|
|
690 |
} |
|
|
691 |
} |
|
|
692 |
|
|
|
693 |
|
|
|
694 |
void Goto_edit_path() |
|
|
695 |
{ |
|
|
696 |
IF (strcmp(#path,#edit_path)==0) return; //проверка не в этой ли мы папке |
|
|
697 |
IF (strcmp(#edit_path+strlen(#edit_path)-1,"/")<>0) copystr("/",#edit_path+strlen(#edit_path)); //если нет, + "/" |
|
|
698 |
Open_Dir(#edit_path,0); //проверяем если файлы в папке, так мы узнаём существует ли она |
|
|
699 |
IF (kolichestvo==-1) KEdit(); ELSE //просто очищаем полосу адреса |
|
|
700 |
{za_kadrom=curbtn=0; copystr(#edit_path,#path);}//наверх списка |
|
|
701 |
Open_Dir(#path,1); |
|
|
702 |
} |
|
|
703 |
|
|
|
704 |
|
|
|
705 |
inline fastcall void GoBack() //вначале удаляем текущий путь, а потом копируем то, что осталось |
|
|
706 |
{ |
|
|
707 |
//char old_dir[256]=''; |
|
|
708 |
i=strlen(#PathHistory)-2; |
|
|
709 |
// |
|
|
710 |
//WHILE (PathHistory[i]<>'/') { copystr(#PathHistory[i],#old_dir); i--; }; |
|
|
711 |
//old_dir[strlen(#old_dir)-1]=0x00; |
|
|
712 |
//DrawTitle(#old_dir); |
|
|
713 |
// |
|
|
714 |
WHILE (PathHistory[i]<>'|') { i--; }; |
|
|
715 |
IF (i>0) PathHistory[i]=0x00; |
|
|
716 |
WHILE (PathHistory[i]<>'|') { copystr(#PathHistory[i],#path); i--; } |
|
|
717 |
IF (i>0) PathHistory[i]=0x00; |
|
|
718 |
za_kadrom=curbtn=0; Open_Dir(#path,1); |
|
|
719 |
//FOR (i=0; i |
|
|
720 |
} |
|
|
721 |
|
|
|
722 |
|
|
|
723 |
stop: |