From c3b51fd5ac0c57e14ab3d150954302bf1cc0ae0a Mon Sep 17 00:00:00 2001
From: lsv <ls7777@yandex.ru>
Date: Wed, 18 Feb 2026 16:10:47 +0500
Subject: [PATCH] Add context help for generation

---
 utils/_extract_func_help.pl | 31 ++++++++++++++++++++++++++++++-
 1 file changed, 30 insertions(+), 1 deletion(-)

diff --git a/utils/_extract_func_help.pl b/utils/_extract_func_help.pl
index 380ba0c..529b1a8 100644
--- a/utils/_extract_func_help.pl
+++ b/utils/_extract_func_help.pl
@@ -9,6 +9,30 @@ my %function_help;
 
 my %useref;
 my %section;
+my %my_help=(
+'@gen' =>'
+Скрипт генерации указывается в однострочном коментарии. Можно записать несколько скриптов для запроса.<br>
+<b>--@gen:Имя для генерации:@Колонка1@,@Колонка2[-1],ae@,@Колонка3[0],e@\tcol4=@col4@\n</b><br>
+<p>Имена колонок заключаются в "@" после имени, через запятую можно указать флаги.
+Значения колонок подставляются с учётом форматирования.<br>
+Глобальный флаг можно указать один раз в любой колонке. Разрешены спецпоследовательности <b>\n,\t,\r</b>.<br>
+Если все имена колонок присутсвуют в результате запроса то в контекстное меню результата добавляется
+ имя генерации.<br>
+Генерация работает для выделенных строк либо для всех строк.<br>
+Можно ссылать на предудущие строки если индекс в квадратных скобках отрицательный или 
+абсолютно если положительный. Первая строка имеет индекс 0.<br>
+Для первых двух скриптов можно применить быстрые клавиши <b>Ctrl+1</b>, <b>Ctrl+2</b>.<br>
+
+</p>
+<p>Флаги:<br>
+<blockquote>
+ <b>a</b> → глобальный флаг включающий выравнивание. Учитываются все переводы строк, первая строка как образец (см. Ctrl+Shift+A).<br>
+ <b>e</b> → отключить форматирование. Значение колонки выводиться как есть.<br>
+</blockquote>
+</p>
+
+'
+);
 my %ignorehtml=(
 'pgbench.html',
 
@@ -307,6 +331,11 @@ print " Ok.\n" if $cc > 0;
 print " TD count $TDcount\n";
 open(F, '>', "_func.txt") or die $!;
 my $c0=0;
+#append my help
+#
+foreach my $key (sort keys %my_help) {
+ $function_help{$key}=$my_help{$key};
+}
 foreach my $key (sort keys %useref) {
 
  $function_help{$key}=$section{$key};
@@ -328,7 +357,7 @@ foreach my $key (sort keys %function_help) {
 }
 close(F);
 exit;
-
+###################################################################
 sub parseTag
 {
 my $s=shift;