1. 次行行頭への移動（例：movetolineno 0, lineno + 1;）の場合
   以下の３行を組み合わせて代用できます。

   golineend2; down; golinetop2;

   前行行頭への移動等も同様にできます。
2. 最終行にだけ飛べないんですから、いっそのこと最終行に改行を１つ挿入してマクロの最後で削除する、という手があります。
3. 「絶対に最終行には飛ばさない」という自信がある場合はそのまま使えます(^^;)

※ hidemaruhandle() 関数についてはマクロヘルプの「秀丸管理」の説明と「●setactivehidemaru 文の引数」を参照して下さい。

[解説]

1. ウィンドウ番号
   秀丸ウィンドウの「番号」とは、秀丸のウィンドウを画面手前から順に数えた番号になっています(一番手前が 0 です)。ファイル名からウィンドウ番号を取得するには findhidemaru() 関数を使います。

   //------- サンプルマクロ1 -------// // "c:\\hidemaru\\install.txt" のウィンドウ番号を取得する $file = "c:\\hidemaru\\install.txt"; #h_order = findhidemaru($file); message $file + " のウィンドウ番号は " + str(#h_order) + " です。"; if( #h_order != -1 ) setactivehidemaru #h_order; //切り替え endmacro; // ---------------------------- //

   ※ ファイルが開かれていない場合は、ウィンドウ番号は -1 になります。

2. ウィンドウハンドル
   1. で説明したウィンドウ番号は、setactivehidemaru を繰り返し使用してウィンドウの切り替えを行うと変化してしまいます。いちいち findhidemaru() 関数を使ってウィンドウ番号を取得してもいいのですが、「ウィンドウハンドル」を取得しておけば(ウィンドウを閉じない限り)そのウィンドウを一発で指定できます。

   //------- サンプルマクロ2 -------// // "c:\\hidemaru\\install.txt" のウィンドウハンドルを取得する $file = "c:\\hidemaru\\install.txt"; #h_wnd = hidemaruhandle(findhidemaru($file)); message $file + " のウィンドウハンドルは " + str(#h_wnd) + " です。"; if( #h_wnd != 0 ) setactivehidemaru #h_wnd; //切り替え endmacro; // ---------------------------- //

   ※ hidemaruhandle() 関数の引数にはハンドルを取得したいウィンドウのウィンドウ番号を指定します。ウィンドウが存在しない場合(ウィンドウ番号が -1 の場合)、hidemaruhandle() 関数は 0 を返します。

