Subversion Repositories Kolibri OS

Rev

Rev 5606 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. //┴√ёЄЁр  ёюЁЄшЁютър. Leency 2008.
  2.  
  3. void Sort_by_Size(int a, b)   // фы  яхЁтюую т√чютр: a = 0, b = <¤ыхьхэЄют т ьрёёштх> - 1
  4. {                                        
  5.         int iss = a;
  6.         IF (a >= b) return;
  7.         FOR (j = a; j <= b; j++)
  8.                 IF (ESDWORD[file_mas[j]*304 + buf+64] <= ESDWORD[file_mas[b]*304 + buf+64])     { file_mas[iss] >< file_mas[j];   iss++;}
  9.         Sort_by_Size (a, iss-2);
  10.         Sort_by_Size (iss, b);
  11. }
  12.  
  13.  
  14. void Sort_by_Name(int a, b)   // фы  яхЁтюую т√чютр: a = 0, b = <¤ыхьхэЄют т ьрёёштх> - 1
  15. {                                        
  16.         int isn = a;
  17.         IF (a >= b) return;
  18.         FOR (j = a; j <= b; j++)
  19.                 IF (strcmp(file_mas[j]*304 + buf+72, file_mas[b]*304 + buf+72)<=0) { file_mas[isn] >< file_mas[j];   isn++;}
  20.         Sort_by_Name(a, isn-2);
  21.         Sort_by_Name(isn, b);
  22. }
  23.  
  24.        
  25. void Sort_by_Type(int a, b)   // фы  яхЁтюую т√чютр: a = 0, b = <¤ыхьхэЄют т ьрёёштх> - 1
  26. {              
  27.         dword filename1, filename2, ext1, ext2;
  28.         int n, isn = a;
  29.         IF (a >= b) return;
  30.         for (j = a; j <= b; j++)
  31.         {
  32.                 filename1 = file_mas[j]*304 + buf+72;
  33.                 filename2 = file_mas[b]*304 + buf+72;
  34.  
  35.                 n=strlen(filename1)-1;
  36.                 WHILE (n>0) && (ESBYTE[filename1+n]<>'.') n--;
  37.                 IF (n) ext1 = filename1+n+1; else ext1=0;
  38.                 n=strlen(filename2)-1;
  39.                 WHILE (n>0) && (ESBYTE[filename2+n]<>'.') n--;
  40.                 IF (n) ext2 = filename2+n+1; else ext2=0;
  41.  
  42.                 n=strcmp(ext1, ext2);
  43.                 IF (n<0) { file_mas[isn] >< file_mas[j];   isn++;}
  44.                 IF (n==0) && (strcmp(filename1, filename2)<=0) { file_mas[isn] >< file_mas[j];   isn++;}
  45.         }
  46.         Sort_by_Type(a, isn-2);
  47.         Sort_by_Type(isn, b);
  48. }
  49.  
  50.  
  51.  
  52.