Subversion Repositories Kolibri OS

Rev

Rev 5555 | Rev 5557 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5481 leency 1
//Leency, Veliant, Punk_Joker & KolibriOS Team 2008-2015
3363 leency 2
//GNU GPL licence.
3
 
4022 leency 4
#ifndef AUTOBUILD
5
#include "lang.h--"
6
#endif
7
 
3363 leency 8
//libraries
4049 leency 9
#define MEMSIZE 0xD0000
3363 leency 10
#include "..\lib\kolibri.h"
4427 punk_joker 11
#include "..\lib\clipboard.h"
3363 leency 12
#include "..\lib\strings.h"
13
#include "..\lib\mem.h"
14
#include "..\lib\dll.h"
15
#include "..\lib\file_system.h"
5499 leency 16
#include "..\lib\gui.h"
3434 leency 17
#include "..\lib\list_box.h"
18
#include "..\lib\copyf.h"
4863 leency 19
#include "..\lib\random.h"
5487 leency 20
//obj
5499 leency 21
#include "..\lib\obj\libini.h"
22
#include "..\lib\obj\box_lib.h"
3363 leency 23
//images
24
#include "imgs\toolbar.txt"
25
#include "imgs\left_p.txt"
4846 leency 26
#include "imgs\icons.txt"
3363 leency 27
 
3848 punk_joker 28
#ifdef LANG_RUS
29
	?define T_FILE "Файл"
30
	?define T_TYPE "Тип"
31
	?define T_SIZE "Размер"
32
	?define T_NEW_FOLDER "Новая папка"
33
	?define T_NEW_FILE "Новый файл"
34
	?define T_DELETE_FILE "Вы действительно хотите удалить"
35
	?define T_YES "Да"
36
	?define T_NO "Нет"
5555 punk_joker 37
	?define T_CANCEL "Отмена"
38
	?define T_CREATE "Создать"
3848 punk_joker 39
	?define T_DEL_ERROR_1 "Ошибка. Папка не пустая."
3997 leency 40
	?define WAIT_DELETING_FOLDER "Удаляется папка. Подожите..."
3848 punk_joker 41
	?define NOT_CREATE_FOLDER "Не удалось создать папку."
42
	?define NOT_CREATE_FILE "Не удалось создать файл."
5506 punk_joker 43
	?define ERROR_1 "Ошибка при загрузке библиотеки /rd/1/lib/box_lib.obj"
5514 leency 44
	?define T_PASTE_WINDOW_TITLE "Копирую..."
3883 leency 45
	?define T_PASTE_WINDOW_TEXT "Копируется файл:"
5514 leency 46
	?define T_PASTE_WINDOW_BUTTON "Прервать"
47
	?define INFO_AFTER_COPY "Копирование завершено"
4022 leency 48
	?define T_CANCEL_PASTE "Копирование прекращено. Папка скопирована не полностью."
4049 leency 49
	?define T_SELECT_APP_TO_OPEN_WITH "Выберите программу для открытия файла"
5514 leency 50
	?define DEL_MORE_FILES_1 "выбранные элементы ("
5512 punk_joker 51
	?define DEL_MORE_FILES_2 " шт.)?"
3933 kaitz 52
#elif LANG_EST
53
	?define T_FILE "Fail"
54
	?define T_TYPE "T№№p"
55
	?define T_SIZE "Suurus"
56
	?define T_NEW_FOLDER "Uus kataloog"
57
	?define T_NEW_FILE "Uus fail"
58
	?define T_DELETE_FILE "Kas sa tahad tїesti kustutada"
59
	?define T_YES "Jah"
60
	?define T_NO "Ei"
5556 punk_joker 61
	?define T_CANCEL "Cancel"
62
	?define T_CREATE "Create"
3933 kaitz 63
	?define T_DEL_ERROR_1 "Viga. Kataloog ei ole t№hi."
3997 leency 64
	?define WAIT_DELETING_FOLDER "Deleting folder. Please, wait..."
3933 kaitz 65
	?define NOT_CREATE_FOLDER "Kataloogi ei saa luua."
66
	?define NOT_CREATE_FILE "Faili ei saa luua."
5506 punk_joker 67
	?define ERROR_1 "Viga teegi laadimisel /rd/1/lib/box_lib.obj"
5514 leency 68
	?define T_PASTE_WINDOW_TITLE "Kopeerin..."
3933 kaitz 69
	?define T_PASTE_WINDOW_TEXT "Kopeerin faili:"
5514 leency 70
	?define T_PASTE_WINDOW_BUTTON "Abort"
71
	?define INFO_AFTER_COPY "Copy finished"
4022 leency 72
	?define T_CANCEL_PASTE "Copy process terminated. Folder copied incompletely."
4049 leency 73
	?define T_SELECT_APP_TO_OPEN_WITH "Select application to open file"
5514 leency 74
	?define DEL_MORE_FILES_1 "selected items("
75
	?define DEL_MORE_FILES_2 " pcs.)?"
3848 punk_joker 76
#else
77
	?define T_FILE "File"
78
	?define T_TYPE "Type"
79
	?define T_SIZE "Size"
80
	?define T_NEW_FOLDER "New folder"
81
	?define T_NEW_FILE "New file"
82
	?define T_DELETE_FILE "Do you really want to delete"
83
	?define T_YES "Yes"
84
	?define T_NO "No"
5556 punk_joker 85
	?define T_CANCEL "Cancel"
86
	?define T_CREATE "Create"
3848 punk_joker 87
	?define T_DEL_ERROR_1 "Error. Folder isn't empty."
3997 leency 88
	?define WAIT_DELETING_FOLDER "Deleting folder. Please, wait..."
3848 punk_joker 89
	?define NOT_CREATE_FOLDER "Folder can not be created."
90
	?define NOT_CREATE_FILE "File can not be created."
5506 punk_joker 91
	?define ERROR_1 "Error while loading library /rd/1/lib/box_lib.obj"
5514 leency 92
	?define T_PASTE_WINDOW_TITLE "Copying..."
3883 leency 93
	?define T_PASTE_WINDOW_TEXT "Copying file:"
5514 leency 94
	?define T_PASTE_WINDOW_BUTTON "Abort"
95
	?define INFO_AFTER_COPY "Copy finished"
4022 leency 96
	?define T_CANCEL_PASTE "Copy process terminated. Folder copied incompletely."
4049 leency 97
	?define T_SELECT_APP_TO_OPEN_WITH "Select application to open file"
5514 leency 98
	?define DEL_MORE_FILES_1 "selected items("
99
	?define DEL_MORE_FILES_2 " pcs.)?"
3848 punk_joker 100
#endif
101
 
3444 leency 102
enum {ONLY_SHOW, WITH_REDRAW, ONLY_OPEN}; //OpenDir
103
 
5555 punk_joker 104
#define TITLE "Eolite File Manager v2.77"
105
#define ABOUT_TITLE "Eolite v2.77"
4076 leency 106
dword col_padding, col_selec, col_lpanel;
3363 leency 107
 
3434 leency 108
int toolbar_buttons_x[7]={9,46,85,134,167,203};
109
struct path_string { char Item[4096]; };
3363 leency 110
 
