行を上下に移動（Mery 2.7 用） - 版の履歴

MSY-07: ソースコードの整形

2025-08-31T15:05:47Z

ソースコードの整形

MSY-07: SyntaxHighlightのstyle属性を除去

2025-08-31T11:34:03Z

SyntaxHighlightのstyle属性を除去

← 古い版		2025年8月31日 (日) 20:34時点における版
19行目:		19行目:
	== ソースコード ==		== ソースコード ==
	=== 行を上に移動 ===		=== 行を上に移動 ===
	<syntaxhighlight lang="javascript~~" style="height:60em; overflow:auto;~~">		<syntaxhighlight lang="javascript">
	#title = "行を上に移動"		#title = "行を上に移動"
	#tooltip = "行を上に移動 (複数行可)"		#tooltip = "行を上に移動 (複数行可)"
130行目:		130行目:

	=== 行を下に移動 ===		=== 行を下に移動 ===
	<syntaxhighlight lang="javascript~~" style="height:60em; overflow:auto;~~">		<syntaxhighlight lang="javascript">
	#title = "行を下に移動"		#title = "行を下に移動"
	#tooltip = "行を下に移動 (複数行可)"		#tooltip = "行を下に移動 (複数行可)"

MSY-07: 改行の修正、空行の除去

2023-05-20T19:33:18Z

改行の修正、空行の除去

← 古い版		2023年5月21日 (日) 04:33時点における版
2行目:		2行目:
	2019/05/07 sukemaru		2019/05/07 sukemaru

	[https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示'''」が実装されて以来、複数行の選択範囲で「[[選択範囲を上下に移動]]」マクロを実行すると行番号が太字だらけになってしまっていましたが、[https://www.haijin-boys.com/software/mery/mery-2-7-0 Mery 2.7.0] で'''スクロールバーマーカー'''が実装されたことにより「変更行」がますます目立つようになりました。~~<br>~~		[https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示'''」が実装されて以来、複数行の選択範囲で「[[選択範囲を上下に移動]]」マクロを実行すると行番号が太字だらけになってしまっていましたが、[https://www.haijin-boys.com/software/mery/mery-2-7-0 Mery 2.7.0] で'''スクロールバーマーカー'''が実装されたことにより「変更行」がますます目立つようになりました。
	このマクロでは、Mery 2.7.0 から実装された [https://www.haijin-boys.com/software/mery/mery-2-7-0#5 BeginUndoGroup／EndUndoGroup メソッド] を活用し、あえて「マクロの記録」で生成したようなコードにして「変更行の強調表示」を最小限にしてあります。~~<br>~~
			このマクロでは、Mery 2.7.0 から実装された [https://www.haijin-boys.com/software/mery/mery-2-7-0#5 BeginUndoGroup／EndUndoGroup メソッド] を活用し、あえて「マクロの記録」で生成したようなコードにして「変更行の強調表示」を最小限にしてあります。

	<span style="color:#c00;">※ '''Mery 2.7.4 以上'''のバージョンであれば「ブックマーク」を維持できるようにしてありますが、それ以前のバージョンの Mery でこのマクロを実行した場合は「変更行の強調だらけ」「ブックマーク設定が消える」仕様で動作します。 </span>		<span style="color:#c00;">※ '''Mery 2.7.4 以上'''のバージョンであれば「ブックマーク」を維持できるようにしてありますが、それ以前のバージョンの Mery でこのマクロを実行した場合は「変更行の強調だらけ」「ブックマーク設定が消える」仕様で動作します。 </span>


	選択範囲が複数行のときを考慮した動作仕様になっています。		選択範囲が複数行のときを考慮した動作仕様になっています。
15行目:		16行目:
	== ダウンロード ==		== ダウンロード ==
	「[[ファイル:行を上下に移動（Mery 2.7 用）.zip]]」（アイコン入り）		「[[ファイル:行を上下に移動（Mery 2.7 用）.zip]]」（アイコン入り）


	== ソースコード ==		== ソースコード ==

	=== 行を上に移動 ===		=== 行を上に移動 ===
	<syntaxhighlight lang="javascript" style="height:60em; overflow:auto;">		<syntaxhighlight lang="javascript" style="height:60em; overflow:auto;">
129行目:		128行目:
	}		}
	</syntaxhighlight>		</syntaxhighlight>


	=== 行を下に移動 ===		=== 行を下に移動 ===

MSY-07: タグをタグに置き換え

2023-05-16T19:15:07Z

<source>タグを<syntaxhighlight>タグに置き換え

← 古い版		2023年5月17日 (水) 04:15時点における版
20行目:		20行目:

	=== 行を上に移動 ===		=== 行を上に移動 ===
	<~~source~~ lang="javascript" style="height:60em; overflow:auto;">		<syntaxhighlight lang="javascript" style="height:60em; overflow:auto;">
	#title = "行を上に移動"		#title = "行を上に移動"
	#tooltip = "行を上に移動 (複数行可)"		#tooltip = "行を上に移動 (複数行可)"
128行目:		128行目:
	return ( editorVer >= requirement );		return ( editorVer >= requirement );
	}		}
	</~~source~~>		</syntaxhighlight>


	=== 行を下に移動 ===		=== 行を下に移動 ===
	<~~source~~ lang="javascript" style="height:60em; overflow:auto;">		<syntaxhighlight lang="javascript" style="height:60em; overflow:auto;">
	#title = "行を下に移動"		#title = "行を下に移動"
	#tooltip = "行を下に移動 (複数行可)"		#tooltip = "行を下に移動 (複数行可)"
