webern
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: #title = "Строки, печатные символы и пробелы - вывод в OutputBar"
#tooltip = "Строки, печатные символы и пробелы - вывод в OutputBar"
// Строки, печатные символы и пробелы - OutputBar.jsee
/* Данный Макрос
Подсчитывает в текущем документе:
1. количество строк, содержащих только печатные символы и пробелы (из подсчета исключаются строки, в которых имеются как печатные, так и непечатные символы)
2. количество только печатных симоволов и пробелов
3. сумму этих двух "количеств"
Выводит информацию о подсчетах в:
1. OutputBar
*/
if (!OutputBar.Visible) {
OutputBar.Visible = true;
}
if (document.selection.IsEmpty) {
xPos = document.selection.GetActivePointX(eePosLogical);
yPos = document.selection.GetActivePointY(eePosLogical);
var counted_Lines = 0; // кол-во строк, содержащих только печатные символы и пробелы
var counted_CHRs_SPCs = 0; // кол-во только печатных симоволов и пробелов
var sum_of_Both = 0;
var counted_Lines_TXT = '\u0009\u2190' + ' кол-во строк, содержащих ТОЛЬКО печатные символы и пробелы\n';
var counted_CHRs_SPCs_TXT = '\u0009\u2190' + ' кол-во печатных символов и пробелов\n';
var sum_of_Both_TXT = '\u0009\u2190' + ' сумма двух верхних чисел';
document.selection.SelectAll();
str = document.selection.Text;
str = str.replace(/\r\n/g, "\n").replace(/\r/g, "\n"); // convert to unix line endings for simplicity
if (! /\n$/.test(str)) str = str + "\n"; // make sure selection ends with newline
counted_CHRs_SPCs = str.replace(/\n/g, "").replace(/\t/g, "").length;
counted_Lines = document.selection.Find( '^[[:alnum:] [:punct:]][^\f\r\n\t\v[:cntrl:]]*$', eeFindReplaceRegExp | eeFindCount);
sum_of_Both = counted_Lines + counted_CHRs_SPCs;
document.selection.SetActivePoint(eePosLogical, xPos, yPos, false);
document.HighLightFind = false;
OutputBar.Clear();
OutputBar.writeln( counted_Lines + counted_Lines_TXT + counted_CHRs_SPCs + counted_CHRs_SPCs_TXT + sum_of_Both + sum_of_Both_TXT);
}
Quit();
|
|
Всего записей: 1022 | Зарегистр. 04-11-2004 | Отправлено: 18:37 14-03-2016 | Исправлено: webern, 19:13 14-03-2016 |
|