4136 punk_joker 111
byte active_about=0;
4070 punk_joker 112
word about_window;
5416 punk_joker 113
byte active_settings=0;
114
word settings_window;
4040 punk_joker 115
 
4136 punk_joker 116
byte menu_call_mouse=0;
117
 
3434 leency 118
llist files;
119
 
120
byte
3363 leency 121
	path[4096],
122
	file_path[4096],
3404 leency 123
	file_name[256],
5555 punk_joker 124
	new_element_name[256],
3434 leency 125
	temp[4096];
126
byte
3439 leency 127
	rename_active=0,
128
	del_active=0,
5555 punk_joker 129
	new_element_active=0,
4399 punk_joker 130
	show_dev_name=1,
4225 punk_joker 131
	real_files_names_case=0,
5532 leency 132
	use_big_fonts=0,
133
	font_type,
5459 punk_joker 134
	info_after_copy=0,
3434 leency 135
	sort_num=2,
3441 leency 136
	itdir;
3363 leency 137
 
5441 leency 138
dword eolite_ini_path;
139
 
3363 leency 140
proc_info Form;
4076 leency 141
system_colors sc;
3363 leency 142
mouse m;
5532 leency 143
int mouse_dd, scroll_used, sc_slider_h, sorting_arrow_x, kolibrios_drive;
4897 leency 144
dword buf;
3434 leency 145
dword file_mas[6898];
146
int j, i;
4028 leency 147
int action_buf;
4863 leency 148
int rand_n;
5513 punk_joker 149
int selected_count;
3363 leency 150
 
5549 punk_joker 151
mouse gestures;
152
signed x_old, y_old, dif_x, dif_y, adif_x, adif_y;
153
byte stats;
154
 