3. findhidemaru() 関数を使う場合の注意点
   findhidemaru() 関数の引数にアクティブウィンドウ(ウィンドウ番号 0)のファイル名を指定した場合も(ウィンドウが存在しない時と同様に) -1 を返すため、上記のサンプルマクロを c:\hidemaru\install.txt 上で実行すると「c:\hidemaru\install.txt のウィンドウ番号は -1 (ウィンドウハンドルは 0)です。」と嘘(^^;を言われてしまいます。
   例えばアクティブウィンドウのウィンドウハンドルを取得したい場合は、

   #hwnd_act = hidemaruhandle(findhidemaru(filename)); ※ filename には現在のウィンドウのファイル名が入る (「●「キーワード」とは？」を参照して下さい)。

   ではなく

   #hwnd_act = hidemaruhandle( 0 );

   と指定しなければ正しく動作しません。

なお、ステルスウィンドウに対する findwindow() 関数は失敗する場合が多いので、なるべく開いた「直後」に hidemaruhandle( 0 ) でウィンドウハンドルを取得しておきましょう。

※ なお、キーワードの値は「ウィンドウ」毎に定義されています。
(例： filename というキーワードには、そのウィンドウで開かれているファイルのファイル名が入っている。)

(例)ファイル名を変えるのに filename というキーワードの値を変えようとした。

filename = "c:\\temp\\test.txt"; //(エラー！！)

※ この場合は changename 文を使用して下さい。

[参考]
あまり使う事はないでしょうが(^^;、２次元配列を使えば以下の様な事もできます。

//------- サンプルマクロ -------// $a[0][0] = "メニュー１の項目１"; $a[0][1] = "メニュー１の項目２"; $a[1][0] = "メニュー２の項目１"; $a[1][1] = "メニュー２の項目２"; menuarray $a[0], 2; //「メニュー１」の表示 menuarray $a[1], 2; //「メニュー２」の表示 endmacro; // ---------------------------- //

// （例） 引用符を取得するマクロサンプル --------------------- $inyoufuini = getinistr("HIDEMARU.INI", "Env", "RefMark"); #inyoufuiniLen = strlen($inyoufuini); if (#inyoufuiniLen <= 2) { $inyoufu = ""; } else { $inyoufu = midstr($inyoufuini, 1, #inyoufuiniLen - 2); } message $inyoufu; // （ここまで）-----------------------------------------------

[解説]
引用符の文字列は、16bit版秀丸では、HIDEMARU.INIの[Env]セクションの RefMark= に、@ @ でくくられて格納されていますので、不要な @ @ を後で削除します。
秀丸95でも互換性が保たれていますので、このままで動作します。
ただし、秀丸インストール直後には RefMark= キー自体が存在していないので、処理内容によっては注意が必要な場合があります。

以下の例では、"0"〜"9"の文字を繰り返し1000個まで表示させます。「中止」ボタンをクリックすると処理を中断します。

// マクロサーバで常にダイアログを表示させるサンプル run "macserv.exe"; ddeinitiate "HideMacroServer", "AllService"; ddepoke "newdialog", "20,秀丸マクロ"; ddepoke "newcontrol", "text,,処理中です"; ddepoke "newcontrol", "defbutton,,中止"; ddepoke "notify", "10"; $item = ""; ddestartadvice "dlgresult", $item; ddeexecute "dialog lastactiveparent"; while( 1 ){ ddewaitadvice $item, 10; // 「中止」ボタンが押されたら終了する if( $item != "" ) break; // 元々のコード例：ここから // 終わったら break でループを抜ける #n = #n + 1; #m = #m + 1; if (#n > 9) #n = 0; insert str(#n); if (#m > 1000) break; // 元々のコード例：ここまで } ddeexecute "enddialog"; ddestopadvice "dlgresult"; ddeexecute "exit"; endmacro; // （ここまで）-----------------------------------------------

// a1.mac --------------------- $wk1 = input("血液型を入力してください!",""); if( $wk1 == "O" || $wk1 == "A" || $wk1 == "B" || $wk1 == "AB" ){ message "血液型 : " + $wk1; } else { message "間違った血液型です !"; } endmacro; // （ここまで）-----------------------------------------------

// a2.mac --------------------- $wk1 = input("血液型を入力してください!",""); if( strstr("|O|A|B|AB|","|"+$wk1+"|") != -1 ){ message "血液型 : " + $wk1; } else { message "間違った血液型です !"; } endmacro; // （ここまで）-----------------------------------------------

この a1.mac と a2.mac は同じ結果となります。"|" は、一般的には区切文字 (区切記号) と呼ばれ、入力文字としてありえない文字を使用すると文が見やすくなります。全角文字 (Shift-JIS の場合) を処理するときには、! - / などの 0x40 (16 進数) より小さな文字を区切文字にします。

全角半角の文字が混在するときは完璧なチェック方法にはなりませんが、実用レベルには耐えるでしょう。

// (例) --------------------- $wk1 = input("数値を入力してください!",""); if( $wk1 == str(val($wk1)) ){ message "数値 : " + $wk1; } else { message "数値ですか ! \n" + $wk1; } endmacro; // （ここまで）-----------------------------------------------

入力文字列を、val 関数で数値にして、次に str 関数で文字列にして、最初の入力文字列と比較しています。完璧なチェック方法ではありませんが、実用レベルには耐えるでしょう。この例では、+ 符号、全角文字 (数字) の考慮はありません。

// サンプルマクロ（ここから） #Code = code; if( #Code == 0 ) { // フリーカーソルで改行以降 message "改行以降"; } else if( #Code == 0x09 ) { // タブ message "タブ"; } else if( #Code == 0x0d ) { // 改行 message "改行"; } else if( #Code == eof ) { // EOF message "EOF"; } else if( ( code & 0xff00 ) != 0 ) { // ２バイト文字 message "２バイト文字"; } else { message "１バイト文字"; } endmacro; // サンプルマクロ（ここまで）

文字列変数の中の文字列をバイト単位ではなく文字単位で扱いたい場合は、[HMM0073A] ●文字列をバイト単位ではなく文字単位で扱う を参照して下さい。

// サンプルマクロ（ここから） $Str = "AＡBＢCＣ"; call leftstr2 $Str, 2; message "左２文字=[" + $$return + "]"; call rightstr2 $Str, 2; message "右２文字=[" + $$return + "]"; call midstr2 $Str, 2, 2; message "中２文字=[" + $$return + "]"; endmacro; //---------------------------------- // 文字列の左側部分 // // (引数) $$1: 文字列、##2: 文字数 // (返り値) $$return: 文字列 //---------------------------------- leftstr2: call midstr2 $$1, 0, ##2; return $$return; //---------------------------------- // 文字列の右側部分 // // (引数) $$1: 文字列、##2: 文字数 // (返り値) $$return: 文字列 //----------------------------------// rightstr2: call strlen2 $$1; ##Pos = ##return - ##2; if( ##Pos < 0 ) { ##Pos = 0; } call midstr2 $$1, ##Pos, ##2; return $$return; //-------------------------------------- // 文字列の中央部分 // (引数) $$1: 文字列、##2: 取得位置、##3: 文字数 // (返り値) $$return: 文字列 //-------------------------------------- midstr2: $$Str = ""; ##StrLen = strlen( $$1 ); ##I = 0; ##J = 0; while( ##I < ##StrLen ) { if( ##J >= ##2 ) { break; } if( ( ascii( midstr( $$1, ##I, 2 ) ) & 0xff00 ) != 0 ) { // ２バイト文字 ##I = ##I + 2; } else { ##I = ##I + 1; } ##J = ##J + 1; } ##J = 0; while( ##I < ##StrLen ) { if( ##J >= ##3 ) { break; } $$Wk = midstr( $$1, ##I, 2 ); if( ( ascii( $$Wk ) & 0xff00 ) != 0 ) { // ２バイト文字 ##I = ##I + 2; } else { $$Wk = midstr( $$1, ##I, 1 ); ##I = ##I + 1; } $$Str = $$Str + $$Wk; ##J = ##J + 1; } return $$Str; //------------------------------------------ // 文字列の長さ // (引数) $$1: 文字列 // (返り値) ##return: 文字列の長さ //------------------------------------------ strlen2: ##StrLen = strlen( $$1 ); ##I = 0; ##StrLen2 = 0; while( ##I < ##StrLen ) { if( ( ascii( midstr( $$1, ##I, 2 ) ) & 0xff00 ) != 0 ) { // ２バイト文字 ##I = ##I + 2; } else { ##I = ##I + 1; } ##StrLen2 = ##StrLen2 + 1; } return ##StrLen2; // サンプルマクロ（ここまで）

// サンプルマクロ（ここから） $FNm = basename2; call strstr2 $FNm, "."; #Pos = ##return; if( #Pos == -1 ) { // 拡張子なし $Exp = ""; } else { $Exp = rightstr( $FNm, strlen( $FNm ) - #Pos - 1 ); } message "拡張子は[" + $Exp + "]です。"; endmacro; //---------------------------------------------------------- // 文字列の後方から文字列を検索 // // (引数) $$1: 文字列、$$2: 検索文字列 // (返り値) ##return: 見つかった位置（0オリジン）、-1:見つからなかった //---------------------------------------------------------- strstr2: ##RC = -1; $$Wk = $$1; ##Flg = 1; ##Size = 1; if( ( ascii( $$2 ) & 0xff00 ) != 0 ) { ##Size = 2; } while( 1 ) { ##Pos = strstr( $$Wk, $$2 ); if( ##Pos == -1 ) { break; } ##RC = ##RC + ##Pos + ##Flg; ##Flg = ##Size; $$Wk = rightstr( $$Wk, strlen( $$Wk ) - ##Pos - ##Size ); } return ##RC; // サンプルマクロ（ここまで）

1. 浮動小数点数版のほうが扱える数値の範囲が広い（小数も使える、大きい/小さい値を使える）ので、通常版の数値の仕様におさまらない場合があります。
2. 通常版の秀丸の仕様である、数値型変数に整数しか入らないことを前提としたコーディングをしているマクロは、誤動作する可能性があります。

#i = 1.5 ;

後者の例としては、/ （除算）の演算結果を変数に格納すると、通常版秀丸では整数の商が入り、余りが切り捨てられます。しかし、浮動小数点数版秀丸では、小数まで含んだ解が入ります。
その除算の結果をもとに条件判定すると、通常版と浮動小数点数版とで動作が異なる場合が出てきます。

以下の例は、#space個の半角スペースを$spaceに格納する例です。単にループして半角スペースを１個ずつ足していくよりも、以下のようにしたほうが秀丸マクロでは実行速度が出ます。
以下のコーディングでは、通常版では正しく動作しますが、浮動小数点数版で動作させると、whileループが意図したよりも１回多く回ることになります。
例えば #space == 10 の場合、#space / 80 == 0 であり、whileループの中のコードは実行されないというのが意図している動作です。浮動小数点数版では、#space / 80 == 0.125 であるため、whileループの中のコードが１回実行されてしまいます。

$space = ""; #sp1 = #space / 80; #sp2 = #space % 80; while (#sp1 > 0) { $space = $space + $space80; #sp1 = #sp1 - 1; } $space = $space + leftstr($space80, #sp2);

通常版も浮動小数点数版も同様に動作させるための方法は、意図している動作とロジックの関係で、必ずしも一概にはいえませんが、この例の場合、while文を

while (#sp1 >= 1) {

#sp1 = (#space - (#space % 80)) / 80;

//------------------ uniq.mac ------------------------------------- disabledraw; gofiletop; while(1){ selectline; $$line = gettext(seltopx,seltopy,selendx,selendy); if($$line == $$bline){ selectline; delete; } else movetolineno 1,lineno + 1; if(lineno == linecount2) break; $$bline = $$line; } enabledraw; endmacro;