235行目:		235行目:
	return ( editorVer >= requirement );		return ( editorVer >= requirement );
	}		}
	</~~source~~>		</syntaxhighlight>

Sukemaru: /* 行を上下に移動（Mery 2.7 用） */

2019-05-07T13:50:26Z

行を上下に移動（Mery 2.7 用）

← 古い版		2019年5月7日 (火) 22:50時点における版
9行目:		9行目:
	選択範囲が複数行のときを考慮した動作仕様になっています。		選択範囲が複数行のときを考慮した動作仕様になっています。
	*「選択範囲を含む論理行全体」が上下に移動します。		*「選択範囲を含む論理行全体」が上下に移動します。
			*選択範囲がないときは、カーソルのある行を移動します。
	*行の途中から始まる選択範囲や、行の途中で終わる選択範囲は「論理行全体」にまで拡張します。		*行の途中から始まる選択範囲や、行の途中で終わる選択範囲は「論理行全体」にまで拡張します。
	*行番号のクリック＆ドラッグで複数行を範囲選択した場合、カーソル位置がひとつ下の行の先頭になりますが、選択範囲を自動的に調整して「さいごの改行」は無視します。		*行番号のクリック＆ドラッグで複数行を範囲選択した場合、カーソル位置がひとつ下の行の先頭になりますが、選択範囲を自動的に調整して「さいごの改行」は無視します。

Sukemaru: /* ソースコード */

2019-05-07T13:49:07Z

ソースコード

← 古い版		2019年5月7日 (火) 22:49時点における版
22行目:		22行目:
	#title = "行を上に移動"		#title = "行を上に移動"
	#tooltip = "行を上に移動 (複数行可)"		#tooltip = "行を上に移動 (複数行可)"
	~~#icon = "arrows_swap_up.ico"~~
	// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",223		// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",223

