Subversion Repositories Kolibri OS

Rev

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

Rev Author Line No. Line
3363 leency 1
 
2
{
3
	int j;
7422 leency 4
	int iss = a;
3363 leency 5
	if (a >= b) return;
5606 pavelyakov 6
	for (j = a; j <= b; j++)
7
		if (ESDWORD[file_mas[j]*304 + buf+64] <= ESDWORD[file_mas[b]*304 + buf+64])	{ file_mas[iss] >< file_mas[j];   iss++;}
8
	Sort_by_Size (a, iss-2);
3363 leency 9
	Sort_by_Size (iss, b);
10
}
11
12
 
13
 
14
{
15
	int j;
7422 leency 16
	int isn = a;
3363 leency 17
	if (a >= b) return;
5606 pavelyakov 18
	for (j = a; j <= b; j++) {
7878 leency 19
		if (strcmpi(file_mas[j]*304 + buf+72, file_mas[b]*304 + buf+72)<=0) { file_mas[isn] >< file_mas[j];   isn++;}
20
	}
21
	Sort_by_Name(a, isn-2);
3363 leency 22
	Sort_by_Name(isn, b);
23
}
24
25
 
26
 
27
{
7422 leency 28
	int j;
29
	dword filename1, filename2, ext1, ext2;
3363 leency 30
	int n, isn = a;
31
	if (a >= b) return;
5606 pavelyakov 32
	for (j = a; j <= b; j++)
3363 leency 33
	{
34
		filename1 = file_mas[j]*304 + buf+72;
35
		filename2 = file_mas[b]*304 + buf+72;
36
37
 
38
		WHILE (n>0) && (ESBYTE[filename1+n]!='.') n--;
5631 pavelyakov 39
		if (n) ext1 = filename1+n+1; else ext1=0;
5606 pavelyakov 40
		n=strlen(filename2);
5631 pavelyakov 41
		n--;
42
		WHILE (n>0) && (ESBYTE[filename2+n]!='.') n--;
43
		if (n) ext2 = filename2+n+1; else ext2=0;
5606 pavelyakov 44
3363 leency 45
 
46
		if (n<0) { file_mas[isn] >< file_mas[j];   isn++;}
5606 pavelyakov 47
		if (!n) && (strcmp(filename1, filename2) <= 0) { file_mas[isn] >< file_mas[j];   isn++;}
7878 leency 48
	}
3363 leency 49
	Sort_by_Type(a, isn-2);
50
	Sort_by_Type(isn, b);
51
}
52