4028 leency 155
edit_box edit2 = {250,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#file_name,#mouse_dd,64,6,6};
5555 punk_joker 156
edit_box new_file_ed = {150,213,80,0xFFFFCC,0x94AECE,0xFFFFCC,0xffffff,0,248,#new_element_name,#mouse_dd,64,6,6};
3434 leency 157
PathShow_data PathShow = {0, 17,250, 6, 250, 0, 0, 0x0, 0xFFFfff, #path, #temp, 0};
3363 leency 158
PathShow_data FileShow = {0, 56,215, 6, 100, 0, 0, 0x0, 0xFFFfff, #file_name, #temp, 0};
159
 
4042 leency 160
#include "include\copy.h"
5435 leency 161
#include "include\gui.h"
3363 leency 162
#include "include\sorting.h"
4042 leency 163
#include "include\icons.h"
3363 leency 164
#include "include\left_panel.h"
165
#include "include\history.h"
4042 leency 166
#include "include\menu.h"
167
#include "include\about.h"
5416 punk_joker 168
#include "include\settings.h"
5447 punk_joker 169
#include "include\properties.h"
3363 leency 170
 
171
void main()
172
{
3444 leency 173
	word key, id, can_show, can_select, m_selected;
4897 leency 174
	dword selected_offset;
4863 leency 175
	rand_n = random(40);
5549 punk_joker 176
	gestures.get();
3363 leency 177
	mem_Init();
3848 punk_joker 178
	if (load_dll2(boxlib, #box_lib_init,0)!=0) notify(ERROR_1);
5399 punk_joker 179
    if (load_dll2(libini, #lib_init,1)!=0) notify("Error: library doesn't exists - libini");
5441 leency 180
	eolite_ini_path = abspath("Eolite.ini");
181
	LoadIniSettings();
182
	GetSystemDiscs();
4076 leency 183
	SetAppColors();
5555 punk_joker 184
	strcpy(#new_element_name, T_NEW_FILE);
185
	new_file_ed.size = strlen(T_NEW_FILE);
3363 leency 186
	if (param)
187
	{
188
		strcpy(#path, #param);
3434 leency 189
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //add "/" to the end of the string
3363 leency 190
	}
191
	else
3695 leency 192
	{
3432 leency 193
		strcpy(#path, "/rd/1/");
3695 leency 194
	}
3363 leency 195
	Open_Dir(#path,ONLY_OPEN);
3432 leency 196
	SetEventMask(0x27);
3434 leency 197
	loop() switch(WaitEvent())
3363 leency 198
	{
199
		case evMouse:
4081 leency 200
			if (del_active) || (!CheckActiveProcess(Form.ID)) || (Form.status_window>2) break;
5555 punk_joker 201
			if (new_element_active) || (!CheckActiveProcess(Form.ID)) || (Form.status_window>2)
202
			{
203
				edit_box_mouse stdcall(#new_file_ed);
204
				break;
205
			}
4081 leency 206
			if (rename_active) { edit_box_mouse stdcall(#edit2); break; }
3363 leency 207
 
208
			m.get();
5549 punk_joker 209
 
210
 
211
			gestures.get();
5550 punk_joker 212
			if (!gestures.mkm) && (stats>0) stats = 0;
5549 punk_joker 213
			if (gestures.mkm) && (stats==0)
214
			{
215
				x_old = gestures.x;
216
				y_old = gestures.y;
217
				stats = 1;
218
			}
219
			if (gestures.mkm) && (stats==1)
220
			{
221
				dif_x = gestures.x-x_old;
222
				dif_y = gestures.y-y_old;
5550 punk_joker 223
				adif_x = fabs(dif_x);
224
				adif_y = fabs(dif_y);
5549 punk_joker 225
 
226
				if (adif_x>adif_y)
227
				{
228
					if (dif_x > 150)
229
					{
230
						if (HistoryPath(GO_FORWARD))
231
							{
5550 punk_joker 232
								files.first=files.current=NULL;
5549 punk_joker 233
								Open_Dir(#path,WITH_REDRAW);
234
							}
235
						stats = 0;
236
					}
237
					if (dif_x < -150)
238
					{
239
						GoBack();
240
						stats = 0;
241
					}
242
				}
243
				else
244
				{
5550 punk_joker 245
					if (dif_y < -100)
5549 punk_joker 246
					{
247
						Dir_Up();
248
						stats = 0;
249
					}
250
				}
251
			}
252
 
3363 leency 253
 
4078 leency 254
			if (files.MouseOver(m.x, m.y)) && (!can_select)
3363 leency 255
			{
4042 leency 256
				m_selected = m.y - files.y / files.line_h;
3434 leency 257
				if (m.lkm) can_select = 1;
258
				if (m.pkm)
259
				{
260
					can_show = 1;
4042 leency 261
					if (m.y - files.y / files.line_h != files.current) can_select = 1;
3434 leency 262
				}
263
			}
264
 
265
			//select/open file {
266
			if (!m.lkm) && (!m.pkm) && (can_select)
267
			{
268
				can_select = 0;
4042 leency 269
				if (m.y>=files.y)
3695 leency 270
				{
4042 leency 271
					id = m.y - files.y / files.line_h;
3695 leency 272
					if (id!=m_selected)
273
					{
274
						can_show=0;
275
						break;
276
					}
277
					if (files.current!=id)
3876 leency 278
					{
279
						if (id
280
					}
3695 leency 281
					else
5443 punk_joker 282
						Open(0);
3695 leency 283
				}
3434 leency 284
			};
285
			// } select/open file
286
 
287
			//file menu {
288
			if (!m.pkm) && (!m.lkm) && (can_show)
289
			{
290
				can_show = 0;
4136 punk_joker 291
				menu_call_mouse = 1;
4042 leency 292
				if (m.y>=files.y)
3695 leency 293
				{
294
					SwitchToAnotherThread();
4057 leency 295
					CreateThread(#FileMenu,#menu_stak+4092);
3695 leency 296
				}
3434 leency 297
				break;
298
			}
299
			// } file menu
3363 leency 300
 
3434 leency 301
			if (m.vert)
302
			{
4069 leency 303
				if (files.MouseScroll(m.vert)) List_ReDraw();
3434 leency 304
				break;
305
			}
306
 
4042 leency 307
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>40) && (m.y
3363 leency 308
			{
5441 leency 309
				IF (m.lkm==1) DrawRectangle3D(Form.cwidth - 17,41,14,14,0xC7C7C7,0xFFFFFF);
3434 leency 310
				WHILE (m.lkm==1) && (files.first>0)
3363 leency 311
				{
3434 leency 312
					pause(8);
313
					files.first--;
3363 leency 314
					List_ReDraw();
315
					m.get();
316
				}
5441 leency 317
				DrawRectangle3D(Form.cwidth - 17,41,14,14,0xFFFFFF,0xC7C7C7);
3363 leency 318
			}
319
 
320
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>onTop(22,0)+1) && (m.y
321
			{
5441 leency 322
				IF (m.lkm==1) DrawRectangle3D(Form.cwidth - 17,onTop(21,0),14,14,0xC7C7C7,0xFFFFFF);
3434 leency 323
				while (m.lkm==1) && (files.first
3363 leency 324
				{
3434 leency 325
					pause(8);
326
					files.first++;
3363 leency 327
					List_ReDraw();
328
					m.get();
329
				}
5441 leency 330
				DrawRectangle3D(Form.cwidth - 17,onTop(21,0),14,14,0xFFFFFF,0xC7C7C7);
3363 leency 331
			}
332
 
3434 leency 333
			//Scrooll
334
			if (!m.lkm) && (scroll_used) { scroll_used=NULL; Scroll(); }
335
			if (m.x>=Form.width-26) && (m.x<=Form.width-6) && (m.y>56) && (m.y
3363 leency 336
 
337
			if (scroll_used)
338
			{
5532 leency 339
				IF (sc_slider_h/2+files.y>m.y) || (m.y<0) || (m.y>4000) m.y=sc_slider_h/2+files.y; //anee eo?ni? iaa ieiii
3434 leency 340
				id=files.first;
5532 leency 341
				j= sc_slider_h/2;
4042 leency 342
				files.first = m.y -j -files.y * files.count;
343
				files.first /= onTop(22,files.y);
3434 leency 344
				IF (files.visible+files.first>files.count) files.first=files.count-files.visible;
3444 leency 345
				IF (id!=files.first) List_ReDraw();
3363 leency 346
			}
347
			break;
348
//Button pressed-----------------------------------------------------------------------------
349
		case evButton:
350
			id=GetButtonID();
4070 punk_joker 351
			if (id==1)
352
			{
353
				KillProcess(about_window);
354
				ExitProcess();
355
			}
3439 leency 356
			if (rename_active) break;
357
			if (del_active)
3363 leency 358
			{
359
				IF (id==301) || (id==302) Del_File(302-id);
360
				break;
361
			}
5555 punk_joker 362
			if (new_element_active)
363
			{
364
				IF (id==301) || (id==302) NewElement(302-id);
365
				break;
366
			}
3439 leency 367
 
3363 leency 368
			switch(id)
369
			{
370
				case 21: //Back
371
						GoBack();
372
						break;
373
				case 22: //Forward
374
						if (HistoryPath(GO_FORWARD))
375
						{
3434 leency 376
							files.first=files.current=NULL; //aaa?o nienea
3363 leency 377
							Open_Dir(#path,WITH_REDRAW);
378
						}
379
						break;
380
				case 23: //up!
381
						Dir_Up();
382
						break;
383
				case 24: //cut
3846 punk_joker 384
						Copy(#file_path, CUT);
3444 leency 385
						break;
3363 leency 386
				case 25: //copy
3846 punk_joker 387
						Copy(#file_path, NOCUT);
3444 leency 388
						break;
3363 leency 389
				case 26: //paste
4057 leency 390
						CreateThread(#Paste,#copy_stak+4092);
3363 leency 391
						break;
392
				case 31...33: //sort
4022 leency 393
						IF(sort_num==1) DrawFilledBar(sorting_arrow_x,42,6,10);
394
						IF(sort_num==2) DrawFilledBar(sorting_arrow_x,42,6,10);
395
						IF(sort_num==3) DrawFilledBar(sorting_arrow_x,42,6,10);
3363 leency 396
						sort_num=id-30;
3434 leency 397
						Open_Dir(#path,WITH_REDRAW);
3363 leency 398
						break;
3434 leency 399
				case 50...60: //Actions
3444 leency 400
						FnProcess(id-50);
3363 leency 401
						break;
402
				case 100...120:
403
					DEVICE_MARK:
3444 leency 404
						DrawRectangle(17,id-100*16+74,159,16, 0); //auaaeaiea
3363 leency 405
						strcpy(#path, #disk_list[id-100].Item);
3434 leency 406
						files.first=files.current=0;
3444 leency 407
						Open_Dir(#path,WITH_REDRAW);
3363 leency 408
						pause(5);
3444 leency 409
						DrawRectangle(17,id-100*16+74,159,16, 0xFFFFFF);
3363 leency 410
						break;
411
			}
412
			break;
413
//Key pressed-----------------------------------------------------------------------------
414
		case evKey:
415
			key = GetKey();
416
			if (Form.status_window>2) break;
417
			IF (del_active)
418
			{
419
				IF (key==013) Del_File(true);
420
				IF (key==027) Del_File(false);
421
				break;
422
			}
5555 punk_joker 423
			IF (new_element_active)
424
			{
425
				IF (key==027) NewElement(0);
426
				EAX=key<<8;
427
				edit_box_key stdcall (#new_file_ed);
428
				break;
429
			}
3444 leency 430
			IF (edit2.flags!=64) && (key!=13) && (key!=27)
3363 leency 431
			{
432
				EAX=key<<8;
433
				edit_box_key stdcall (#edit2);
434
				break;
435
			}
436
			switch (key)
437
			{
438
					case 209...217:
439
							id=key-110;
440
							IF (id-100>=disc_num) break;
441
							GOTO DEVICE_MARK;
5511 leency 442
					case ASCII_KEY_BS:
3363 leency 443
							//GoBack();
444
							Dir_Up();
445
							break;
3434 leency 446
					case 004: //Ctrl+D set as bg
3363 leency 447
							strcpy(#temp, "\\S__");
448
							strcat(#temp, #file_path);
449
							RunProgram("/sys/media/kiv", #temp);
450
							break;
3434 leency 451
					case 014: //Ctrl+N new window
3363 leency 452
							IF (Form.left==98) MoveSize(Form.left-20,Form.top-20,OLD,OLD);
453
							RunProgram("/sys/File Managers/Eolite", #path);
454
							break;
455
					case 024: //Ctrl+X
3444 leency 456
							Copy(#file_path, CUT);
457
							break;
3363 leency 458
					case 003: //Ctrl+C
3444 leency 459
							Copy(#file_path, NOCUT);
3363 leency 460
							break;
461
					case 022: //Ctrl+V
4057 leency 462
							CreateThread(#Paste,#copy_stak+4092);
3363 leency 463
							break;
5512 punk_joker 464
					case 001: //Ctrl+A
465
							debugln("press Ctrl+A");
466
							for (i=0; i
467
							{
468
								selected_offset = file_mas[i]*304 + buf+32 + 7;
469
								ESBYTE[selected_offset] = 1;
5513 punk_joker 470
								selected_count++;
5512 punk_joker 471
							}
472
							List_ReDraw();
473
							break;
474
					case 021: //Ctrl+U
475
							debugln("press Ctrl+A");
476
							for (i=0; i
477
							{
478
								selected_offset = file_mas[i]*304 + buf+32 + 7;
479
								ESBYTE[selected_offset] = 0;
480
							}
5513 punk_joker 481
							selected_count = 0;
5512 punk_joker 482
							List_ReDraw();
483
							break;
5511 leency 484
					case ASCII_KEY_ESC:
3363 leency 485
							IF (rename_active==1) ReName(false);
486
							break;
5511 leency 487
					case ASCII_KEY_ENTER:
3363 leency 488
							IF (rename_active==1) {ReName(true); break;}
5443 punk_joker 489
							Open(0);
3363 leency 490
							break;
4136 punk_joker 491
					case 074: //menu
492
							menu_call_mouse=0;
493
							SwitchToAnotherThread();
494
							CreateThread(#FileMenu,#menu_stak+4092);
495
							break;
4070 punk_joker 496
					case 173: //Ctrl+Enter
4225 punk_joker 497
							if (!itdir) ShowOpenWithDialog();
5443 punk_joker 498
							else Open(1);
4070 punk_joker 499
							break;
5511 leency 500
					case ASCII_KEY_UP:
3444 leency 501
							List_Current(-1);
3363 leency 502
							break;
5511 leency 503
					case ASCII_KEY_DOWN:
3444 leency 504
							List_Current(1);
3363 leency 505
							break;
5511 leency 506
					case ASCII_KEY_HOME:
4069 leency 507
							if (files.KeyHome()) List_ReDraw();
3363 leency 508
							break;
5511 leency 509
					case ASCII_KEY_END:
4069 leency 510
							if (files.KeyEnd()) List_ReDraw();
3363 leency 511
							break;
5511 leency 512
					case ASCII_KEY_PGDN:
3444 leency 513
							List_Current(files.visible-1);
3363 leency 514
							break;
5511 leency 515
					case ASCII_KEY_PGUP:
3444 leency 516
							List_Current(-files.visible+1);
3363 leency 517
							break;
5511 leency 518
					case ASCII_KEY_DEL:
3434 leency 519
							Del_Form();
3363 leency 520
							break;
5511 leency 521
					case ASCII_KEY_INS:
4897 leency 522
							selected_offset = file_mas[files.current+files.first]*304 + buf+32 + 7;
5513 punk_joker 523
							if (ESBYTE[selected_offset])
524
							{
525
								ESBYTE[selected_offset]=0;
526
								selected_count--;
527
							}
528
							else
529
							{
530
								ESBYTE[selected_offset] = 1;
531
								selected_count++;
532
							}
4897 leency 533
							List_Current(1);
4698 punk_joker 534
							break;
5443 punk_joker 535
					case 048...059: //F1-F10
3444 leency 536
							FnProcess(key-49);
3363 leency 537
							break;
538
					default:
3434 leency 539
							for (i=files.current+files.first+1; i
3363 leency 540
							{
541
								strcpy(#temp, file_mas[i]*304+buf+72);
542
								IF (temp[0]==key) || (temp[0]==key-32)
543
								{
3444 leency 544
									List_Current(i-files.current-files.first);
3363 leency 545
									break;
546
								}
547
							}
548
			}
549
			break;
550
		case evReDraw:
4042 leency 551
			draw_window();
4028 leency 552
			if (action_buf) { menu_action(action_buf); action_buf=0;}
3363 leency 553
	}
554
}
555
 
4225 punk_joker 556
 
5435 leency 557
inline fastcall signed int _strrchr( ESI,BL)
558
{
559
	int jj=0, last=strlen(ESI);
560
	do{
561
		jj++;
562
		$lodsb
563
		IF(AL==BL) last=jj;
564
	} while(AL!=0);
565
	return last;
566
}
4225 punk_joker 567
 
5435 leency 568
 
4028 leency 569
void menu_action(dword id)
570
{
571
	if (id==COPY_PASTE_END)
572
	{
573
		FnProcess(5);
574
		SelectFile(#copy_to+strrchr(#copy_to,'/'));
575
	}
5443 punk_joker 576
	if (id==100) Open(0);
4225 punk_joker 577
	if (id==201) ShowOpenWithDialog();
4028 leency 578
	if (id==202) FnProcess(3); //F3
579
	if (id==203) FnProcess(4); //F4
580
	if (id==104) Copy(#file_path, NOCUT);
581
	if (id==105) Copy(#file_path, CUT);
4057 leency 582
	if (id==106) CreateThread(#Paste,#copy_stak+4092);
4034 leency 583
	if (id==207) FnProcess(2);
4028 leency 584
	if (id==108) Del_Form();
585
	if (id==109) FnProcess(5);
5447 punk_joker 586
	if (id==110) FnProcess(8);
5428 leency 587
	if (id==300) { FnProcess(5); List_ReDraw(); }
4028 leency 588
}
3363 leency 589
 
4028 leency 590
 
3444 leency 591
void draw_window()
592
{
4863 leency 593
	DefineAndDrawWindow(GetScreenWidth()-550/4+rand_n,rand_n+30,550,500,0x73,sc.work,TITLE,0);
3444 leency 594
	GetProcessInfo(#Form, SelfInfo);
595
	if (Form.status_window>2) return;
5441 leency 596
	files.SetSizes(192, 57, Form.cwidth - 210, onTop(57,6), disc_num*16+195,files.line_h);
3444 leency 597
	if (Form.height < files.min_h) MoveSize(OLD,OLD,OLD,files.min_h);
598
	if (Form.width<480) MoveSize(OLD,OLD,480,OLD);
599
	GetProcessInfo(#Form, SelfInfo); //if win_size changed
600
 
3363 leency 601
	PutPaletteImage(#toolbar,246,34,0,0,8,#toolbar_pal);
4076 leency 602
	DrawBar(127, 8, 1, 25, sc.work_graph);
603
	for (j=0; j<3; j++) DefineButton(toolbar_buttons_x[j]+2,5+2,31-5,29-5,21+j+BT_HIDE,sc.work);
604
	for (j=3; j<6; j++) DefineButton(toolbar_buttons_x[j],5,31,29,21+j+BT_HIDE,sc.work);
5441 leency 605
	DrawBar(246,0,Form.cwidth - 297,12, sc.work); //upper editbox
606
	DrawBar(246,29,Form.cwidth - 297,5,sc.work);  //under editbox
607
	DrawRectangle(246,12,Form.cwidth - 303,16,sc.work_graph);
608
	DefineButton(Form.cwidth - 25,6,27,28,51+BT_HIDE+BT_NOFRAME,0); //about
3363 leency 609
	PutPaletteImage(#goto_about,56,34,Form.width-65,0,8,#goto_about_pal);
3434 leency 610
	//main rectangles
4076 leency 611
	DrawRectangle(1,40,Form.cwidth-3,onTop(46,0),sc.work_graph);
3444 leency 612
	DrawRectangle(0,39,Form.cwidth-1,onTop(44,0),col_palette[4]); //bg
3363 leency 613
	for (i=0; i<5; i++) DrawBar(0, 34+i, Form.cwidth, 1, col_palette[8-i]);
614
	DrawLeftPanel();
3434 leency 615
	//ListBox
5444 leency 616
	DrawFlatButton(files.x,40,Form.cwidth - files.x - 159,16,31,sc.work,T_FILE);
617
	DrawFlatButton(Form.cwidth - 159,40,73,16,32,sc.work,T_TYPE);
618
	DrawFlatButton(Form.cwidth - 86,40,68,16,33,sc.work,T_SIZE);
4076 leency 619
	DrawBar(files.x+files.w,files.y,1,onTop(22,files.y),sc.work_graph); //line to the left from the scroll
620
	DrawFlatButton(files.x+files.w,40,16,16,0,sc.work,"\x18");
621
	DrawFlatButton(files.x+files.w,onTop(22,0),16,16,0,sc.work,"\x19");
3363 leency 622
	Open_Dir(#path,ONLY_SHOW);
623
	if (del_active) Del_Form();
5555 punk_joker 624
	if (new_element_active) NewElement_Form();
3444 leency 625
	if (rename_active) FnProcess(2);
3363 leency 626
}
627
 
628
 
629
void KEdit()
630
{
3434 leency 631
	if (Form.width<480) return;
3363 leency 632
	PathShow.area_size_x = Form.cwidth-306;
633
	DrawBar(PathShow.start_x-3, PathShow.start_y-4, PathShow.area_size_x+2, 15, 0xFFFfff);
634
	PathShow_prepare stdcall(#PathShow);
635
	PathShow_draw stdcall(#PathShow);
636
}
637
 
638
 
5511 leency 639
void List_Current(signed int cur)
3363 leency 640
{
3434 leency 641
	if (cur<=0) //up
3363 leency 642
	{
3434 leency 643
		IF (files.first==0) && (files.current<=0) return;
644
		IF (-cur-1
3363 leency 645
		{
3434 leency 646
			Line_ReDraw(0xFFFFFF, files.current);
647
			files.current+=cur;
648
			Line_ReDraw(col_selec, files.current);
3363 leency 649
			return;
650
		}
651
		ELSE
652
		{
3434 leency 653
			IF (-cur
654
			files.current=0;
3363 leency 655
			List_ReDraw();
656
			return;
657
		}
658
	}
3434 leency 659
	else  //down
3363 leency 660
	{
5511 leency 661
		IF (files.first==files.count-files.visible) && (files.current==files.visible-1)
662
		{
663
			Line_ReDraw(col_selec, files.current);
664
			return;
665
		}
3434 leency 666
		IF (files.visible-files.current>cur)
3363 leency 667
		{
3434 leency 668
			Line_ReDraw(0xFFFFFF, files.current);
669
			files.current+=cur;
670
			Line_ReDraw(col_selec, files.current);
3363 leency 671
			return;
672
		}
673
		else
674
		{
3434 leency 675
			IF(files.first+files.current+cur>=files.count)
3363 leency 676
			{
3434 leency 677
				files.first=files.count-files.visible;
678
				files.current=cur-files.first+files.current;
3363 leency 679
				}
680
			ELSE
681
			{
3434 leency 682
				files.first+=cur+files.current-files.visible+1;
683
				files.current=files.visible-1;
3363 leency 684
			}
685
 
3434 leency 686
			IF (files.current<0) || (files.current>files.visible)
3363 leency 687
			{
3434 leency 688
				files.current=files.visible-1;
3363 leency 689
			}
690
			List_ReDraw();
691
		}
692
	}
693
}
694
 
695
 
696
void List_ReDraw()
697
{
3434 leency 698
	int paint_y;
3876 leency 699
	//we are in the end of the list => maximize window => there will be white lines after the last element
3434 leency 700
	if (files.count-files.firstfiles.visible-1)
701
	{ files.first=files.count-files.visible; files.current=files.visible-1; }
3444 leency 702
	for (j=0; j
3434 leency 703
	//in the bottom
704
	paint_y = j * files.line_h + files.y;
705
	DrawBar(files.x,paint_y,files.w,onTop(paint_y,6),0xFFFFFF);
4076 leency 706
	DrawBar(Form.cwidth-159,paint_y,1,onTop(paint_y,6),sc.work);
707
	DrawBar(Form.cwidth-86,paint_y,1,onTop(paint_y,6),sc.work);
3434 leency 708
	Scroll();
3363 leency 709
}
710
 
3444 leency 711
 
3363 leency 712
void Line_ReDraw(dword color, filenum){
3467 leency 713
	dword text_col=0,
5487 leency 714
	      ext1, attr,
4897 leency 715
	      file_offet,
716
	      file_name_off,
4042 leency 717
	      y=filenum*files.line_h+files.y;
4897 leency 718
	      BDVK file;
4859 leency 719
	if (filenum==-1) return;
3447 leency 720
	DrawBar(files.x,y,3,files.line_h,color);
721
	DrawBar(files.x+19,y,files.w-19,files.line_h,color);
722
	DrawBar(files.x+3,y+17,16,1,color);
723
	if (files.line_h>18) DrawBar(files.x+3,y+18,16,files.line_h-18,color);
724
	if (files.line_h>15) DrawBar(files.x+3,y,16,files.line_h-15,color);
3363 leency 725
 
4897 leency 726
	file_offet = file_mas[filenum+files.first]*304 + buf+32;
5487 leency 727
	attr = ESDWORD[file_offet];
4897 leency 728
	file.selected = ESBYTE[file_offet+7];
729
	file.sizelo   = ESDWORD[file_offet+32];
730
	file_name_off = file_offet+40;
3363 leency 731
 
5487 leency 732
	if (! TestBit(attr, 4) ) //file or folder?
3363 leency 733
	{
4897 leency 734
		Put_icon(file_name_off+_strrchr(file_name_off,'.'), files.x+3, files.line_h/2-7+y, color, 0);
5532 leency 735
		WriteText(7-strlen(ConvertSize(file.sizelo))*6+Form.cwidth - 76,files.line_h-6/2+y,font_type,0,ConvertSize(file.sizelo));
3363 leency 736
	}
737
	else
4846 leency 738
	{
4897 leency 739
		if (strcmp("..",file_name_off)==0) ext1=".."; else ext1="";
4846 leency 740
		Put_icon(ext1, files.x+3, files.line_h/2-7+y, color, 0);
741
	}
742
 
5487 leency 743
	if (TestBit(attr, 1)) || (TestBit(attr, 2)) text_col=0xA6A6B7; //system or hiden?
3444 leency 744
	if (color!=0xFFFfff)
3363 leency 745
	{
5487 leency 746
		itdir = TestBit(attr, 4);
4897 leency 747
		strcpy(#file_name, file_name_off);
3363 leency 748
		strcpy(#file_path, #path);
3434 leency 749
		strcat(#file_path, #file_name);
3363 leency 750
		if (text_col==0xA6A6B7) text_col=0xFFFFFF;
751
	}
4897 leency 752
	if (file.selected) text_col=0xFF0000;
3434 leency 753
	if (Form.width>=480)
754
	{
3447 leency 755
		FileShow.start_x = files.x + 23;
3434 leency 756
		FileShow.font_color = text_col;
757
		FileShow.area_size_x = Form.width - 380;
4897 leency 758
		FileShow.text_pointer = file_name_off;
759
		FileShow.start_y = files.text_y+y;
3434 leency 760
		PathShow_prepare stdcall(#FileShow);
761
		PathShow_draw stdcall(#FileShow);
762
	}
4076 leency 763
	DrawBar(Form.cwidth-159,y,1,files.line_h,sc.work); //gray line 1
764
	DrawBar(Form.cwidth-86,y,1,files.line_h,sc.work); //gray line 2
3363 leency 765
}
766
 
767
 
3444 leency 768
void Open_Dir(dword dir_path, redraw){
769
	int errornum, maxcount;
3434 leency 770
 
3444 leency 771
	if (redraw!=ONLY_SHOW)
3363 leency 772
	{
3444 leency 773
		if (ESBYTE[dir_path+1]!='\0') ESBYTE[dir_path+strlen(dir_path)-1] = '\0';
3363 leency 774
		if (buf) free(buf);
3444 leency 775
		errornum = GetDir(#buf, #files.count, dir_path, DIRS_NOROOT);
776
		if (ESBYTE[dir_path+1]!='\0') chrcat(dir_path, '/');
777
		if (errornum)
3363 leency 778
		{
779
			HistoryPath(ADD_NEW_PATH);
780
			GoBack();
781
			Write_Error(errornum);
782
			return;
783
		}
3444 leency 784
		maxcount = sizeof(file_mas)/sizeof(dword)-1;
4225 punk_joker 785
		if (files.count>maxcount) files.count = maxcount;
4859 leency 786
		if (files.count>0) && (files.current==-1) files.current=0;
3363 leency 787
	}
3444 leency 788
	if (files.count!=-1)
3363 leency 789
	{
790
		KEdit();
791
		HistoryPath(ADD_NEW_PATH);
3444 leency 792
		files.visible = files.h / files.line_h;
793
		IF (files.count < files.visible) files.visible = files.count;
4022 leency 794
		IF (sort_num==1) sorting_arrow_x = Form.width+60/2;
795
		IF (sort_num==2) sorting_arrow_x = Form.width-115;
796
		IF (sort_num==3) sorting_arrow_x = strlen(T_SIZE)*3-30+files.x+files.w;
4076 leency 797
		WriteText(sorting_arrow_x,45,0x80,sc.work_graph,"\x19");
3444 leency 798
		IF (redraw!=ONLY_SHOW) Sorting();
799
		IF (redraw!=ONLY_OPEN) List_ReDraw();
3363 leency 800
	}
3444 leency 801
	IF (files.count==-1) && (redraw!=ONLY_OPEN) {files.visible=files.count=0; List_ReDraw();}
3363 leency 802
}
803
 
804
 
805
inline Sorting()
806
{
807
	dword k=0, l=1;
4897 leency 808
	dword file_off;
3363 leency 809
	int i;
3434 leency 810
	if (!strcmp(#path,"/")) //do not sort
3363 leency 811
	{
3434 leency 812
		FOR(k=1;k
3363 leency 813
		return;
814
	}
4897 leency 815
	FOR (j=files.count-1, file_off=files.count-1*304+buf+32; j>=0; j--, file_off-=304;)  //files | folders
3363 leency 816
	{
4897 leency 817
		if (!real_files_names_case) strttl(file_off+40);
818
		if (TestBit(ESDWORD[file_off],4)) //directory?
3363 leency 819
		{
820
			file_mas[k]=j;
821
			k++;
822
		}
823
		else
824
		{
3434 leency 825
			file_mas[files.count-l]=j;
3363 leency 826
			l++;
827
		}
828
	}
3434 leency 829
	//sorting: files first, then folders
3363 leency 830
	Sort_by_Name(0,k-1);
3434 leency 831
	IF (sort_num==1) Sort_by_Name(k,files.count-1);
832
	IF (sort_num==2) Sort_by_Type(k,files.count-1);
833
	IF (sort_num==3) Sort_by_Size(k,files.count-1);
834
	//".." should be first
3444 leency 835
	IF (k>0) && (strcmp(file_mas[0]*304+buf+72,"..")!=0)
836
		FOR(k--; k>0; k--;) IF (!strcmp(file_mas[k]*304+buf+72,"..")) {file_mas[k]>
3363 leency 837
}
838
 
839
 
840
void Del_Form()
841
{
5512 punk_joker 842
	dword selected_offset2;
843
	int cont = 0;
844
	byte f_count[128];
4002 leency 845
	int dform_x=files.w-220/2+files.x;
4022 leency 846
	if (strcmp(#file_name,".")==0) || (strcmp(#file_name,"..")==0) return;
4002 leency 847
	if (del_active==2)
3991 leency 848
	{
4002 leency 849
		if (itdir) ShowMessage(WAIT_DELETING_FOLDER, 0);
3991 leency 850
	}
851
	else
852
	{
4002 leency 853
		if (!files.count) return;
4076 leency 854
		DrawPopup(dform_x,160,220,80,1,sc.work,sc.work_graph);
855
		WriteText(-strlen(T_DELETE_FILE)*3+110+dform_x,175,0x80,sc.work_text,T_DELETE_FILE);
5512 punk_joker 856
		for (i=0; i
4002 leency 857
		{
5512 punk_joker 858
			selected_offset2 = file_mas[i]*304 + buf+32 + 7;
859
			if (ESBYTE[selected_offset2]) cont++;
4002 leency 860
		}
5512 punk_joker 861
		if (cont)
862
		{
863
			strcpy(#f_count, DEL_MORE_FILES_1);
864
			strcat(#f_count, itoa(cont));
865
			strcat(#f_count, DEL_MORE_FILES_2);
866
			WriteText(-strlen(#f_count)*3+110+dform_x,190,0x80,sc.work_text,#f_count);
867
		}
4002 leency 868
		else
869
		{
5512 punk_joker 870
			IF (strlen(#file_name)<28)
871
			{
872
				WriteText(strlen(#file_name)*3+110+dform_x+2,190,0x80,sc.work_text,"?");
873
				WriteText(-strlen(#file_name)*3+110+dform_x,190,0x80,sc.work_text,#file_name);
874
			}
875
			else
876
			{
877
				WriteText(164+dform_x,190,0x80,0,"...?");
878
				ESI = 24;
879
				WriteText(dform_x+20,190,0,0,#file_name);
880
			}
4002 leency 881
		}
882
		DrawFlatButton(dform_x+27,208,70,20,301,0xFFB6B5,T_YES);
883
		DrawFlatButton(dform_x+120,208,70,20,302,0xC6DFC6,T_NO);
884
		del_active=1;
3991 leency 885
	}
3363 leency 886
}
887
 
4022 leency 888
int del_error;
889
int Del_File2(dword way)
3980 punk_joker 890
{
891
	dword dirbuf, fcount, i, filename;
4022 leency 892
	int error;
893
	char del_from[4096];
894
	if (isdir(way))
3997 leency 895
	{
4022 leency 896
		if (error = GetDir(#dirbuf, #fcount, way, DIRS_ONLYREAL)) del_error = error;
3997 leency 897
		for (i=0; i
3980 punk_joker 898
		{
4002 leency 899
			if (CheckEvent()==evReDraw) draw_window();
3997 leency 900
			filename = i*304+dirbuf+72;
901
			strcpy(#del_from, way);
902
			chrcat(#del_from, '/');
903
			strcat(#del_from, filename);
904
			if ( TestBit(ESDWORD[filename-40], 4) )
905
				Del_File2(#del_from);
906
			else
4022 leency 907
			{
908
				if (error = DeleteFile(#del_from)) del_error = error;
909
			}
3980 punk_joker 910
		}
3997 leency 911
	}
4022 leency 912
	if (error = DeleteFile(way)) del_error = error;
3980 punk_joker 913
}
914
 
915
 
3363 leency 916
void Del_File(byte dodel)
4022 leency 917
{
4896 punk_joker 918
	byte del_from[4096];
5214 punk_joker 919
	dword selected_offset2;
920
	int tst, count, i;
4896 punk_joker 921
 
3980 punk_joker 922
	if (dodel==true)
3363 leency 923
	{
4002 leency 924
		del_active=2;
3997 leency 925
		if (itdir) ShowMessage(WAIT_DELETING_FOLDER, 0);
4022 leency 926
		del_error = 0;
5214 punk_joker 927
 
5513 punk_joker 928
		if (selected_count)
5214 punk_joker 929
		{
5513 punk_joker 930
   		   for (i=0; i
931
           {
932
                selected_offset2 = file_mas[i]*304 + buf+32 + 7;
933
                if (ESBYTE[selected_offset2]) {
934
                    strcpy(#del_from, #path);
935
                    strcat(#del_from, file_mas[i]*304+buf+72);
936
                    Del_File2(#del_from);
937
                }
938
            }
5214 punk_joker 939
		}
940
		else
941
		{
5513 punk_joker 942
		   Del_File2(#file_path);
5214 punk_joker 943
		}
4022 leency 944
		if (del_error) Write_Error(del_error);
3363 leency 945
 	}
946
	del_active=0;
3997 leency 947
	DeleteButton(301);
948
	DeleteButton(302);
3444 leency 949
	Open_Dir(#path,WITH_REDRAW);
3363 leency 950
}
951
 
952
 
953
void ReName(byte rename)
954
{
3404 leency 955
	int del_rezult, copy_rezult;
3363 leency 956
	char edit_name[256];
957
	rename_active=0;
958
	edit2.flags=64;
959
	if (rename==true)
960
	{
961
		strcpy(#temp, #path);
3434 leency 962
		strcpy(#edit_name, #file_name); //save edit name to select it later
3363 leency 963
		strcat(#temp, #file_name);
5437 leency 964
		if (strcmpi(#file_path,#temp)!=0) && (file_name)
3444 leency 965
		if (itdir)
3363 leency 966
		{
4029 leency 967
			if (del_rezult = DeleteFile(#file_path))
3363 leency 968
			{
3404 leency 969
				Write_Error(del_rezult);
3997 leency 970
				ShowMessage(T_DEL_ERROR_1, 150);
3363 leency 971
				return;
972
			}
4029 leency 973
			if (CreateDir(#temp)) CreateDir(#file_path);
3444 leency 974
			Open_Dir(#path,WITH_REDRAW);
4029 leency 975
			SelectFile(#edit_name);
3363 leency 976
		}
3877 leency 977
		else
3363 leency 978
		{
4029 leency 979
			if (copy_rezult = CopyFile(#file_path,#temp))
980
			{
981
				Write_Error(copy_rezult);
982
			}
983
			else
984
			{
985
				Del_File(true);
986
				SelectFile(#edit_name);
987
			}
3363 leency 988
		}
989
	}
3434 leency 990
	Line_ReDraw(col_selec,files.current);
3363 leency 991
}
992
 
993
 
994
void SelectFile(dword that_file)
995
{
3434 leency 996
	files.first=files.current=0;
3363 leency 997
   	Open_Dir(#path,ONLY_OPEN);
4225 punk_joker 998
	if (!real_files_names_case) strttl(that_file);
3434 leency 999
	for (i=files.count-1; i>=0; i--;)
3363 leency 1000
		if (!strcmp(file_mas[i]*304+buf+72,that_file)) break;
3444 leency 1001
	List_Current(i);
3363 leency 1002
	List_ReDraw();
1003
}
1004
 
1005
 
1006
void Dir_Up()
1007
{
1008
	char cur_folder[4096];
1009
	i=strlen(#path)-1;
1010
	if (i==0) return;
1011
	path[i]=0x00;
1012
	i = strrchr(#path, '/');
1013
	strcpy(#cur_folder, #path+i);
1014
	path[i]=0x00;
1015
	SelectFile(#cur_folder);
1016
}
1017
 
5444 leency 1018
void Open(byte rez)
3434 leency 1019
{
5443 punk_joker 1020
	byte temp[4096];
5513 punk_joker 1021
	selected_count = 0;
5443 punk_joker 1022
	if (rez)
1023
	{
1024
		if (!strcmp(#file_name,"..")) return;
1025
		strcpy(#temp, #file_path);
1026
		if (path[strlen(#temp)-1]!='/') chrcat(#temp, '/'); //need "/" in the end
1027
		RunProgram("/sys/File Managers/Eolite", #temp);
1028
		return;
1029
	}
3444 leency 1030
	if (!files.count) return;
3441 leency 1031
	if (!itdir)
3434 leency 1032
	{
5401 leency 1033
		if (strrchr(#file_name, '.')==0) RunProgram(#file_path, ""); else RunProgram("/sys/@open", #file_path);
3434 leency 1034
	}
1035
	else
1036
	{
1037
		if (!strcmp(#file_name,"..")) { Dir_Up(); return; }
1038
		strcpy(#path, #file_path);
1039
		if (path[strlen(#path)-1]!='/') chrcat(#path, '/'); //need "/" in the end
1040
		files.first=files.current=0;
3444 leency 1041
		Open_Dir(#path,WITH_REDRAW);
3434 leency 1042
	}
1043
}
3363 leency 1044
 
3434 leency 1045
 
1046
inline fastcall void GoBack()
3363 leency 1047
{
1048
	char cur_folder[4096];
1049
	strcpy(#cur_folder, GetCurrentFolder());
1050
	if (HistoryPath(GO_BACK)) SelectFile(#cur_folder);
1051
}
1052
 
5397 punk_joker 1053
void ShowOpenWithDialog()
1054
{
1055
	byte param[4097];
1056
	param[0] = '~';
5398 punk_joker 1057
	param[1] = '\0';
5397 punk_joker 1058
	strcat(#param, #file_path);
1059
	RunProgram("/sys/@open", #param);
1060
}
1061
 
5555 punk_joker 1062
void NewElement(byte newf)
1063
{
1064
	if (newf)
1065
	{
1066
		strcpy(#temp, #path);
1067
		strcat(#temp, new_file_ed.text);
1068
		if (new_element_active==1)
1069
		{
1070
			WriteFile(0, 0, #temp);
1071
			if (EAX)
1072
			{
1073
				Write_Error(EAX);
1074
				ShowMessage(NOT_CREATE_FILE, 150);
1075
			}
1076
		}
1077
		else
1078
		{
1079
			CreateDir(#temp);
1080
			if (EAX)
1081
			{
1082
				Write_Error(EAX);
1083
				ShowMessage(NOT_CREATE_FOLDER, 150);
1084
			}
1085
		}
1086
	}
1087
	new_element_active = 0;
1088
	SelectFile(new_file_ed.text);
1089
}
1090
 
1091
void NewElement_Form(byte crt)
1092
{
1093
	int dform_x=files.w-220/2+files.x;
1094
	new_element_active = crt;
1095
	if (new_element_active==1)
1096
	{
1097
		strcpy(#new_element_name, T_NEW_FILE);
1098
		new_file_ed.size = strlen(T_NEW_FILE);
1099
	}
1100
	else
1101
	{
1102
		strcpy(#new_element_name, T_NEW_FOLDER);
1103
		new_file_ed.size = strlen(T_NEW_FOLDER);
1104
	}
1105
	DrawPopup(dform_x,160,220,80,1,sc.work,sc.work_graph);
1106
	new_file_ed.left = dform_x+27;
1107
	new_file_ed.top = 180;
1108
	edit_box_draw  stdcall (#new_file_ed);
1109
	DrawFlatButton(dform_x+27,208,70,20,301,0xFFB6B5,T_CREATE);
1110
	DrawFlatButton(dform_x+120,208,70,20,302,0xC6DFC6,T_CANCEL);
1111
}
1112
 
3444 leency 1113
void FnProcess(char N)
3434 leency 1114
{
1115
	switch(N)
1116
	{
1117
		case 1:
4395 punk_joker 1118
			if (!active_about)
1119
			{
1120
				SwitchToAnotherThread();
1121
				about_window=CreateThread(#about_dialog,#about_stak+4092);
1122
				break;
1123
			}
1124
			else
1125
			{
1126
				ActivateWindow(GetProcessSlot(about_window));
1127
			}
3434 leency 1128
			break;
1129
		case 2:
1130
			if (!files.count) break;
3447 leency 1131
			edit2.flags = 100000000000010b; //set active
1132
			edit2.left = files.x + 21;
1133
			edit2.width = files.w - 26;
3434 leency 1134
			edit2.top=files.current*files.line_h+59;
1135
			edit2.size=edit2.pos=strlen(#file_name);
1136
			edit_box_draw  stdcall (#edit2);
3447 leency 1137
			DrawBar(edit2.left,files.current*files.line_h+58,edit2.width+1,1,0xFFFFCC); //bg
3434 leency 1138
			rename_active=1;
1139
			break;
1140
		case 3:
3441 leency 1141
			IF (!itdir) RunProgram("/sys/tinypad", #file_path);
3434 leency 1142
			break;
1143
		case 4:
3441 leency 1144
			IF (!itdir) RunProgram("/sys/develop/heed", #file_path);
3434 leency 1145
			break;
3440 leency 1146
		case 5: //refresh cur dir & devs
3854 leency 1147
			Tip(56, T_DEVICES, 55, "-");
3440 leency 1148
			Open_Dir(#path,WITH_REDRAW);
1149
			pause(10);
5441 leency 1150
			LoadIniSettings();
1151
			GetSystemDiscs();
3444 leency 1152
			Open_Dir(#path,WITH_REDRAW);
3440 leency 1153
			DrawLeftPanel();
3434 leency 1154
			break;
1155
		case 6:
5555 punk_joker 1156
			/*strcpy(#temp, #path);
3848 punk_joker 1157
			strcat(#temp, T_NEW_FOLDER);
3434 leency 1158
			CreateDir(#temp);
1159
			if (!EAX){
3848 punk_joker 1160
				SelectFile(T_NEW_FOLDER);
3444 leency 1161
				FnProcess(2);
3434 leency 1162
			}
1163
			else
1164
			{
1165
				Write_Error(EAX);
3997 leency 1166
				ShowMessage(NOT_CREATE_FOLDER, 150);
5555 punk_joker 1167
			}*/
1168
			NewElement_Form(2);
3434 leency 1169
			break;
1170
		case 7:
5555 punk_joker 1171
			/*strcpy(#temp, #path);
3848 punk_joker 1172
			strcat(#temp, T_NEW_FILE);
3434 leency 1173
			WriteFile(0, 0, #temp);
1174
			if (!EAX){
3848 punk_joker 1175
				SelectFile(T_NEW_FILE);
3444 leency 1176
				FnProcess(2);
3434 leency 1177
			}
1178
			else
1179
			{
1180
				Write_Error(EAX);
3997 leency 1181
				ShowMessage(NOT_CREATE_FILE, 150);
5555 punk_joker 1182
			}*/
1183
			NewElement_Form(1);
3434 leency 1184
			break;
5447 punk_joker 1185
		case 8:
1186
			SwitchToAnotherThread();
5463 leency 1187
			CreateThread(#properties_dialog, #properties_stak+4092);
5447 punk_joker 1188
			break;
3434 leency 1189
		case 10: //F10
5416 punk_joker 1190
			if (!active_settings)
1191
			{
1192
				SwitchToAnotherThread();
5463 leency 1193
				settings_window=CreateThread(#settings_dialog, #settings_stak+4092);
5416 punk_joker 1194
				break;
1195
			}
1196
			else
1197
			{
1198
				ActivateWindow(GetProcessSlot(settings_window));
1199
			}
3434 leency 1200
			break;
1201
	}
1202
}
1203
 
5435 leency 1204
//need to remove these functiones, they are a very old shit :)
1205
dword onTop(dword down,up) {EAX=Form.height-GetSkinHeight()-down-up;}
3434 leency 1206
 
5435 leency 1207
 
3363 leency 1208
stop:
1209
 
4057 leency 1210
char menu_stak[4096];
3846 punk_joker 1211
char copy_stak[4096];
4057 leency 1212
char open_with_stak[4096];
5463 leency 1213
char about_stak[4096];
1214
char properties_stak[4096];
1215
char settings_stak[4096];