119行目:		118行目:
	}		}

	/**
	* 組み込み関数 VersionCheck( versionStr )
	*/
	function VersionCheck( versionStr ) {		function VersionCheck( versionStr ) {
	var Pad2 = function ( str ) {		var Pad2 = function ( str ) {
138行目:		134行目:
	#title = "行を下に移動"		#title = "行を下に移動"
	#tooltip = "行を下に移動 (複数行可)"		#tooltip = "行を下に移動 (複数行可)"
	~~#icon = "arrows_swap_down.ico"~~
	// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",222		// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",222

230行目:		225行目:
	}		}

	/**
	* 組み込み関数 VersionCheck( versionStr )
	*/
	function VersionCheck( versionStr ) {		function VersionCheck( versionStr ) {
	var Pad2 = function ( str ) {		var Pad2 = function ( str ) {

Sukemaru: /* 行を上下に移動（Mery 2.7 用） */

2019-05-07T13:47:26Z

行を上下に移動（Mery 2.7 用）

← 古い版		2019年5月7日 (火) 22:47時点における版
2行目:		2行目:
	2019/05/07 sukemaru		2019/05/07 sukemaru

	[https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示'''」が実装されて以来、複数行の選択範囲で「[[~~行を上下に移動~~]]」マクロを実行すると行番号が太字だらけになってしまっていましたが、[https://www.haijin-boys.com/software/mery/mery-2-7-0 Mery 2.7.0] で'''スクロールバーマーカー'''が実装されたことにより「変更行」がますます目立つようになりました。<br>		[https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示'''」が実装されて以来、複数行の選択範囲で「[[選択範囲を上下に移動]]」マクロを実行すると行番号が太字だらけになってしまっていましたが、[https://www.haijin-boys.com/software/mery/mery-2-7-0 Mery 2.7.0] で'''スクロールバーマーカー'''が実装されたことにより「変更行」がますます目立つようになりました。<br>
	このマクロでは、Mery 2.7.0 から実装された [https://www.haijin-boys.com/software/mery/mery-2-7-0#5 BeginUndoGroup／EndUndoGroup メソッド] を活用し、あえて「マクロの記録」で生成したようなコードにして「変更行の強調表示」を最小限にしてあります。<br>		このマクロでは、Mery 2.7.0 から実装された [https://www.haijin-boys.com/software/mery/mery-2-7-0#5 BeginUndoGroup／EndUndoGroup メソッド] を活用し、あえて「マクロの記録」で生成したようなコードにして「変更行の強調表示」を最小限にしてあります。<br>
	<span style="color:#c00;">※ '''Mery 2.7.4 以上'''のバージョンであれば「ブックマーク」を維持できるようにしてありますが、それ以前のバージョンの Mery でこのマクロを実行した場合は「変更行の強調だらけ」「ブックマーク設定が消える」仕様で動作します。 </span>		<span style="color:#c00;">※ '''Mery 2.7.4 以上'''のバージョンであれば「ブックマーク」を維持できるようにしてありますが、それ以前のバージョンの Mery でこのマクロを実行した場合は「変更行の強調だらけ」「ブックマーク設定が消える」仕様で動作します。 </span>
11行目:		11行目:
	*行の途中から始まる選択範囲や、行の途中で終わる選択範囲は「論理行全体」にまで拡張します。		*行の途中から始まる選択範囲や、行の途中で終わる選択範囲は「論理行全体」にまで拡張します。
	*行番号のクリック＆ドラッグで複数行を範囲選択した場合、カーソル位置がひとつ下の行の先頭になりますが、選択範囲を自動的に調整して「さいごの改行」は無視します。		*行番号のクリック＆ドラッグで複数行を範囲選択した場合、カーソル位置がひとつ下の行の先頭になりますが、選択範囲を自動的に調整して「さいごの改行」は無視します。


	== ダウンロード ==		== ダウンロード ==

Sukemaru: ページの作成:「== 行を上下に移動（Mery 2.7 用） == 2019/05/07 sukemaru [https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示''...」

2019-05-07T13:34:39Z

ページの作成:「== 行を上下に移動（Mery 2.7 用） == 2019/05/07 sukemaru [https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示''...」

新規ページ

== 行を上下に移動（Mery 2.7 用） ==
2019/05/07 sukemaru

[https://www.haijin-boys.com/software/mery/mery-2-6-9#4 Mery 2.6.9] で「'''変更行の強調表示'''」が実装されて以来、複数行の選択範囲で「[[行を上下に移動]]」マクロを実行すると行番号が太字だらけになってしまっていましたが、[https://www.haijin-boys.com/software/mery/mery-2-7-0 Mery 2.7.0] で'''スクロールバーマーカー'''が実装されたことにより「変更行」がますます目立つようになりました。<br>
このマクロでは、Mery 2.7.0 から実装された [https://www.haijin-boys.com/software/mery/mery-2-7-0#5 BeginUndoGroup／EndUndoGroup メソッド] を活用し、あえて「マクロの記録」で生成したようなコードにして「変更行の強調表示」を最小限にしてあります。<br>
<span style="color:#c00;">※ '''Mery 2.7.4 以上'''のバージョンであれば「ブックマーク」を維持できるようにしてありますが、それ以前のバージョンの Mery でこのマクロを実行した場合は「変更行の強調だらけ」「ブックマーク設定が消える」仕様で動作します。 </span>

選択範囲が複数行のときを考慮した動作仕様になっています。
*「選択範囲を含む論理行全体」が上下に移動します。
*行の途中から始まる選択範囲や、行の途中で終わる選択範囲は「論理行全体」にまで拡張します。
*行番号のクリック＆ドラッグで複数行を範囲選択した場合、カーソル位置がひとつ下の行の先頭になりますが、選択範囲を自動的に調整して「さいごの改行」は無視します。

== ダウンロード ==
「[[ファイル:行を上下に移動（Mery 2.7 用）.zip]]」（アイコン入り）

== ソースコード ==

=== 行を上に移動 ===
<source lang="javascript" style="height:60em; overflow:auto;">
#title = "行を上に移動"
#tooltip = "行を上に移動 (複数行可)"
#icon = "arrows_swap_up.ico"
// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",223

var d = editor.ActiveDocument;
var s = editor.ActiveDocument.selection;
// 移動元の選択範囲
var ty = s.GetTopPointY( mePosLogical );
var by = s.GetBottomPointY( mePosLogical );
var bx = s.GetBottomPointX( mePosLogical );

// 「行を上に移動」の中断処理
if ( d.ReadOnly ) {
Status = "　ドキュメントは書き換え禁止です。";
}
else if ( ty == 1 ) { // 上にいけない
Status = "　ファイルの先頭です";
}

else {
Redraw = false;
// 選択範囲の末尾が終端の空行 ( ^[EOF] ) にあるときの調整
// カーソル位置に文字がないばあいを [EOF] と判定する
var eof = ( bx == 1 && ! d.Text.charAt( s.GetActivePos() ) )
? "\n" : "";
// 選択範囲の末尾が行頭にあるときの調整
if ( ty != by && bx == 1 ) {
by --;
}

/* 移動範囲のブックマーク設定を維持する（Mery 2.7.4 以上） */
if ( VersionCheck( "2.7.4" ) ) {
BeginUndoGroup();
var sy = ScrollY;
// 選択範囲を確定する
s.SetAnchorPoint( mePosLogical, 1, ty );
s.SetActivePoint( mePosLogical, 1, by, true );
s.EndOfLine( true, mePosLogical );
if ( eof ) {
s.SetActivePos( s.GetActivePos() + 1, true );
}
var tp = s.GetAnchorPos();
var bp = s.GetActivePos();
// 「移動先の行」
var pLine = d.GetLine( ty - 1, 0 );
// 移動元の先頭行と「移動先の行」のブックマークを確認
var nBookmark, pBookmark;
s.SetActivePos( tp - 1 );
if ( s.NextBookmark()
&& s.GetActivePointY( mePosLogical ) == ty ) {
nBookmark = true;
}
s.SetActivePos( tp );
if ( s.PreviousBookmark()
&& s.GetActivePointY( mePosLogical ) == ty - 1 ) {
pBookmark = true;
}
// 選択範囲の末尾に「移動先の行」の文字列を追加
s.SetActivePos( bp );
s.Text = "\n" + pLine;
if ( pBookmark ) {
editor.ExecuteCommandByID( MEID_EDIT_TOGGLE_BOOKMARK = 2126 );
}
// 「移動先の行」（上）を削除
s.SetActivePos( tp - 1 );
s.SelectLine();
s.Delete();
// ブックマークを復旧
if ( nBookmark != pBookmark ) {
editor.ExecuteCommandByID( MEID_EDIT_TOGGLE_BOOKMARK = 2126 );
}
// 範囲選択（カーソルは移動後の先頭）
s.SetAnchorPoint( mePosLogical, 1, by + eof.length );
ScrollY = sy;
}

/* 移動範囲のブックマーク設定を維持しない */
else {
// 選択範囲を拡張する
s.SetAnchorPoint( mePosLogical, 1, ty - 1 );
s.SetActivePoint( mePosLogical, 1, by, true );
s.EndOfLine( true, mePosLogical );
if ( eof ) {
s.SetActivePos( s.GetActivePos() + 1, true );
}
// 選択行を上へ移動
var a = s.Text.split( "\n" );
a.push( a.shift() );
s.Text = a.join( "\n" );
// 移動元のテキストを範囲選択（末尾改行 \n を含める）
// カーソルは移動後の先頭
s.StartOfLine( false, mePosLogical );
s.SetAnchorPos( s.GetActivePos() );
s.SetActivePoint( mePosLogical, 1, ty - 1, true );
}
Redraw = true;
}

/**
* 組み込み関数 VersionCheck( versionStr )
*/
function VersionCheck( versionStr ) {
var Pad2 = function ( str ) {
return str.toString().replace( /[0-9]+/g , function( tmp ) {
return tmp.length < 2 ? "0" + tmp : tmp; } );
};
var editorVer = Number( Pad2( editor.Version ).replace( /\./g, "" ).slice( 0, 6 ) );
var requirement = Number( Pad2( versionStr ).replace( /\./g, "" ).slice( 0, 6 ) );
return ( editorVer >= requirement );
}
</source>

=== 行を下に移動 ===
<source lang="javascript" style="height:60em; overflow:auto;">
#title = "行を下に移動"
#tooltip = "行を下に移動 (複数行可)"
#icon = "arrows_swap_down.ico"
// #icon = "Mery用マテリアルデザインっぽいアイコン.icl",222

var d = editor.ActiveDocument;
var s = editor.ActiveDocument.selection;
// 移動元の選択範囲
var ty = s.GetTopPointY( mePosLogical );
var by = s.GetBottomPointY( mePosLogical );
var bx = s.GetBottomPointX( mePosLogical );
// 選択範囲の末尾が終端の空行 ( ^[EOF] ) にあるときの調整
// カーソル位置に文字がないばあいを [EOF] と判定する
var eof = ( bx == 1 && ! d.Text.charAt( s.GetActivePos() ) )
? true : false;
// 選択範囲の末尾が行頭にあるときの調整
if ( ty != by && bx == 1 && ! eof ) {
by --;
}

// 「行を下に移動」の中断処理
if ( d.ReadOnly ) {
Status = "　ドキュメントは書き換え禁止です。";
}
else if ( by == d.GetLines( 0 ) ) { // 下にいけない
Status = "　ファイルの末尾です";
}

else {
Redraw = false;

/* 移動先のブックマーク設定を維持する（Mery 2.7.4） */
if ( VersionCheck( "2.7.4" ) ) {
BeginUndoGroup();
var sy = ScrollY;
// 選択範囲を確定する
s.SetAnchorPoint( mePosLogical, 1, ty );
s.SetActivePoint( mePosLogical, 1, by, true );
s.EndOfLine( true, mePosLogical );
var len = s.Text.length;
var tp = s.GetAnchorPos();
var bp = s.GetActivePos();
// 「移動先の行」
var nLine = d.GetLine( by + 1, 0 );
// 移動元の先頭行と「移動先の行」のブックマークを確認
var nBookmark, pBookmark;
s.SetActivePoint( mePosLogical, 1, ty + 1 );
if ( s.PreviousBookmark()
&& s.GetActivePointY( mePosLogical ) == ty ) {
pBookmark = true;
}
s.SetActivePos( bp );
if ( s.NextBookmark()
&& s.GetActivePointY( mePosLogical ) == by + 1 ) {
nBookmark = true;
}
// 「移動先の行」（下）を削除
s.SetAnchorPos( bp );
s.SetActivePos( bp + 1, true );
s.EndOfLine( true, mePosLogical );
s.Delete();
// 選択範囲の先頭に「移動先の行」の文字列を追加
s.SetActivePos( tp );
// ブックマークを復旧
if ( nBookmark != pBookmark ) {
editor.ExecuteCommandByID( MEID_EDIT_TOGGLE_BOOKMARK = 2126 );
}
s.Text = nLine + "\n";
if ( pBookmark ) {
editor.ExecuteCommandByID( MEID_EDIT_TOGGLE_BOOKMARK = 2126 );
}
// 範囲選択（カーソルは移動後の先頭）
s.SetAnchorPos( s.GetActivePos() + len + 1 );
ScrollY = sy;
}

/* 移動範囲のブックマーク設定を維持しない */
else {
// 選択範囲を拡張する
s.SetAnchorPoint( mePosLogical, 1, ty );
s.SetActivePoint( mePosLogical, 1, by + 1, true );
s.EndOfLine( true, mePosLogical );
// 選択行を下へ移動
var a = s.Text.split( "\n" );
a.unshift( a.pop() );
s.Text = a.join( "\n" );
// 移動元のテキストを範囲選択（末尾改行 \n を含める）
// カーソルは移動後の先頭
s.SetAnchorPos( s.GetActivePos() + 1 );
s.SetActivePoint( mePosLogical, 1, ty + 1, true );
}
Redraw = true;
}

/**
* 組み込み関数 VersionCheck( versionStr )
*/
function VersionCheck( versionStr ) {
var Pad2 = function ( str ) {
return str.toString().replace( /[0-9]+/g , function( tmp ) {
return tmp.length < 2 ? "0" + tmp : tmp; } );
};
var editorVer = Number( Pad2( editor.Version ).replace( /\./g, "" ).slice( 0, 6 ) );
var requirement = Number( Pad2( versionStr ).replace( /\./g, "" ).slice( 0, 6 ) );
return ( editorVer >= requirement );
}
</source>