秀丸で範囲選択マクロが動かない

お世話になります。
秀丸Ver9.37で、ソースファイルの編集を行っています。
複数行を選択後に、下記マクロを実行すると、
選択した行に対してコメント追加をしたいです。
マクロを実行すると、「変数への代入がおかしいです」と表示されました。
見直し箇所を教えてください。
よろしくお願いいたします。

●マクロ実行前（下記の3行を範囲選択）
printf("test1");
printf("test2");
printf("test3");

●期待するマクロ実行結果
// (編集前)
//printf("test1");
//printf("test2");
//printf("test3");
// (編集後)


// 選択した行に対してコメント追加
#define HmMacro hmemacro
hmemacro {
// 選択範囲の内容を取得
$str = gettext(seltopx,seltopy,selendx,selendy);

// 選択範囲のテキストをコメント化して編集
outtext("// (編集前)\n");
outtext("//" + $str + "\n");
outtext("// (編集後)\n");
}

質問者からの補足コメント

• 

  risaghon さんの回答を参考に見直してみました。
  // 選択した行に対してコメント追加
  // 選択範囲の内容を取得
  $str = gettext(seltopx,seltopy,selendx,selendy);
  // カーソルを削除した範囲に戻す
  moveto seltopx, seltopy;
  // 選択範囲のテキストを削除
  deleteline(1);
  
  // 選択範囲のテキストをコメント化して編集
  insert("// (編集前)\n");
  insert("//" + $str);
  insert("// (編集後)\n");
  
  １行の選択後（printf("test1");の１行を選択）マクロを実行すると、期待通りの結果となりました。
  // (編集前)
  //printf("test1");
  // (編集後)
  printf("test2");
  printf("test3");

    補足日時：2024/11/03 15:07

• 

  しかし、複数行を選択後（printf("test1"); printf("test2"); printf("test3");の３行を選択）の
  マクロ実行結果は、下記の結果となりました。
  
  // (編集前)
  //printf("test1");
  printf("test2");
  printf("test3");
  // (編集後)
  printf("test2");
  printf("test3");

    補足日時：2024/11/03 15:08

No.2 ベストアンサー 回答者： risaghon 回答日時： 2024/11/03 19:28

No.1です。

ご質問文をよく読んでおりませんでした。

ほにゃらら
ほにゃらら
printf("test1");
printf("test2");
printf("test3");
ほにゃらら
ほにゃらら

のうち、

ほにゃらら
ほにゃらら
printf("test1");　←ここを選択
printf("test2");　←ここを選択
printf("test3");　←ここを選択
ほにゃらら
ほにゃらら

という意味ですねっ

つまり

printf("test1");　←ここを選択
printf("test2");
printf("test3");

の場合

// (編集前)
// printf("test1");
// (編集後)
printf("test2");
printf("test3");

になって、

printf("test1");　←ここを選択
printf("test2");　←ここを選択
printf("test3");

の場合

// (編集前)
// printf("test1");
// printf("test2");
// (編集後)
printf("test3");

になって、

printf("test1");　←ここを選択
printf("test2");　←ここを選択
printf("test3");　←ここを選択

の場合

// (編集前)
// printf("test1");
// printf("test2");
// printf("test3");
// (編集後)

になるという意味で解釈をしました。

その場合、以下はどうでしょうか？

$BeginOfLine = "// ";
$Top = "// (編集前)\n";
$End = "// (編集後)\n";

if ( selecting == 1 )
{
escape;

#TargetLine = seltopy + 1;
#TopOfLine = seltopy + 1;

if ( selendx == 0 )
{
#EndOfLine = selendy;
}
else
{
#EndOfLine = selendy + 1;
}

movetolineno 1, seltopy + 1;
}
else
{
#TargetLine = lineno;
#EndOfLine = lineno;
}

gofileend;
#FileEndLine = lineno;

movetolineno 1, #TargetLine;
insert $TopOfLine;
movetolineno 1, #TargetLine;

while ( #TargetLine != #EndOfLine + 1 )
{
golinetop;
insert $BeginOfLine;

#TargetLine = #TargetLine + 1;

if ( #TargetLine >= #FileEndLine )
{
break;
}

movetolineno 1, #TargetLine;

}

movetolineno 1, #TopOfLine;
insert $Top;
movetolineno 1, #EndOfLine + 2;
insert $End;

この回答へのお礼

risaghon さんへ
再度の回答ありがとうございます。
お陰様で期待通りの処理結果となりました。
感謝申し上げます。

さて、追加で質問よろしいでしょうか？
TopOfLine変数についてですが、10行目は数値型変数、33行目は文字列型変数のように見られます。

10行目: #TopOfLine = seltopy + 1;
33行目: insert $TopOfLine;

同一変数名で、数値型変数と文字列型変数の扱いに教えて頂ければ幸いです。

お礼日時：2024/11/04 03:03

No.3 回答者： risaghon 回答日時： 2024/11/04 09:29

＞33行目: insert $TopOfLine;

movetolineno 1, #TargetLine;
insert $TopOfLine;
movetolineno 1, #TargetLine;

このうち、2行必要ありませんね。
適宜削除して戴けますと幸いです。
今読んでて意味不明の行ですね。

この回答へのお礼

ご親切に何度もお答えいただき、本当にありがとうございました。

お礼日時：2024/11/04 10:52

No.1 回答者： risaghon 回答日時： 2024/11/03 03:51

秀丸懐かしいです。

パスが〇千円で…

私の秀丸がV8.xでしたので最新版を
入れてみましたがouttextがダメみたい
ですね。

以下ではどうでしょうか。

golinetop;
insert "(編集前)\n";
gofileend;
insert "(編集後)\n";

$str = gettext(seltopx,seltopy,selendx,selendy,0);

replaceall "^" , "// " , regular, nocasesense, nohilight;

この回答へのお礼

早速の回答ありがとうございました。
outtextの部分ですね！
見直してみます。

お礼日時：2024/11/03 14:56