Subversion Repositories Kolibri OS

Rev

Rev 3440 | Rev 3444 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3440 Rev 3441
1 
//Leency & Veliant 2008-2013
 1 
//Leency & Veliant 2008-2013
2 
//GNU GPL licence.
 2 
//GNU GPL licence.
3 
 
 3 
 
4 
//êîïèðîâàòü ÷åðåç ïîòîê
 4 
//êîïèðîâàòü ÷åðåç ïîòîê
5 
 
 5 
 
6 
//libraries
 6 
//libraries
7 
#define MEMSIZE 0xA0000
 7 
#define MEMSIZE 0xA0000
8 
#include "..\lib\kolibri.h"
 8 
#include "..\lib\kolibri.h"
9 
#include "..\lib\strings.h"
 9 
#include "..\lib\strings.h"
10 
#include "..\lib\mem.h"
 10 
#include "..\lib\mem.h"
11 
#include "..\lib\dll.h"
 11 
#include "..\lib\dll.h"
12 
#include "..\lib\lib.obj\box_lib.h"
 12 
#include "..\lib\lib.obj\box_lib.h"
13 
#include "..\lib\file_system.h"
 13 
#include "..\lib\file_system.h"
14 
#include "..\lib\figures.h"
 14 
#include "..\lib\figures.h"
15 
#include "..\lib\encoding.h"
 15 
#include "..\lib\encoding.h"
16 
#include "..\lib\list_box.h"
 16 
#include "..\lib\list_box.h"
17 
#include "..\lib\copyf.h"
 17 
#include "..\lib\copyf.h"
18 
//images
 18 
//images
19 
#include "imgs\toolbar.txt"
 19 
#include "imgs\toolbar.txt"
20 
#include "imgs\left_p.txt"
 20 
#include "imgs\left_p.txt"
21 
 
 21 
 
22 
//for OpenDir
 22 
//for OpenDir
23 
#define ONLY_SHOW	0
 23 
#define ONLY_SHOW	0
24 
#define WITH_REDRAW	1
 24 
#define WITH_REDRAW	1
25 
#define ONLY_OPEN	2
 25 
#define ONLY_OPEN	2
26 
 
 26 
 
27 
#define TITLE "Eolite File Manager v1.81"
 27 
#define TITLE "Eolite File Manager v1.81"
28 
#define ABOUT_TITLE "Eolite v1.81"
 28 
#define ABOUT_TITLE "Eolite v1.81"
29 
dword col_work    = 0xE4DFE1;
 29 
dword col_work    = 0xE4DFE1;
30 
dword col_border  = 0x819FC5;
 30 
dword col_border  = 0x819FC5;
31 
dword col_padding = 0xC8C9C9;
 31 
dword col_padding = 0xC8C9C9;
32 
dword col_selec   = 0x94AECE;
 32 
dword col_selec   = 0x94AECE;
33 
dword col_lpanel  = 0x00699C;
 33 
dword col_lpanel  = 0x00699C;
34 
 
 34 
 
35 
int toolbar_buttons_x[7]={9,46,85,134,167,203};
 35 
int toolbar_buttons_x[7]={9,46,85,134,167,203};
36 
char tmp_disk_del_param[3]="d0";
 36 
char tmp_disk_del_param[3]="d0";
37 
struct path_string { char Item[4096]; };
 37 
struct path_string { char Item[4096]; };
38 
 
 38 
 
39 
llist files;
 39 
llist files;
40 
 
 40 
 
41 
byte
 41 
byte
42 
	path[4096],
 42 
	path[4096],
43 
	file_path[4096],
 43 
	file_path[4096],
44 
	file_name[256],
 44 
	file_name[256],
45 
	copy_file[4096],
 45 
	copy_file[4096],
46 
	temp[4096];
46 
	temp[4096];
47 
byte
 47 
byte
48 
	cut_active=0,
 48 
	cut_active=0,
49 
	rename_active=0,
 49 
	rename_active=0,
50 
	del_active=0,
 50 
	del_active=0,
51 
	show_dev_name=1,
 51 
	show_dev_name=1,
52 
	sort_num=2,
 52 
	sort_num=2,
53 
	isdir;
 53 
	itdir;
54 
 
 54 
 
55 
proc_info Form;
 55 
proc_info Form;
56 
mouse m;
 56 
mouse m;
57 
int mouse_dd, scroll_used, scroll_size;
 57 
int mouse_dd, scroll_used, scroll_size;
58 
dword buf, off;
 58 
dword buf, off;
59 
dword file_mas[6898];
 59 
dword file_mas[6898];
60 
int j, i;
 60 
int j, i;
61 
 
 61 
 
62 
edit_box edit2= {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,#mouse_dd,64,6,6};
 62 
edit_box edit2= {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,#mouse_dd,64,6,6};
63 
PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0};
 63 
PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0};
64 
PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0};
 64 
PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0};
65 
 
 65 
 
66 
#include "include\some_code.h"
 66 
#include "include\some_code.h"
67 
#include "include\about_dialog.h"
 67 
#include "include\about_dialog.h"
68 
#include "include\sorting.h"
 68 
#include "include\sorting.h"
69 
#include "include\icons_f.h"
 69 
#include "include\icons_f.h"
70 
#include "include\ini.h"
 70 
#include "include\ini.h"
71 
#include "include\left_panel.h"
 71 
#include "include\left_panel.h"
72 
#include "include\history.h"
 72 
#include "include\history.h"
73 
#include "include\file_menu.h"
 73 
#include "include\file_menu.h"
74 
 
 74 
 
