Работа с буфером обмена

string test="a ! bcd? #ef";

regexreplace(-1, #test, test, "[\^\{\#\!\? ]", "", SINGLELINE | MULTILINE);
messagebox(test);

external(INT, "lstrcmp", "lstrcmpA", "Kernel32.dll" );

string s, ss[9999];
readclipboard(s);
if(size(s))
{
int count_string=regexsearch(sizearray(ss), #ss[0], s, "[^\r\n]+");
messagebox("Всего строк: "+format(count_string));

if(count_string)
{
sort_array(#ss[0], count_string); // сортировка

s="";
for(int i=0; i<count_string; i++)s=s+ss[i]+formatic(13)+formatic(10);
messagebox(s);
}
}
else messagebox("В буфере не текст");



function sort_array(string #m, int count_item_to_sort)
{
int imin;
string min, temp;
for(int i=0; i<count_item_to_sort-1; i++)
{
min=m[i]; imin=i;
for(int j=i+1; j<count_item_to_sort; j++)
{
if(lstrcmp(m[j], min)==-1){min=m[j]; imin = j;}
}
temp=m[i]; m[i]=m[imin]; m[imin]=temp;
}
}