75 
void main()
75 
void main()
76 
{
 76 
{
77 
	word key, id, can_show, can_select;
 77 
	word key, id, can_show, can_select;
78 
 
 78 
 
79 
	files.line_h=18;
 79 
	files.line_h=18;
80 
	mem_Init();
 80 
	mem_Init();
81 
	if (load_dll2(boxlib, #box_lib_init,0)!=0) notify("Error while loading library /rd/1/lib/box_lib.obj");
 81 
	if (load_dll2(boxlib, #box_lib_init,0)!=0) notify("Error while loading library /rd/1/lib/box_lib.obj");
82 
	SystemDiscsGet();
 82 
	SystemDiscsGet();
83 
	GetIni(1);
83 
	GetIni(1);
84 
	if (param)
 84 
	if (param)
85 
	{
 85 
	{
86 
		strcpy(#path, #param);
 86 
		strcpy(#path, #param);
87 
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string
 87 
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string
88 
	}
 88 
	}
89 
	else
 89 
	else
90 
		strcpy(#path, "/rd/1/");
90 
		strcpy(#path, "/rd/1/");
91 
	Open_Dir(#path,ONLY_OPEN);
 91 
	Open_Dir(#path,ONLY_OPEN);
92 
	SetEventMask(0x27);
 92 
	SetEventMask(0x27);
93 
	loop() switch(WaitEvent())
 93 
	loop() switch(WaitEvent())
94 
	{
 94 
	{
95 
		case evMouse:
 95 
		case evMouse:
96 
			IF (del_active) break;
96 
			IF (del_active) break;
97 
			id=GetProcessSlot(Form.ID);
97 
			id=GetProcessSlot(Form.ID);
98 
			IF (id<>GetActiveProcess()) || (Form.status_window>2) break;
 98 
			IF (id<>GetActiveProcess()) || (Form.status_window>2) break;
99 
			IF (rename_active) { edit_box_mouse stdcall(#edit2); break; }
 99 
			IF (rename_active) { edit_box_mouse stdcall(#edit2); break; }
100
100
101 
			m.get();
 101 
			m.get();
102 
 
 102 
 
103 
			if (m.x > files.x) && (m.x < files.x + files.w) && (m.y > files.y) && (m.y < files.y+files.h)
 103 
			if (m.x > files.x) && (m.x < files.x + files.w) && (m.y > files.y) && (m.y < files.y+files.h)
104 
			{
 104 
			{
105 
				if (m.lkm) can_select = 1;
 105 
				if (m.lkm) can_select = 1;
106 
				if (m.pkm)
 106 
				if (m.pkm)
107 
				{
 107 
				{
108 
					can_show = 1;
 108 
					can_show = 1;
109 
					if (m.y - 57 / files.line_h != files.current) can_select = 1;
 109 
					if (m.y - 57 / files.line_h != files.current) can_select = 1;
110 
				}
 110 
				}
111 
			}
 111 
			}
112 
 
 112 
 
113 
			//select/open file {
 113 
			//select/open file {
114 
			if (!m.lkm) && (!m.pkm) && (can_select)
 114 
			if (!m.lkm) && (!m.pkm) && (can_select)
115 
			{
 115 
			{
116 
				can_select = 0;
 116 
				can_select = 0;
117 
				if (m.y<57) break;
 117 
				if (m.y<57) break;
118 
				id = m.y - 57 / files.line_h;
 118 
				id = m.y - 57 / files.line_h;
119 
				if (files.current!=id) FileList_ReDraw(id-files.current);
 119 
				if (files.current!=id) FileList_ReDraw(id-files.current);
120 
				else Open();
 120 
				else Open();
121 
			};
 121 
			};
122 
			// } select/open file
 122 
			// } select/open file
123 
 
 123 
 
124 
			//file menu {
 124 
			//file menu {
125 
			if (!m.pkm) && (!m.lkm) && (can_show)
 125 
			if (!m.pkm) && (!m.lkm) && (can_show)
126 
			{
 126 
			{
127 
				can_show = 0;
 127 
				can_show = 0;
128 
				if (m.y<57) break;
 128 
				if (m.y<57) break;
129 
				SwitchToAnotherThread();
 129 
				SwitchToAnotherThread();
130 
				CreateThread(#FileMenu,#stak2);
 130 
				CreateThread(#FileMenu,#stak2);
131 
				break;
 131 
				break;
132 
			}
 132 
			}
133 
			// } file menu
 133 
			// } file menu
134 
 
 134 
 
135 
 
 135 
 
136 
			if (m.vert)
 136 
			if (m.vert)
137 
			{
 137 
			{
138 
				files.MouseScroll(m.vert);
 138 
				files.MouseScroll(m.vert);
139 
				List_ReDraw();
 139 
				List_ReDraw();
140 
				break;
 140 
				break;
141 
			}
 141 
			}
142 
 
 142 
 
143 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y<57)
 143 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y<57)
144 
			{
 144 
			{
145 
				IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),41,14,14,0xC7C7C7,0xFFFFFF);
 145 
				IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),41,14,14,0xC7C7C7,0xFFFFFF);
146 
				WHILE (m.lkm==1) && (files.first>0)
 146 
				WHILE (m.lkm==1) && (files.first>0)
147 
				{
 147 
				{
148 
					pause(8);
 148 
					pause(8);
149 
					files.first--;
 149 
					files.first--;
150 
					List_ReDraw();
 150 
					List_ReDraw();
151 
					m.get();
 151 
					m.get();
152 
				}
 152 
				}
153 
				DrawRectangle3D(onLeft(26,0),41,14,14,0xFFFFFF,0xC7C7C7);
 153 
				DrawRectangle3D(onLeft(26,0),41,14,14,0xFFFFFF,0xC7C7C7);
154 
			}
 154 
			}
155 
 
 155 
 
156 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y
 156 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y
157 
			{
 157 
			{
158 
				IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xC7C7C7,0xFFFFFF);
 158 
				IF (m.lkm==1) DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xC7C7C7,0xFFFFFF);
159 
				while (m.lkm==1) && (files.first
 159 
				while (m.lkm==1) && (files.first
160 
				{
 160 
				{
161 
					pause(8);
 161 
					pause(8);
162 
					files.first++;
 162 
					files.first++;
163 
					List_ReDraw();
 163 
					List_ReDraw();
164 
					m.get();
 164 
					m.get();
165 
				}
 165 
				}
166 
				DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xFFFFFF,0xC7C7C7);
 166 
				DrawRectangle3D(onLeft(26,0),onTop(21,0),14,14,0xFFFFFF,0xC7C7C7);
167 
			}
 167 
			}
168 
 
 168 
 
169 
			//Scrooll
 169 
			//Scrooll
170 
			if (!m.lkm) && (scroll_used) { scroll_used=NULL; Scroll(); }
 170 
			if (!m.lkm) && (scroll_used) { scroll_used=NULL; Scroll(); }
171 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y
 171 
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y
172
172
173 
			if (scroll_used)
 173 
			if (scroll_used)
174 
			{
 174 
			{
175 
				IF (scroll_size/2+57>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //anee eo?ni? iaa ieiii
 175 
				IF (scroll_size/2+57>m.y) || (m.y<0) || (m.y>4000) m.y=scroll_size/2+57; //anee eo?ni? iaa ieiii
176 
				id=files.first;
 176 
				id=files.first;
177 
				j= scroll_size/2;
 177 
				j= scroll_size/2;
178 
				files.first = m.y -j -57 * files.count;
 178 
				files.first = m.y -j -57 * files.count;
179 
				files.first /= onTop(22,57);
 179 
				files.first /= onTop(22,57);
180 
				IF (files.visible+files.first>files.count) files.first=files.count-files.visible;
 180 
				IF (files.visible+files.first>files.count) files.first=files.count-files.visible;
181 
				IF (id<>files.first) List_ReDraw();
 181 
				IF (id<>files.first) List_ReDraw();
182 
			}
 182 
			}
183 
			break;
183 
			break;
184 
//Button pressed-----------------------------------------------------------------------------
 184 
//Button pressed-----------------------------------------------------------------------------
185 
		case evButton:
 185 
		case evButton:
186 
			id=GetButtonID();
 186 
			id=GetButtonID();
187 
			if (id==1) ExitProcess();
 187 
			if (id==1) ExitProcess();
188 
			if (rename_active) break;
 188 
			if (rename_active) break;
189 
			if (del_active)
 189 
			if (del_active)
190 
			{
 190 
			{
191 
				IF (id==301) || (id==302) Del_File(302-id);
 191 
				IF (id==301) || (id==302) Del_File(302-id);
192 
				break;
 192 
				break;
193 
			}
 193 
			}
194
194
195 
			switch(id)
195 
			switch(id)
196 
			{
 196 
			{
197 
				case 21: //Back
 197 
				case 21: //Back
198 
						GoBack();
 198 
						GoBack();
199 
						break;
 199 
						break;
200 
				case 22: //Forward
 200 
				case 22: //Forward
201 
						if (HistoryPath(GO_FORWARD))
 201 
						if (HistoryPath(GO_FORWARD))
202 
						{
 202 
						{
203 
							files.first=files.current=NULL; //aaa?o nienea
 203 
							files.first=files.current=NULL; //aaa?o nienea
204 
							Open_Dir(#path,WITH_REDRAW);
 204 
							Open_Dir(#path,WITH_REDRAW);
205 
						}
 205 
						}
206 
						break;
 206 
						break;
207 
				case 23: //up!
 207 
				case 23: //up!
208 
						Dir_Up();
 208 
						Dir_Up();
209 
						break;
 209 
						break;
210 
				case 24: //cut
 210 
				case 24: //cut
211 
						key=24;
211 
						key=24;
212 
				case 25: //copy
 212 
				case 25: //copy
213 
						goto CTRLC_MARK;
 213 
						goto CTRLC_MARK;
214 
				case 26: //paste
 214 
				case 26: //paste
215 
						Paste();
 215 
						Paste();
216 
						break;
 216 
						break;
217 
				case 31...33: //sort
 217 
				case 31...33: //sort
218 
						IF(sort_num==1) DrawFilledBar(onLeft(192,168)/2+210,42,6,10);
 218 
						IF(sort_num==1) DrawFilledBar(onLeft(192,168)/2+210,42,6,10);
219 
						IF(sort_num==2) DrawFilledBar(onLeft(115,0),42,6,10);
 219 
						IF(sort_num==2) DrawFilledBar(onLeft(115,0),42,6,10);
220 
						IF(sort_num==3) DrawFilledBar(onLeft(44,0),42,6,10);
 220 
						IF(sort_num==3) DrawFilledBar(onLeft(44,0),42,6,10);
221 
						sort_num=id-30;
 221 
						sort_num=id-30;
222 
						Open_Dir(#path,WITH_REDRAW);
 222 
						Open_Dir(#path,WITH_REDRAW);
223 
						break;
 223 
						break;
224 
				case 50...60: //Actions
 224 
				case 50...60: //Actions
225 
						ActionsProcess(id-50);
 225 
						ActionsProcess(id-50);
226 
						break;
 226 
						break;
227 
				case 100...120:
 227 
				case 100...120:
228 
					DEVICE_MARK:
 228 
					DEVICE_MARK:
229 
						DrawRectangle3D(17,id-100*16+74,159,16, 0, 0); //auaaeaiea
 229 
						DrawRectangle3D(17,id-100*16+74,159,16, 0, 0); //auaaeaiea
230 
						strcpy(#path, #disk_list[id-100].Item);
 230 
						strcpy(#path, #disk_list[id-100].Item);
231 
						files.first=files.current=0;
 231 
						files.first=files.current=0;
232 
						Open_Dir(#path,1);
 232 
						Open_Dir(#path,1);
233 
						pause(5);
 233 
						pause(5);
234 
						DrawRectangle3D(17,id-100*16+74,159,16, 0xFFFFFF, 0xFFFFFF);
 234 
						DrawRectangle3D(17,id-100*16+74,159,16, 0xFFFFFF, 0xFFFFFF);
235 
						break;
 235 
						break;
236 
				case 130...160:
 236 
				case 130...160:
237 
						tmp_disk_del_param[1]=disk_list[id-130].Item[4];
 237 
						tmp_disk_del_param[1]=disk_list[id-130].Item[4];
238 
						RunProgram("/sys/tmpdisk", #tmp_disk_del_param);
 238 
						RunProgram("/sys/tmpdisk", #tmp_disk_del_param);
239 
						pause(10);
 239 
						pause(10);
240 
						SystemDiscsGet();
 240 
						SystemDiscsGet();
241 
						Open_Dir(#path,WITH_REDRAW);
 241 
						Open_Dir(#path,WITH_REDRAW);
242 
						DrawLeftPanel();
 242 
						DrawLeftPanel();
243 
						break;
 243 
						break;
244 
			}
 244 
			}
245 
			break;
 245 
			break;
246 
//Key pressed-----------------------------------------------------------------------------
 246 
//Key pressed-----------------------------------------------------------------------------
247 
		case evKey:
 247 
		case evKey:
248 
			key = GetKey();
 248 
			key = GetKey();
249 
			if (Form.status_window>2) break;
 249 
			if (Form.status_window>2) break;
250 
			IF (del_active)
 250 
			IF (del_active)
251 
			{
 251 
			{
252 
				IF (key==013) Del_File(true);
 252 
				IF (key==013) Del_File(true);
253 
				IF (key==027) Del_File(false);
 253 
				IF (key==027) Del_File(false);
254 
				break;
 254 
				break;
255 
			}
 255 
			}
256 
			IF (edit2.flags<>64) && (key<>13) && (key<>27)
 256 
			IF (edit2.flags<>64) && (key<>13) && (key<>27)
257 
			{
 257 
			{
258 
				EAX=key<<8;
 258 
				EAX=key<<8;
259 
				edit_box_key stdcall (#edit2);
 259 
				edit_box_key stdcall (#edit2);
260 
				break;
 260 
				break;
261 
			}
 261 
			}
262 
			switch (key)
 262 
			switch (key)
263 
			{
 263 
			{
264 
					case 209...217:
 264 
					case 209...217:
265 
							id=key-110;
 265 
							id=key-110;
266 
							IF (id-100>=disc_num) break;
 266 
							IF (id-100>=disc_num) break;
267 
							GOTO DEVICE_MARK;
 267 
							GOTO DEVICE_MARK;
268 
					case 008:
 268 
					case 008:
269 
							//GoBack();
 269 
							//GoBack();
270 
							Dir_Up();
 270 
							Dir_Up();
271 
							break;
271 
							break;
272 
					case 004: //Ctrl+D set as bg
 272 
					case 004: //Ctrl+D set as bg
273 
							strcpy(#temp, "\\S__");
 273 
							strcpy(#temp, "\\S__");
274 
							strcat(#temp, #file_path);
 274 
							strcat(#temp, #file_path);
275 
							RunProgram("/sys/media/kiv", #temp);
 275 
							RunProgram("/sys/media/kiv", #temp);
276 
							break;
 276 
							break;
277 
					case 014: //Ctrl+N new window
 277 
					case 014: //Ctrl+N new window
278 
							IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD);
 278 
							IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD);
279 
							RunProgram("/sys/File Managers/Eolite", #path);
 279 
							RunProgram("/sys/File Managers/Eolite", #path);
280 
							break;
280 
							break;
281 
					case 024: //Ctrl+X
 281 
					case 024: //Ctrl+X
282 
					case 003: //Ctrl+C
 282 
					case 003: //Ctrl+C
283 
							CTRLC_MARK:
 283 
							CTRLC_MARK:
284 
							IF (isdir) break;
 284 
							IF (itdir) break;
285 
							strcpy(#copy_file, #file_path);
 285 
							strcpy(#copy_file, #file_path);
286 
							IF (key==24) cut_active=1; ELSE cut_active=0;
286 
							IF (key==24) cut_active=1; ELSE cut_active=0;
287 
							break;
 287 
							break;
288 
					case 022: //Ctrl+V
 288 
					case 022: //Ctrl+V
289 
							Paste();
 289 
							Paste();
290 
							break;
 290 
							break;
291 
					case 027: //Esc
 291 
					case 027: //Esc
292 
							IF (rename_active==1) ReName(false);
 292 
							IF (rename_active==1) ReName(false);
293 
							break;
 293 
							break;
294 
					case 013: //Enter
 294 
					case 013: //Enter
295 
							IF (rename_active==1) {ReName(true); break;}
 295 
							IF (rename_active==1) {ReName(true); break;}
296 
							Open();
 296 
							Open();
297 
							break;
297 
							break;
298 
					case 178: //up
 298 
					case 178: //up
299 
							FileList_ReDraw(-1);
 299 
							FileList_ReDraw(-1);
300 
							break;
 300 
							break;
301 
					case 177: //down
 301 
					case 177: //down
302 
							FileList_ReDraw(1);
 302 
							FileList_ReDraw(1);
303 
							break;
 303 
							break;
304 
					case 180: //home
 304 
					case 180: //home
305 
							files.first=0;
 305 
							files.first=0;
306 
							files.current=0;
 306 
							files.current=0;
307 
							List_ReDraw();
 307 
							List_ReDraw();
308 
							break;
 308 
							break;
309 
					case 181: //end
 309 
					case 181: //end
310 
							files.first=files.count-files.visible;
 310 
							files.first=files.count-files.visible;
311 
							files.current=files.visible-1;
 311 
							files.current=files.visible-1;
312 
							List_ReDraw();
 312 
							List_ReDraw();
313 
							break;
 313 
							break;
314 
					case 183: //Page Down
 314 
					case 183: //Page Down
315 
							FileList_ReDraw(files.visible-1);
 315 
							FileList_ReDraw(files.visible-1);
316 
							break;
 316 
							break;
317 
					case 184: //Page Up
 317 
					case 184: //Page Up
318 
							FileList_ReDraw(-files.visible+1);
 318 
							FileList_ReDraw(-files.visible+1);
319 
							break;
 319 
							break;
320 
					case 182: //del
 320 
					case 182: //del
321 
							Del_Form();
 321 
							Del_Form();
322 
							break;
 322 
							break;
323 
					case 050...059: //F1-F10
 323 
					case 050...059: //F1-F10
324 
							ActionsProcess(key-49);
 324 
							ActionsProcess(key-49);
325 
							break;
325 
							break;
326 
					default:
326 
					default:
327 
							for (i=files.current+files.first+1; i
 327 
							for (i=files.current+files.first+1; i
328 
							{
 328 
							{
329 
								strcpy(#temp, file_mas[i]*304+buf+72);
 329 
								strcpy(#temp, file_mas[i]*304+buf+72);
330 
								IF (temp[0]==key) || (temp[0]==key-32)
 330 
								IF (temp[0]==key) || (temp[0]==key-32)
331 
								{
 331 
								{
332 
									FileList_ReDraw(i-files.current-files.first);
 332 
									FileList_ReDraw(i-files.current-files.first);
333 
									break;
 333 
									break;
334 
								}
 334 
								}
335 
							}
 335 
							}
336 
			}
336 
			}
337 
			break;
 337 
			break;
338 
		case evReDraw:
 338 
		case evReDraw:
339 
			DefineAndDrawWindow(40,20,550,500,0x73,col_work,TITLE);
 339 
			DefineAndDrawWindow(40,20,550,500,0x73,col_work,TITLE);
340 
			GetProcessInfo(#Form, SelfInfo);
 340 
			GetProcessInfo(#Form, SelfInfo);
341 
			if (Form.status_window>2) break;
 341 
			if (Form.status_window>2) break;
342 
			files.SetSizes(192, 57, onLeft(192,27), onTop(57,6), disc_num*16+195,files.line_h);
 342 
			files.SetSizes(192, 57, onLeft(192,27), onTop(57,6), disc_num*16+195,files.line_h);
343 
			if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h);
 343 
			if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h);
344 
			if (Form.width<480) MoveSize(OLD,OLD,480,OLD);
 344 
			if (Form.width<480) MoveSize(OLD,OLD,480,OLD);
345 
			GetProcessInfo(#Form, SelfInfo); //if win_size changed
 345 
			GetProcessInfo(#Form, SelfInfo); //if win_size changed
346 
			draw_window();
 346 
			draw_window();
347 
	}
 347 
	}
348 
}
 348 
}
349 
 
 349 
 
350 
 
 350 
 
351 
inline fastcall void draw_window()
 351 
inline fastcall void draw_window()
352 
{
352 
{
353 
	//toolbar
 353 
	//toolbar
354 
	PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal);
 354 
	PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal);
355 
	for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,col_work);
 355 
	for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,col_work);
356 
	for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,col_work);
 356 
	for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,col_work);
357 
	DrawBar(246,0,onLeft(246,60),12, col_work); //ôîí íàä ïîëîñîé àäðåñà
 357 
	DrawBar(246,0,onLeft(246,60),12, col_work); //ôîí íàä ïîëîñîé àäðåñà
358 
	DrawBar(246,29,onLeft(246,60),5,col_work);  //ôîí ïîä ïîëîñîé àäðåñà
 358 
	DrawBar(246,29,onLeft(246,60),5,col_work);  //ôîí ïîä ïîëîñîé àäðåñà
359 
	DrawRectangle3D(246,12,onLeft(66,246),16,col_border,col_border);
 359 
	DrawRectangle3D(246,12,onLeft(66,246),16,col_border,col_border);
360 
	DefineButton(onLeft(34,0),6,27,28,51+BT_HIDE+BT_NOFRAME,col_work); //about
 360 
	DefineButton(onLeft(34,0),6,27,28,51+BT_HIDE+BT_NOFRAME,col_work); //about
361 
	PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal);
 361 
	PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal);
362 
	//main rectangles
 362 
	//main rectangles
363 
	DrawRectangle3D(1,40,Form.cwidth-3,onTop(46,0),col_border,col_border);
 363 
	DrawRectangle3D(1,40,Form.cwidth-3,onTop(46,0),col_border,col_border);
364 
	DrawRectangle3D(0,39,Form.cwidth-1,onTop(44,0),col_palette[4],col_palette[4]); //bg
 364 
	DrawRectangle3D(0,39,Form.cwidth-1,onTop(44,0),col_palette[4],col_palette[4]); //bg
365 
	for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]);
365 
	for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]);
366 
	DrawLeftPanel();
 366 
	DrawLeftPanel();
367 
	//ListBox
 367 
	//ListBox
368 
	DrawFlatButton(files.x,40,onLeft(files.x,168),16,31,col_work,"File");
 368 
	DrawFlatButton(files.x,40,onLeft(files.x,168),16,31,col_work,"File");
369 
	DrawFlatButton(onLeft(168,0),40,73,16,32,col_work,"Type");
 369 
	DrawFlatButton(onLeft(168,0),40,73,16,32,col_work,"Type");
370 
	DrawFlatButton(onLeft(95,0),40,68,16,33,col_work,"Size");
 370 
	DrawFlatButton(onLeft(95,0),40,68,16,33,col_work,"Size");
371 
	DrawBar(onLeft(27,0),57,1,onTop(22,57),col_border); //line to the left from the scroll
 371 
	DrawBar(onLeft(27,0),57,1,onTop(22,57),col_border); //line to the left from the scroll
372 
	DrawFlatButton(onLeft(27,0),40,16,16,0,col_work,"\x18");
 372 
	DrawFlatButton(onLeft(27,0),40,16,16,0,col_work,"\x18");
373 
	DrawFlatButton(onLeft(27,0),onTop(22,0),16,16,0,col_work,"\x19");
 373 
	DrawFlatButton(onLeft(27,0),onTop(22,0),16,16,0,col_work,"\x19");
374 
	Open_Dir(#path,ONLY_SHOW);
 374 
	Open_Dir(#path,ONLY_SHOW);
375 
	if (del_active) Del_Form();
 375 
	if (del_active) Del_Form();
376 
	if (rename_active) ActionsProcess(2);
 376 
	if (rename_active) ActionsProcess(2);
377 
}
 377 
}
378 
 
 378 
 
379 
 
 379 
 
380 
void KEdit()
 380 
void KEdit()
381 
{
 381 
{
382 
	if (Form.width<480) return;
 382 
	if (Form.width<480) return;
383 
	PathShow.area_size_x = Form.cwidth-306;
 383 
	PathShow.area_size_x = Form.cwidth-306;
384 
	DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff);
 384 
	DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff);
385 
	PathShow_prepare stdcall(#PathShow);
 385 
	PathShow_prepare stdcall(#PathShow);
386 
	PathShow_draw stdcall(#PathShow);
 386 
	PathShow_draw stdcall(#PathShow);
387 
}
 387 
}
388 
 
 388 
 
389 
 
 389 
 
390 
void FileList_ReDraw(int cur)
 390 
void FileList_ReDraw(int cur)
391 
{
 391 
{
392 
	if (cur<=0) //up
 392 
	if (cur<=0) //up
393 
	{
 393 
	{
394 
		IF (files.first==0) && (files.current<=0) return;
 394 
		IF (files.first==0) && (files.current<=0) return;
395 
		IF (-cur-1
 395 
		IF (-cur-1
396 
		{
 396 
		{
397 
			Line_ReDraw(0xFFFFFF, files.current);
 397 
			Line_ReDraw(0xFFFFFF, files.current);
398 
			files.current+=cur;
 398 
			files.current+=cur;
399 
			Line_ReDraw(col_selec, files.current);
 399 
			Line_ReDraw(col_selec, files.current);
400 
			return;
 400 
			return;
401 
		}
 401 
		}
402 
		ELSE
 402 
		ELSE
403 
		{
 403 
		{
404 
			IF (-cur
 404 
			IF (-cur
405 
			files.current=0;
 405 
			files.current=0;
406 
			List_ReDraw();
 406 
			List_ReDraw();
407 
			return;
 407 
			return;
408 
		}
 408 
		}
409 
	}
 409 
	}
410 
	else  //down
 410 
	else  //down
411 
	{
 411 
	{
412 
		IF (files.first==files.count-files.visible) && (files.current==files.visible-1) return;
 412 
		IF (files.first==files.count-files.visible) && (files.current==files.visible-1) return;
413 
		IF (files.visible-files.current>cur)
 413 
		IF (files.visible-files.current>cur)
414 
		{
 414 
		{
415 
			Line_ReDraw(0xFFFFFF, files.current);
 415 
			Line_ReDraw(0xFFFFFF, files.current);
416 
			files.current+=cur;
 416 
			files.current+=cur;
417 
			Line_ReDraw(col_selec, files.current);
 417 
			Line_ReDraw(col_selec, files.current);
418 
			return;
 418 
			return;
419 
		}
 419 
		}
420 
		else
 420 
		else
421 
		{
 421 
		{
422 
			IF(files.first+files.current+cur>=files.count)
 422 
			IF(files.first+files.current+cur>=files.count)
423 
			{
 423 
			{
424 
				files.first=files.count-files.visible;
 424 
				files.first=files.count-files.visible;
425 
				files.current=cur-files.first+files.current;
 425 
				files.current=cur-files.first+files.current;
426 
				}
 426 
				}
427 
			ELSE
 427 
			ELSE
428 
			{
 428 
			{
429 
				files.first+=cur+files.current-files.visible+1;
 429 
				files.first+=cur+files.current-files.visible+1;
430 
				files.current=files.visible-1;
 430 
				files.current=files.visible-1;
431 
			}
 431 
			}
432
432
433 
			IF (files.current<0) || (files.current>files.visible)
 433 
			IF (files.current<0) || (files.current>files.visible)
434 
			{
 434 
			{
435 
				files.current=files.visible-1;
 435 
				files.current=files.visible-1;
436 
			}
 436 
			}
437 
			List_ReDraw();
 437 
			List_ReDraw();
438 
		}
 438 
		}
439 
	}
 439 
	}
440 
}
 440 
}
441 
 
 441 
 
442 
 
 442 
 
443 
 
 443 
 
444 
 
 444 
 
445 
void List_ReDraw()
 445 
void List_ReDraw()
446 
{
 446 
{
447 
	int paint_y;
 447 
	int paint_y;
448 
	//åñëè ìû â êîíöå ñïèñêà ôàéëîâ ðàçâåðí¸ì îêíî ïîÿâÿòüñÿ ïóñòÿå áåëûå êíîïêè
 448 
	//åñëè ìû â êîíöå ñïèñêà ôàéëîâ ðàçâåðí¸ì îêíî ïîÿâÿòüñÿ ïóñòÿå áåëûå êíîïêè
449 
	//ýòî åñëè âûäåëåíèå ïîñëå ñõëîïûâàíèÿ îêíà çà êàäðîì
 449 
	//ýòî åñëè âûäåëåíèå ïîñëå ñõëîïûâàíèÿ îêíà çà êàäðîì
450 
	if (files.count-files.firstfiles.visible-1)
 450 
	if (files.count-files.firstfiles.visible-1)
451 
	{ files.first=files.count-files.visible; files.current=files.visible-1; }
 451 
	{ files.first=files.count-files.visible; files.current=files.visible-1; }
452 
 
 452 
 
453 
	for (j=0; jj) Line_ReDraw(0xFFFFFF, j); else Line_ReDraw(col_selec, files.current);
 453 
	for (j=0; jj) Line_ReDraw(0xFFFFFF, j); else Line_ReDraw(col_selec, files.current);
454 
	//in the bottom
 454 
	//in the bottom
455 
	paint_y = j * files.line_h + files.y;
 455 
	paint_y = j * files.line_h + files.y;
456 
	DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF);
 456 
	DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF);
457 
	DrawBar(onLeft(168,0),paint_y,1,onTop(paint_y,6),col_work);
 457 
	DrawBar(onLeft(168,0),paint_y,1,onTop(paint_y,6),col_work);
458 
	DrawBar(onLeft(95,0),paint_y,1,onTop(paint_y,6),col_work);
 458 
	DrawBar(onLeft(95,0),paint_y,1,onTop(paint_y,6),col_work);
459 
	Scroll();
 459 
	Scroll();
460 
}
 460 
}
461 
 
 461 
 
462 
void Line_ReDraw(dword color, filenum){
 462 
void Line_ReDraw(dword color, filenum){
463 
	dword text_col=0, name_len=0, y=filenum*files.line_h+57;
 463 
	dword text_col=0, name_len=0, y=filenum*files.line_h+57;
464 
	DrawBar(192,y,3,files.line_h,color);
464 
	DrawBar(192,y,3,files.line_h,color);
465 
	DrawBar(192+19,y,onLeft(46,192),files.line_h,color); DrawBar(195,y+17,16,1,color);
 465 
	DrawBar(192+19,y,onLeft(46,192),files.line_h,color); DrawBar(195,y+17,16,1,color);
466 
	if (files.line_h>18) DrawBar(195,y+18,16,files.line_h-18,color);
 466 
	if (files.line_h>18) DrawBar(195,y+18,16,files.line_h-18,color);
467 
	if (files.line_h>15) DrawBar(195,y,16,files.line_h-15,color);
467 
	if (files.line_h>15) DrawBar(195,y,16,files.line_h-15,color);
468 
 
 468 
 
469 
	off=file_mas[filenum+files.first]*304 + buf+72;
 469 
	off=file_mas[filenum+files.first]*304 + buf+72;
470 
 
 470 
 
471 
	if (!TestBit(ESDWORD[off-40], 4)) //file or folder?
 471 
	if (!TestBit(ESDWORD[off-40], 4)) //file or folder?
472 
	{
472 
	{
473 
		strcpy(#temp, off);
 473 
		strcpy(#temp, off);
474 
		Put_icon(#temp+_strrchr(#temp,'.'), files.line_h/2-7+y, color);
 474 
		Put_icon(#temp+_strrchr(#temp,'.'), files.line_h/2-7+y, color);
475 
		WriteText(7-strlen(ConvertMemSize(ESDWORD[off-8]))*6+onLeft(75,0),files.line_h-6/2+y,0x80,0,ConvertMemSize(ESDWORD[off-8])); //size
 475 
		WriteText(7-strlen(ConvertMemSize(ESDWORD[off-8]))*6+onLeft(75,0),files.line_h-6/2+y,0x80,0,ConvertMemSize(ESDWORD[off-8])); //size
476 
	}
 476 
	}
477 
	else
 477 
	else
478 
		if (!strcmp("..",off))
 478 
		if (!strcmp("..",off))
479 
			Put_icon("..", files.line_h/2-7+y, color);
 479 
			Put_icon("..", files.line_h/2-7+y, color);
480 
		else
 480 
		else
481 
			Put_icon("", files.line_h/2-7+y, color);
 481 
			Put_icon("", files.line_h/2-7+y, color);
482 
	if (TestBit(ESDWORD[off-40],1)) || (TestBit(ESDWORD[off-40],2)) text_col=0xA6A6B7; //system or hiden?
 482 
	if (TestBit(ESDWORD[off-40],1)) || (TestBit(ESDWORD[off-40],2)) text_col=0xA6A6B7; //system or hiden?
483 
	if (color<>0xFFFfff)
 483 
	if (color<>0xFFFfff)
484 
	{
 484 
	{
485 
		isdir=TestBit(ESDWORD[off-40], 4);
485 
		itdir=TestBit(ESDWORD[off-40], 4);
486 
		strcpy(#file_name, off);
 486 
		strcpy(#file_name, off);
487 
		strcpy(#file_path, #path);
 487 
		strcpy(#file_path, #path);
488 
		strcat(#file_path, #file_name);
 488 
		strcat(#file_path, #file_name);
489 
		if (text_col==0xA6A6B7) text_col=0xFFFFFF;
 489 
		if (text_col==0xA6A6B7) text_col=0xFFFFFF;
490 
	}
 490 
	}
491 
	if (Form.width>=480)
 491 
	if (Form.width>=480)
492 
	{
 492 
	{
493 
		FileShow.font_color = text_col;
 493 
		FileShow.font_color = text_col;
494 
		FileShow.area_size_x = Form.width - 380;
 494 
		FileShow.area_size_x = Form.width - 380;
495 
		FileShow.text_pointer = off;
 495 
		FileShow.text_pointer = off;
496 
		FileShow.start_y = files.line_h/2-3+y;
 496 
		FileShow.start_y = files.line_h/2-3+y;
497 
		PathShow_prepare stdcall(#FileShow);
 497 
		PathShow_prepare stdcall(#FileShow);
498 
		PathShow_draw stdcall(#FileShow);
 498 
		PathShow_draw stdcall(#FileShow);
499 
	}
 499 
	}
500 
	DrawBar(onLeft(168,0),y,1,files.line_h,col_work); //gray line 1
 500 
	DrawBar(onLeft(168,0),y,1,files.line_h,col_work); //gray line 1
501 
	DrawBar(onLeft(95,0),y,1,files.line_h,col_work); //gray line 2
 501 
	DrawBar(onLeft(95,0),y,1,files.line_h,col_work); //gray line 2
502 
}
 502 
}
503 
 
 503 
 
504 
 
 504 
 
505 
void Open_Dir(dword temp_, redraw){
 505 
void Open_Dir(dword temp_, redraw){
506 
	int errornum, count;
 506 
	int errornum, count;
507 
	char path_[4096],
 507 
	char path_[4096],
508 
	somelen=strlen(temp_)-1;
 508 
	somelen=strlen(temp_)-1;
509 
 
 509 
 
510 
	if (redraw<>ONLY_SHOW)
 510 
	if (redraw<>ONLY_SHOW)
511 
	{
 511 
	{
512 
		strcpy(#path_, temp_);
 512 
		strcpy(#path_, temp_);
513 
		if (somelen) path_[somelen]=NULL;
 513 
		if (somelen) path_[somelen]=NULL;
514
514
515 
		if (buf) free(buf);
 515 
		if (buf) free(buf);
516 
    	buf = malloc(32);
 516 
    	buf = malloc(32);
517 
		errornum=ReadDir(0, buf, #path_);
 517 
		errornum=ReadDir(0, buf, #path_);
518 
		if (errornum<>0)
 518 
		if (errornum<>0)
519 
		{
 519 
		{
520 
			HistoryPath(ADD_NEW_PATH);
 520 
			HistoryPath(ADD_NEW_PATH);
521 
			GoBack();
 521 
			GoBack();
522 
			Write_Error(errornum);
 522 
			Write_Error(errornum);
523 
			return;
 523 
			return;
524 
		}
 524 
		}
525 
    	files.count = ESDWORD[buf+8];
 525 
    	files.count = ESDWORD[buf+8];
526 
    	buf = realloc(buf, files.count * 304 + 32);
 526 
    	buf = realloc(buf, files.count * 304 + 32);
527 
		ReadDir(files.count, buf, #path_);
 527 
		ReadDir(files.count, buf, #path_);
528 
		files.count=EBX;
 528 
		files.count=EBX;
529 
		count = sizeof(file_mas)/sizeof(dword)-1;
 529 
		count = sizeof(file_mas)/sizeof(dword)-1;
530 
		if (files.count>count) files.count=count;
 530 
		if (files.count>count) files.count=count;
531
531
532 
	}
 532 
	}
533 
	if (files.count<>-1)
 533 
	if (files.count<>-1)
534 
	{
 534 
	{
535 
		KEdit();
 535 
		KEdit();
536 
		HistoryPath(ADD_NEW_PATH);
 536 
		HistoryPath(ADD_NEW_PATH);
537 
		IF (!strcmp(".",buf+72)) {files.count--; memmov(buf,buf+304,files.count*304);} //oeeuo?oai yeaiaio "."
 537 
		IF (!strcmp(".",buf+72)) {files.count--; memmov(buf,buf+304,files.count*304);} //oeeuo?oai yeaiaio "."
538 
		files.visible=onTop(6,57)/files.line_h;
 538 
		files.visible=onTop(6,57)/files.line_h;
539 
		IF (files.count
 539 
		IF (files.count
540 
		IF (sort_num==1) WriteText(Form.width+60/2,45,0x80,0x4E78AC,"\x19");
 540 
		IF (sort_num==1) WriteText(Form.width+60/2,45,0x80,0x4E78AC,"\x19");
541 
		IF (sort_num==2) WriteText(Form.width-115,45,0x80,0x4E78AC,"\x19");
 541 
		IF (sort_num==2) WriteText(Form.width-115,45,0x80,0x4E78AC,"\x19");
542 
		IF (sort_num==3) WriteText(Form.width-44,45,0x80,0x4E78AC,"\x19");
 542 
		IF (sort_num==3) WriteText(Form.width-44,45,0x80,0x4E78AC,"\x19");
543 
		IF (redraw<>ONLY_SHOW) Sorting();
 543 
		IF (redraw<>ONLY_SHOW) Sorting();
544 
		IF (redraw<>ONLY_OPEN) List_ReDraw();
 544 
		IF (redraw<>ONLY_OPEN) List_ReDraw();
545 
	}
 545 
	}
546 
	IF (files.count==-1) && (redraw<>ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();}
 546 
	IF (files.count==-1) && (redraw<>ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();}
547 
}
 547 
}
548 
 
 548 
 
549 
 
 549 
 
550 
 
 550 
 
551 
inline Sorting()
 551 
inline Sorting()
552 
{
 552 
{
553 
	dword k=0, l=1;
 553 
	dword k=0, l=1;
554 
	int i;
 554 
	int i;
555 
	if (!strcmp(#path,"/")) //do not sort
 555 
	if (!strcmp(#path,"/")) //do not sort
556 
	{
 556 
	{
557 
		FOR(k=1;k
 557 
		FOR(k=1;k
558 
		return;
 558 
		return;
559 
	}
 559 
	}
560 
	FOR (j=files.count-1, off=files.count-1*304+buf+32; j>=0; j--, off-=304;)  //files | folders
 560 
	FOR (j=files.count-1, off=files.count-1*304+buf+32; j>=0; j--, off-=304;)  //files | folders
561 
	{
 561 
	{
562 
		strttl(off+40);
 562 
		strttl(off+40);
563 
		if (TestBit(ESDWORD[off],4)) //isdir?
 563 
		if (TestBit(ESDWORD[off],4)) //directory?
564 
		{
 564 
		{
565 
			file_mas[k]=j;
 565 
			file_mas[k]=j;
566 
			k++;
 566 
			k++;
567 
		}
 567 
		}
568 
		else
 568 
		else
569 
		{
 569 
		{
570 
			file_mas[files.count-l]=j;
 570 
			file_mas[files.count-l]=j;
571 
			l++;
 571 
			l++;
572 
		}
 572 
		}
573 
	}
 573 
	}
574 
	//sorting: files first, then folders
 574 
	//sorting: files first, then folders
575 
	Sort_by_Name(0,k-1);
 575 
	Sort_by_Name(0,k-1);
576 
	IF (sort_num==1) Sort_by_Name(k,files.count-1);
 576 
	IF (sort_num==1) Sort_by_Name(k,files.count-1);
577 
	IF (sort_num==2) Sort_by_Type(k,files.count-1);
 577 
	IF (sort_num==2) Sort_by_Type(k,files.count-1);
578 
	IF (sort_num==3) Sort_by_Size(k,files.count-1);
 578 
	IF (sort_num==3) Sort_by_Size(k,files.count-1);
579 
	//".." should be first
 579 
	//".." should be first
580 
	IF (k>0) && (strcmp(file_mas[0]*304+buf+72,"..")<>0) FOR(k--; k>0; k--;) IF (!strcmp(file_mas[k]*304+buf+72,"..")) file_mas[k]>
 580 
	IF (k>0) && (strcmp(file_mas[0]*304+buf+72,"..")<>0) FOR(k--; k>0; k--;) IF (!strcmp(file_mas[k]*304+buf+72,"..")) file_mas[k]>
581 
}
 581 
}
582 
 
 582 
 
583 
 
 583 
 
584 
void Del_Form()
 584 
void Del_Form()
585 
{
 585 
{
586 
	int dform_x=Form.width/2-13;
 586 
	int dform_x=Form.width/2-13;
587 
	//oeia ieii
 587 
	//oeia ieii
588 
	if (!files.count) return;
 588 
	if (!files.count) return;
589 
	DrawFlatButton(dform_x,160,200,80,0,col_work, ""); //oi?ia
 589 
	DrawFlatButton(dform_x,160,200,80,0,col_work, ""); //oi?ia
590 
	WriteText(dform_x+19,175,0x80,0,"Do you really want to delete");
 590 
	WriteText(dform_x+19,175,0x80,0,"Do you really want to delete");
591 
	IF (strlen(#file_name)<28)
591 
	IF (strlen(#file_name)<28)
592 
		{
 592 
		{
593 
			WriteText(strlen(#file_name)*6+dform_x+20,190,0x80,0,"?");
 593 
			WriteText(strlen(#file_name)*6+dform_x+20,190,0x80,0,"?");
594 
			WriteText(dform_x+20,190,0x80,0,#file_name); //ieoai eiy
 594 
			WriteText(dform_x+20,190,0x80,0,#file_name); //ieoai eiy
595 
		}
 595 
		}
596 
	ELSE
 596 
	ELSE
597 
		{
 597 
		{
598 
			WriteText(164+dform_x,190,0x80,0,"...?");
 598 
			WriteText(164+dform_x,190,0x80,0,"...?");
599 
			ESI = 24;
 599 
			ESI = 24;
600 
			WriteText(dform_x+20,190,0,0,#file_name); //ieoai eiy
 600 
			WriteText(dform_x+20,190,0,0,#file_name); //ieoai eiy
601 
		}
 601 
		}
602 
	//eiiii?ee
 602 
	//eiiii?ee
603 
	DrawFlatButton(dform_x+20,208,70,20,301,0xFFB6B5,"Yes");
 603 
	DrawFlatButton(dform_x+20,208,70,20,301,0xFFB6B5,"Yes");
604 
	DrawFlatButton(dform_x+111,208,70,20,302,0xC6DFC6,"No");
 604 
	DrawFlatButton(dform_x+111,208,70,20,302,0xC6DFC6,"No");
605 
	del_active=1;
 605 
	del_active=1;
606 
}
 606 
}
607 
 
 607 
 
608
608
609 
void Del_File(byte dodel)
 609 
void Del_File(byte dodel)
610 
{
610 
{
611 
	int del_rezult;
 611 
	int del_rezult;
612 
	IF (dodel==true)
 612 
	IF (dodel==true)
613 
	{
 613 
	{
614 
		del_rezult = DeleteFile(#file_path);
 614 
		del_rezult = DeleteFile(#file_path);
615 
		IF (del_rezult<>0)
 615 
		IF (del_rezult<>0)
616 
		{
 616 
		{
617 
			Write_Error(del_rezult);
 617 
			Write_Error(del_rezult);
618 
			IF ( isdir) ShowMessage("Error. Folder isn't empty.");
 618 
			IF ( itdir) ShowMessage("Error. Folder isn't empty.");
619 
			IF (!isdir) ShowMessage("Error. Filesystem read-only.");
 619 
			IF (!itdir) ShowMessage("Error. Filesystem read-only.");
620 
		}
 620 
		}
621 
 	}
 621 
 	}
622 
	del_active=0;
 622 
	del_active=0;
623 
	DeleteButton(301); DeleteButton(302);
 623 
	DeleteButton(301); DeleteButton(302);
624 
	Open_Dir(#path,1);
 624 
	Open_Dir(#path,1);
625 
}
625 
}
626 
 
 626 
 
627 
void Paste()
 627 
void Paste()
628 
{
 628 
{
629 
	char new_copy_path[4096];
 629 
	char new_copy_path[4096];
630 
	int copy_rezult;
 630 
	int copy_rezult;
631
631
632 
	IF (!copy_file) return;
 632 
	IF (!copy_file) return;
633 
	strcpy(#new_copy_path, #path);
 633 
	strcpy(#new_copy_path, #path);
634 
	strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
 634 
	strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
635 
	if (!strcmp(#copy_file,#new_copy_path))
 635 
	if (!strcmp(#copy_file,#new_copy_path))
636 
	{
 636 
	{
637 
		strcpy(#new_copy_path, #path);
 637 
		strcpy(#new_copy_path, #path);
638 
		strcat(#new_copy_path, "new_");
 638 
		strcat(#new_copy_path, "new_");
639 
		strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
 639 
		strcat(#new_copy_path, #copy_file+strrchr(#copy_file,'/'));
640 
	}
 640 
	}
641 
	copy_rezult = CopyFile(#copy_file,#new_copy_path);
 641 
	copy_rezult = CopyFile(#copy_file,#new_copy_path);
642 
	IF (copy_rezult!=0)
 642 
	IF (copy_rezult!=0)
643 
	{
 643 
	{
644 
		Write_Error(copy_rezult);
 644 
		Write_Error(copy_rezult);
645 
		return;
 645 
		return;
646 
	}
 646 
	}
647 
	IF (cut_active)
 647 
	IF (cut_active)
648 
	{
 648 
	{
649 
		strcpy(#file_path, #copy_file);
 649 
		strcpy(#file_path, #copy_file);
650 
		Del_File(true);
 650 
		Del_File(true);
651 
		copy_file=NULL;
 651 
		copy_file=NULL;
652 
		cut_active=false;
 652 
		cut_active=false;
653 
	}
 653 
	}
654 
	SelectFile(#new_copy_path+strrchr(#new_copy_path,'/'));
 654 
	SelectFile(#new_copy_path+strrchr(#new_copy_path,'/'));
655 
}
 655 
}
656 
 
 656 
 
657 
 
 657 
 
658 
void ReName(byte rename)
 658 
void ReName(byte rename)
659 
{
 659 
{
660 
	int del_rezult, copy_rezult;
 660 
	int del_rezult, copy_rezult;
661 
	char edit_name[256];
 661 
	char edit_name[256];
662 
	rename_active=0;
 662 
	rename_active=0;
663 
	edit2.flags=64;
 663 
	edit2.flags=64;
664 
	if (rename==true)
 664 
	if (rename==true)
665 
	{
 665 
	{
666 
		strcpy(#temp, #path);
 666 
		strcpy(#temp, #path);
667 
		strcpy(#edit_name, #file_name); //save edit name to select it later
 667 
		strcpy(#edit_name, #file_name); //save edit name to select it later
668 
		strcat(#temp, #file_name);
 668 
		strcat(#temp, #file_name);
669 
		if (strcmp(#file_path,#temp)<>0) && (file_name)
 669 
		if (strcmp(#file_path,#temp)<>0) && (file_name)
670 
		IF (isdir)
 670 
		IF (itdir)
671 
		{
 671 
		{
672 
			del_rezult = DeleteFile(#file_path);
 672 
			del_rezult = DeleteFile(#file_path);
673 
			IF (del_rezult!=0)
 673 
			IF (del_rezult!=0)
674 
			{
 674 
			{
675 
				Write_Error(del_rezult);
 675 
				Write_Error(del_rezult);
676 
				ShowMessage("Error. Folder isn't empty.");
 676 
				ShowMessage("Error. Folder isn't empty.");
677 
				return;
 677 
				return;
678 
			}
 678 
			}
679 
			ELSE CreateDir(#temp);
 679 
			ELSE CreateDir(#temp);
680 
			Open_Dir(#path,1);
 680 
			Open_Dir(#path,1);
681 
		}
 681 
		}
682 
		ELSE
 682 
		ELSE
683 
		{
 683 
		{
684 
			copy_rezult = CopyFile(#file_path,#temp);
 684 
			copy_rezult = CopyFile(#file_path,#temp);
685 
			if (copy_rezult!=0) Write_Error(copy_rezult); else Del_File(true);
 685 
			if (copy_rezult!=0) Write_Error(copy_rezult); else Del_File(true);
686 
		}
 686 
		}
687 
		SelectFile(#edit_name);
 687 
		SelectFile(#edit_name);
688 
	}
 688 
	}
689 
	Line_ReDraw(col_selec,files.current);
 689 
	Line_ReDraw(col_selec,files.current);
690 
}
 690 
}
691 
 
 691 
 
692 
 
 692 
 
693 
void SelectFile(dword that_file)
 693 
void SelectFile(dword that_file)
694 
{
 694 
{
695 
	files.first=files.current=0;
 695 
	files.first=files.current=0;
696 
   	Open_Dir(#path,ONLY_OPEN);
 696 
   	Open_Dir(#path,ONLY_OPEN);
697 
	strttl(that_file);
 697 
	strttl(that_file);
698 
	for (i=files.count-1; i>=0; i--;)
 698 
	for (i=files.count-1; i>=0; i--;)
699 
		if (!strcmp(file_mas[i]*304+buf+72,that_file)) break;
 699 
		if (!strcmp(file_mas[i]*304+buf+72,that_file)) break;
700 
	FileList_ReDraw(i);
 700 
	FileList_ReDraw(i);
701 
	List_ReDraw();
 701 
	List_ReDraw();
702 
}
 702 
}
703 
 
 703 
 
704 
 
 704 
 
705 
void Dir_Up()
 705 
void Dir_Up()
706 
{
 706 
{
707 
	char cur_folder[4096];
 707 
	char cur_folder[4096];
708 
	i=strlen(#path)-1;
 708 
	i=strlen(#path)-1;
709 
	if (i==0) return;
 709 
	if (i==0) return;
710 
	path[i]=0x00;
 710 
	path[i]=0x00;
711 
	i = strrchr(#path, '/');
 711 
	i = strrchr(#path, '/');
712 
	strcpy(#cur_folder, #path+i);
 712 
	strcpy(#cur_folder, #path+i);
713 
	path[i]=0x00;
 713 
	path[i]=0x00;
714 
	SelectFile(#cur_folder);
 714 
	SelectFile(#cur_folder);
715 
}
 715 
}
716 
 
 716 
 
717 
void Open()
 717 
void Open()
718 
{
 718 
{
719 
	if (!isdir)
 719 
	if (!itdir)
720 
	{
 720 
	{
721 
		GetIni(0);
 721 
		GetIni(0);
722 
	}
722 
	}
723 
	else
 723 
	else
724 
	{
 724 
	{
725 
		if (!strcmp(#file_name,"..")) { Dir_Up(); return; }
 725 
		if (!strcmp(#file_name,"..")) { Dir_Up(); return; }
726 
		strcpy(#path, #file_path);
 726 
		strcpy(#path, #file_path);
727 
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end
 727 
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end
728 
		files.first=files.current=0;
 728 
		files.first=files.current=0;
729 
		Open_Dir(#path,1);
 729 
		Open_Dir(#path,1);
730 
	}
 730 
	}
731 
}
 731 
}
732 
 
 732 
 
733 
 
 733 
 
734 
inline fastcall void GoBack()
 734 
inline fastcall void GoBack()
735 
{
 735 
{
736 
	char cur_folder[4096];
 736 
	char cur_folder[4096];
737 
	strcpy(#cur_folder, GetCurrentFolder());
 737 
	strcpy(#cur_folder, GetCurrentFolder());
738 
	if (HistoryPath(GO_BACK)) SelectFile(#cur_folder);
 738 
	if (HistoryPath(GO_BACK)) SelectFile(#cur_folder);
739 
}
 739 
}
740 
 
 740 
 
741 
void ActionsProcess(char N)
 741 
void ActionsProcess(char N)
742 
{
 742 
{
743 
	switch(N)
 743 
	switch(N)
744 
	{
 744 
	{
745 
		case 1:
 745 
		case 1:
746 
			SwitchToAnotherThread();
 746 
			SwitchToAnotherThread();
747 
			CreateThread(#about_dialog,#stak1);
 747 
			CreateThread(#about_dialog,#stak1);
748 
			break;
 748 
			break;
749 
		case 2:
 749 
		case 2:
750 
			if (!files.count) break;
 750 
			if (!files.count) break;
751 
			edit2.flags=100000000000010b; //set active
 751 
			edit2.flags=100000000000010b; //set active
752 
			edit2.width=onLeft(24,217);
 752 
			edit2.width=onLeft(24,217);
753 
			edit2.top=files.current*files.line_h+59;
 753 
			edit2.top=files.current*files.line_h+59;
754 
			edit2.size=edit2.pos=strlen(#file_name);
 754 
			edit2.size=edit2.pos=strlen(#file_name);
755 
			edit_box_draw  stdcall (#edit2);
 755 
			edit_box_draw  stdcall (#edit2);
756 
			DrawBar(213,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg
 756 
			DrawBar(213,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg
757 
			rename_active=1;
 757 
			rename_active=1;
758 
			break;
 758 
			break;
759 
		case 3:
 759 
		case 3:
760 
			IF (!isdir) RunProgram("/sys/tinypad", #file_path);
 760 
			IF (!itdir) RunProgram("/sys/tinypad", #file_path);
761 
			break;
 761 
			break;
762 
		case 4:
 762 
		case 4:
763 
			IF (!isdir) RunProgram("/sys/develop/heed", #file_path);
 763 
			IF (!itdir) RunProgram("/sys/develop/heed", #file_path);
764 
			break;
 764 
			break;
765 
		case 5: //refresh cur dir & devs
 765 
		case 5: //refresh cur dir & devs
766 
			Tip(56, "Devices", 55, "-");
 766 
			Tip(56, "Devices", 55, "-");
767 
			Open_Dir(#path,WITH_REDRAW);
 767 
			Open_Dir(#path,WITH_REDRAW);
768 
			pause(10);
 768 
			pause(10);
769 
			GetIni(1);
 769 
			GetIni(1);
770 
			SystemDiscsGet();
 770 
			SystemDiscsGet();
771 
			Open_Dir(#path,1);
 771 
			Open_Dir(#path,1);
772 
			DrawLeftPanel();
 772 
			DrawLeftPanel();
773 
			break;
 773 
			break;
774 
		case 6:
 774 
		case 6:
775 
			strcpy(#temp, #path);
 775 
			strcpy(#temp, #path);
776 
			strcat(#temp, "New folder");
 776 
			strcat(#temp, "New folder");
777 
			CreateDir(#temp);
 777 
			CreateDir(#temp);
778 
			if (!EAX){
 778 
			if (!EAX){
779 
				SelectFile("New folder");
 779 
				SelectFile("New folder");
780 
				ActionsProcess(2);
 780 
				ActionsProcess(2);
781 
			}
 781 
			}
782 
			else
 782 
			else
783 
			{
 783 
			{
784 
				Write_Error(EAX);
 784 
				Write_Error(EAX);
785 
				ShowMessage("Folder can not be created.");
 785 
				ShowMessage("Folder can not be created.");
786 
			}
 786 
			}
787 
			break;
 787 
			break;
788 
		case 7:
 788 
		case 7:
789 
			strcpy(#temp, #path);
 789 
			strcpy(#temp, #path);
790 
			strcat(#temp, "New file");
 790 
			strcat(#temp, "New file");
791 
			WriteFile(0, 0, #temp);
 791 
			WriteFile(0, 0, #temp);
792 
			if (!EAX){
 792 
			if (!EAX){
793 
				SelectFile("New file");
 793 
				SelectFile("New file");
794 
				ActionsProcess(2);
 794 
				ActionsProcess(2);
795 
			}
 795 
			}
796 
			else
 796 
			else
797 
			{
 797 
			{
798 
				Write_Error(EAX);
 798 
				Write_Error(EAX);
799 
				ShowMessage("File can not be created.");
 799 
				ShowMessage("File can not be created.");
800 
			}
 800 
			}
801 
			break;
 801 
			break;
802 
		case 10: //F10
 802 
		case 10: //F10
803 
			RunProgram(EDITOR_PATH, abspath("Eolite.ini"));
 803 
			RunProgram(EDITOR_PATH, abspath("Eolite.ini"));
804 
			break;
 804 
			break;
805 
	}
 805 
	}
806 
}
 806 
}
807 
 
 807 
 
808 
void copyf_Action() {
 808 
void copyf_Action() {
809 
	return;
 809 
	return;
810 
}
 810 
}
811 
 
 811 
 
812 
stop:
 812 
stop:
813 
 
 813 
 
814 
char stak1[512];
 814 
char stak1[512];
815 
char stak2[512];
 815 
char stak2[512];
816 
}
 816 
}
817 
 
 817 
 
818 
 
 818 
 
819 
void>
 819 
void>
820 
>
 820 
>
821 
>
 821 
>
822 
>
 822 
>
823 
>
 823 
>
824 
>
 824 
>
825 
>
 825 
>