MeryWiki - 利用者の投稿記録 [ja]

Vz 風テキストスタック 2 ストロークキー

2012-09-25T14:48:09Z

210.164.54.67:

Mery Ver 2.0.9.3936 と Ver 1.1.2.2840 で動作確認しています。Ver.2用とVer.1用は別パッケージになっているので必要な方をダウンロードしてください。 
ExecuteCommandByID コマンドを使用しているので Mery 本体の更新で ME_ID が変更された場合、マクロを修正する必要があります。 
マクロファイルの中に、ライブラリに登録されている「対応する括弧に移動」と、kinzokuさんの SubMacroMenu.js を改造したものが含まれています。 
JavaScript から WIN32API を利用可能にする「SFC mini」が必要なマクロが含まれています。SFC mini のダウンロード方法などは圧縮ファイル中の VzLike_ReadMe.txt を読んでください。
----
このマクロで再現しようとしているもの
*テキストスタック
*削除文字列バッファ
*Esc, Ctrl + Q, Ctrl + K の２ストロークキーとそこから呼び出される機能
*ブロックモードを指定してからの範囲指定操作

このマクロでは再現の対象外としているもの
*矩形ブロック系の全般
*ダイヤモンドカーソル系
**Ctrl + X 、Ctrl + C などは Windows 準拠のままとする
*ページモード（アップダウン・検索）の切り替え
*範囲指定中の編集操作の対象をVz風にカーソル位置に変更する

;ダウンロード(別サイトにおいた圧縮ファイルへのリンクです)
[http://www35.atwiki.jp/little_lamb/pub/MacroVzLike_Mery2_Main.zip Ver.2用メインマクロ MacroVzLike_Mery2_Main.zip] 
[http://www35.atwiki.jp/little_lamb/pub/MacroVzLike_Mery2_BlockMode.zip Ver.2用ブロックモードマクロ MacroVzLike_Mery2_BlockMode.zip] 

[http://www35.atwiki.jp/little_lamb/pub/MacroVzLike_Mery1_Main.zip Ver.1用メインマクロ MacroVzLike_Mery1_Main.zip] 
[http://www35.atwiki.jp/little_lamb/pub/MacroVzLike_Mery1_BlockMode.zip Ver.1用ブロックモードマクロ MacroVzLike_Mery1_BlockMode.zip] 

:サブフォルダ MacroVzLike 付きで圧縮しています、Mery.exe のフォルダにフォルダ付きで解凍してください。
:ブロックモードを導入すると、カーソル移動キーにも専用マクロを割り当てる必要になります。すると標準メニューの[マクロ(M)] → [記録/停止(S)]が実質的に使えなくなります。このためブロックモード関係は圧縮ファイルを別にしました。
:メインマクロの圧縮ファイル中に含まれる SetupVzLike.js は Mery のマクロではありません。Mery.ini にマイマクロとキーボードショートカットの変更を登録する WSH 用のスクリプトです。
::iniファイル中でマクロファイル名のハッシュ値が環境によって異なるため、SetupVzLike.js をしてもキーボードショートカットが登録されない可能性があります。SetupVzLike.js は iniファイルのバックアップを残すので、そちらから復帰してください。申し訳ありませんが、キーボードショートカットは手作業で登録してください。

履歴
*2010.08.17
**初公開
*2010.09.08
**tooltip, title に対応
**SubMacroMenu.js, PrefixEsc.jsの Macro Run をvbsマクロに簡易対応
**無駄なコードの整理
*2012.09.25
**Mery Ver.2 に対応
**ブロックモード用マクロの公開
**そのほか修正多数

ブックマーク一覧ジャンプ

2012-09-24T13:21:25Z

210.164.54.67:

ポップアップメニューでジャンプ先を選択。範囲指定中はジャンプ先まで選択範囲を拡大します。
Mery Ver.1.1.2.2840 および Ver.2.0.9.3936 での動作を確認しています。
(2012.09.24)

<source lang="javascript">
#title="ブックマーク一覧"
/*
* ブックマーク一覧をポップアップメニューにして選択ジャンプ
* Mery標準のブックマークが対象
* 範囲選択中の場合は選択範囲を拡大
*/
(function(){
// 描画停止
Redraw = false;
with(document.selection){
var flgBlock = !isEmpty;
//カーソル位置の保存
var activePos = GetActivePos();
var anchorPos = GetAnchorPos();
var sX = ScrollX;
var sY = ScrollY;

var bookmarks = new Array();
StartOfDocument(false);
// 先頭行がブックマークされてないか
var isTopMarked = false;
CharRight(false);
if(PreviousBookmark()){
isTopMarked = true;
SelectLine();
menuKey = Text.slice(0,24).replace(/\t/g, "\\t");
Collapse();
bookmarks.push("Line " + GetActivePointY(mePosLogical) + ":\t" + menuKey);
} else {
StartOfDocument(false);
}
while(NextBookmark()){
SelectLine();
menuKey = Text.slice(0, 24).replace(/\t/g, "\\t");
Collapse();
bookmarks.push("Line " + GetActivePointY(mePosLogical) + ":\t" + menuKey);
}
var bmcount = bookmarks.length;
if(bmcount == 0){
//カーソル位置の復帰
SetActivePos(activePos);
SetAnchorPos(anchorPos);
ScrollX = sX;
ScrollY = sY;
} else {
var BookmarkMenu = CreatePopupMenu();
for(var i = 0; i < bmcount; i++){
//メニューのアクセスキーも1から始まるほうが便利
BookmarkMenu.Add("&" + (i+1) + " " + bookmarks[i], i+1)
}
var ret = BookmarkMenu.Track(0);
if(ret == 0){
//カーソル位置の復帰
SetActivePos(activePos);
SetAnchorPos(anchorPos);
ScrollX = sX;
ScrollY = sY;
} else {
StartOfDocument(false);
if(isTopMarked)ret--;
for(i = 0; i < ret; i++){ NextBookmark(); }
}
}
if(flgBlock){
//ジャンプ前の選択開始位置からジャンプ後のカーソル位置まで範囲選択
SetAnchorPos(anchorPos);
}
}
// 描画再開
Redraw = true;
})()
</source>

SDIウィンドウの記憶と復帰

2012-09-16T15:13:27Z

210.164.54.67:

== ■SDI愛好者の方へ ==
Mery Ver 2.0.0.3583 以降、SDIモード時にマクロで他の Document へアクセスすることができなくなりました。このため、SDI モードであれば一時的にタブ表示モードへ変更しマクロ終了後に SDI モードに戻すひな形を作成しました。
ひな形なので投稿のマクロだけでは何も処理しません。実際に利用する場合は、Main 関数に必要なマクロを記述してください。

ウィンドウの操作に WIN32API を利用しているため、『SFC mini』をインストールする必要があります。『SFC mini』についての情報は下記のサイトでご確認ください。
http://sfcmini.sourceforge.jp/help/catid-19.html

Vista 以降の OS をお使いの方は Vector で公開されている正式版 Ver 1.0.1 ではなく sourceforge にある 1.0.5 βをインストールしてください。
http://sourceforge.jp/projects/sfcmini/
作者の Katsumi さん blog にてVistaで起きるエラーの状況が書かれています。
http://kandk.cafe.coocan.jp/jeans/?itemid=627

(function(){
//MEIDはVer2.0.8.3919時点変わる可能性大
var MEID_WINDOW_ENABLE_TABS = 4236;
try {
var SfcMiniTools = new ActiveXObject("SfcMini.Tools");
var vcheck = (Number(SfcMiniTools.GetSfcVersion.toString(16)) < 1050);
var EnumWindows = new ActiveXObject("SfcMini.DynaCall");
var IsWindowVisible = new ActiveXObject("SfcMini.DynaCall");
var IsIconic = new ActiveXObject("SfcMini.DynaCall");
var ShowWindow = new ActiveXObject("SfcMini.DynaCall");
var SetWindowPos = new ActiveXObject("SfcMini.DynaCall");
//var MoveWindow = new ActiveXObject("SfcMini.DynaCall");
var GetWindowText = new ActiveXObject("SfcMini.DynaCall");
var GetWindowRect = new ActiveXObject("SfcMini.DynaCall");
EnumWindows.Declare("user32", "EnumWindows");
IsWindowVisible.Declare("user32", "IsWindowVisible");
IsIconic.Declare("user32", "IsIconic");
ShowWindow.Declare("user32", "ShowWindow");
SetWindowPos.Declare("user32","SetWindowPos") ;
//MoveWindow.Declare("user32", "MoveWindow");
GetWindowText.Declare("user32", "GetWindowTextA");
GetWindowRect.Declare("user32", "GetWindowRect");
var SW_MINIMIZE = 6
var SW_RESTORE = 9;
//Windowsの位置を記憶
var meryWindows = getMeryWindows();
} catch(e) {
//window.Status = "SFCminiが無いため、APIアクセスができません";
var meryWindows = new Array;
}
redraw = false;
var SDI = SDIToTab();
Main();
if(SDI)BackToSDI(meryWindows);
redraw = true;
Quit();

function Main(){
//別Documentの操作が必要なマクロをここに書く
}

function SDIToTab(){
//SDIモードかタブ表示モードかを調べる
if(editor.documents.count == 1){
editor.NewFile();
var flgSDI = (editor.documents.count == 1);
//SDIモードの場合はタブ表示モードに変更
if(flgSDI)editor.ExecuteCommandByID(MEID_WINDOW_ENABLE_TABS);
//ダミーの新規ファイルを閉じる
var docs = editor.documents;
var docindex = docs.count;
for(var i = 0 ; i < docindex ; i++){
var objdoc = docs.item(i);
if(objdoc.name == "" && objdoc.saved && !objdoc.text){
objdoc.close();
break;
}
}
return flgSDI;
} else {
return false;
}
}

function BackToSDI(meryWindows){
//SDIに戻す
editor.ExecuteCommandByID(MEID_WINDOW_ENABLE_TABS);
//最後の Document が Active になる→WindowTextが変わる→復帰できない
var flgSaved = (document.saved)?"":" *";
var docname = (document.name)?document.name:"無題";
new ActiveXObject('WScript.Shell').AppActivate(document.name + flgSaved + " - Mery");

//位置変更後の hWnd 取得
try{
var meryWindowsAfter = getMeryWindows();
for(var i = meryWindows.length; i > 0; i--){
var win = meryWindows[i-1];
for(j = 0; j < meryWindowsAfter.length; j++){
var winAfter = meryWindowsAfter[j];
if(winAfter.name == win.name){
SetWindowPos(winAfter.hwnd, 0, win.left, win.top, win.width, win.height, 64);
if(win.minimize){
ShowWindow(winAfter.hwnd, SW_MINIMIZE);
}
winAfter.name += "再配置済み";
break;
}
}
}
}catch(e){}
}

function getRect(hWnd){
//RECT 構造体
var lpRect = new ActiveXObject("SfcMini.Structure");
lpRect("Left","Long","Top","Long","Right","Long","Bottom","Long");
GetWindowRect(hWnd, lpRect);
return lpRect;
}

function getMeryWindows(){
var wName = new ActiveXObject("SfcMini.Structure");
wName("str", "String*256");
var mery = new Array;
var EnumWindowsProc = new Object();
EnumWindowsProc.CallBack = function CallBack(hWnd, lParam) {
if (IsWindowVisible(hWnd)) {
if (GetWindowText(hWnd, wName, 256)) {
if(vcheck){//1.0.1
var wName2 = wName.str.substring(0, wName.str.indexOf("\0", 0));
}else{//1.0.5β
var wName2 = wName.str.toString();
}
if(wName2.slice(-7) == " - Mery"){
var win = new Object();
win.name = wName2;
win.hwnd = hWnd;
win.minimize = IsIconic(hWnd);
if(win.minimize){
ShowWindow(hWnd, SW_RESTORE);
}
var rect = getRect(hWnd);
win.left = rect.Left;
win.top = rect.Top;
win.width = rect.Right - rect.Left;
win.height = rect.Bottom - rect.Top;
mery.push(win);
}
}
}
return 1;
}
EnumWindows(EnumWindows.CallBack(EnumWindowsProc, 2), 0);
return mery;
}

})();

SDIウィンドウの記憶と復帰

2012-09-16T15:12:23Z

210.164.54.67:

== ■SDI愛好者の方へ ==
Mery Ver 2.0.0.3583 以降、SDIモード時にマクロで他の Document へアクセスすることができなくなりました。このため、SDI モードであれば一時的にタブ表示モードへ変更しマクロ終了後に SDI モードに戻すひな形を作成しました。
ひな形なので投稿のマクロだけでは何も処理しません。実際に利用する場合は、Main 関数に必要なマクロを記述してください。

ウィンドウの操作に WIN32API を利用しているため、『SFC mini』をインストールする必要があります。『SFC mini』についての情報は下記のサイトでご確認ください。
http://sfcmini.sourceforge.jp/help/catid-19.html

Vista 以降の OS をお使いの方は Vector で公開されている正式版 Ver 1.0.1 ではなく sourceforge にある 1.0.5 βをインストールしてください。
http://sourceforge.jp/projects/sfcmini/

作者の Katsumi さん blog にてVistaで起きるエラーの状況が書かれています。
http://kandk.cafe.coocan.jp/jeans/?itemid=627

(function(){
//MEIDはVer2.0.8.3919時点変わる可能性大
var MEID_WINDOW_ENABLE_TABS = 4236;
try {
var SfcMiniTools = new ActiveXObject("SfcMini.Tools");
var vcheck = (Number(SfcMiniTools.GetSfcVersion.toString(16)) < 1050);
var EnumWindows = new ActiveXObject("SfcMini.DynaCall");
var IsWindowVisible = new ActiveXObject("SfcMini.DynaCall");
var IsIconic = new ActiveXObject("SfcMini.DynaCall");
var ShowWindow = new ActiveXObject("SfcMini.DynaCall");
var SetWindowPos = new ActiveXObject("SfcMini.DynaCall");
//var MoveWindow = new ActiveXObject("SfcMini.DynaCall");
var GetWindowText = new ActiveXObject("SfcMini.DynaCall");
var GetWindowRect = new ActiveXObject("SfcMini.DynaCall");
EnumWindows.Declare("user32", "EnumWindows");
IsWindowVisible.Declare("user32", "IsWindowVisible");
IsIconic.Declare("user32", "IsIconic");
ShowWindow.Declare("user32", "ShowWindow");
SetWindowPos.Declare("user32","SetWindowPos") ;
//MoveWindow.Declare("user32", "MoveWindow");
GetWindowText.Declare("user32", "GetWindowTextA");
GetWindowRect.Declare("user32", "GetWindowRect");
var SW_MINIMIZE = 6
var SW_RESTORE = 9;
//Windowsの位置を記憶
var meryWindows = getMeryWindows();
} catch(e) {
//window.Status = "SFCminiが無いため、APIアクセスができません";
var meryWindows = new Array;
}
redraw = false;
var SDI = SDIToTab();
Main();
if(SDI)BackToSDI(meryWindows);
redraw = true;
Quit();

function Main(){
//別Documentの操作が必要なマクロをここに書く
}

function SDIToTab(){
//SDIモードかタブ表示モードかを調べる
if(editor.documents.count == 1){
editor.NewFile();
var flgSDI = (editor.documents.count == 1);
//SDIモードの場合はタブ表示モードに変更
if(flgSDI)editor.ExecuteCommandByID(MEID_WINDOW_ENABLE_TABS);
//ダミーの新規ファイルを閉じる
var docs = editor.documents;
var docindex = docs.count;
for(var i = 0 ; i < docindex ; i++){
var objdoc = docs.item(i);
if(objdoc.name == "" && objdoc.saved && !objdoc.text){
objdoc.close();
break;
}
}
return flgSDI;
} else {
return false;
}
}

function BackToSDI(meryWindows){
//SDIに戻す
editor.ExecuteCommandByID(MEID_WINDOW_ENABLE_TABS);
//最後の Document が Active になる→WindowTextが変わる→復帰できない
var flgSaved = (document.saved)?"":" *";
var docname = (document.name)?document.name:"無題";
new ActiveXObject('WScript.Shell').AppActivate(document.name + flgSaved + " - Mery");

//位置変更後の hWnd 取得
try{
var meryWindowsAfter = getMeryWindows();
for(var i = meryWindows.length; i > 0; i--){
var win = meryWindows[i-1];
for(j = 0; j < meryWindowsAfter.length; j++){
var winAfter = meryWindowsAfter[j];
if(winAfter.name == win.name){
SetWindowPos(winAfter.hwnd, 0, win.left, win.top, win.width, win.height, 64);
if(win.minimize){
ShowWindow(winAfter.hwnd, SW_MINIMIZE);
}
winAfter.name += "再配置済み";
break;
}
}
}
}catch(e){}
}

function getRect(hWnd){
//RECT 構造体
var lpRect = new ActiveXObject("SfcMini.Structure");
lpRect("Left","Long","Top","Long","Right","Long","Bottom","Long");
GetWindowRect(hWnd, lpRect);
return lpRect;
}

function getMeryWindows(){
var wName = new ActiveXObject("SfcMini.Structure");
wName("str", "String*256");
var mery = new Array;
var EnumWindowsProc = new Object();
EnumWindowsProc.CallBack = function CallBack(hWnd, lParam) {
if (IsWindowVisible(hWnd)) {
if (GetWindowText(hWnd, wName, 256)) {
if(vcheck){//1.0.1
var wName2 = wName.str.substring(0, wName.str.indexOf("\0", 0));
}else{//1.0.5β
var wName2 = wName.str.toString();
}
if(wName2.slice(-7) == " - Mery"){
var win = new Object();
win.name = wName2;
win.hwnd = hWnd;
win.minimize = IsIconic(hWnd);
if(win.minimize){
ShowWindow(hWnd, SW_RESTORE);
}
var rect = getRect(hWnd);
win.left = rect.Left;
win.top = rect.Top;
win.width = rect.Right - rect.Left;
win.height = rect.Bottom - rect.Top;
mery.push(win);
}
}
}
return 1;
}
EnumWindows(EnumWindows.CallBack(EnumWindowsProc, 2), 0);
return mery;
}

})();

SDIウィンドウの記憶と復帰

2012-09-16T14:54:07Z

210.164.54.67: ページの作成：「(function(){ //MEIDはVer2.0.8.3919時点変わる可能性大 var MEID_WINDOW_ENABLE_TABS = 4236; try { var SfcMiniTools = new ActiveXObject("SfcMini.Tools"...」

マクロライブラリ

2012-09-16T14:53:09Z

210.164.54.67:

ここは Mery で使用できるマクロを集めたライブラリです

スクリプトを拡張子「js」にして「My Macros」等に保存し、マクロメニューの「選択」や「カスタマイズ」から読み込んで使用してください。マクロライブラリはどなたでも自由に編集できますので、みなさんが作成した便利なマクロをどんどん掲載してください。

*[[可変長を固定長に変換]] (kuro)
*[[CSV のカーソル位置の列を削除]] (kuro)
*[[パスを取得]] (kuro)
*[[テキストブラウザ]] (kuro)
*[[文書から検索]] (kuro)
*[[単語を抽出]] (kuro)
*[[フォルダ内のファイルをすべて開く]] (kuro)
*[[SHA でハッシュ化]] (kuro)
*[[Zen Coding]] (kuro)
*[[ファイルを比較]] (kuro)
*[[ctags.exeでtagsファイルを生成、タグジャンプを行うマクロ]] (kazy)
*[[タグファイルから補完]] (n)
*[[TeraPadのCtrl↑と同じような動作をするマクロ]] (suke)
*[[TeraPadのCtrl↓と同じような動作をするマクロ]] (suke)
*[[Vz 風テキストスタック 2 ストロークキー]] (goat)
*[[ブックマーク一覧ジャンプ]] (goat)
*[[clustalw を用いてアライメントを実行]] (suke)
*[[SAPI 使って単語読み上げ]] (miso)
*[[対応する括弧に移動]] (kuro, kurama)
*[[選択文字列を強調]] (kuro)
*[[旧漢字から新漢字に変換]] (furu)
*[[行頭に移動]] (kuro)
*[[引用の追加]] (kuro)
*[[標準変換]] (kuro)
*[[Yahoo!天気情報]] (kuro)
*[[ファイル名を引数にしてアプリ起動]] (kuro, miso)
*[[このファイルから検索(マッチしない行)]] (kuro)
*[[このファイルから検索(マッチする行)]] (kuro)
*[[バイト数]] (kuro)
*[[昇順で並び替え]] (kuro)
*[[降順で並び替え]] (kuro)
*[[連続する重複行を削除]] (kuro)
*[[日付と時刻を挿入]] (n)
*[[JavaScript を実行]] (n)
*[[拡張子の違うファイルを開く]] (n)
*[[フォルダを開く]] (n)
*[[コマンドプロンプトを開く]] (n)
*[[Eclipse風コメントアウト]] (ks)
*[[非選択状態でも逆インデント]] (papagoat)
*[[オフインデント]] (inuuik)
*[[インデントブロック作り]] (inuuik)
*[[サロゲートペアのコードポイント表記]] (inuuik)
*[[字を繰り返し]] (inuuik)
*[[変更行の検出]] (ks)
*[[通り抜けインデント]] (inuuik)
*[[SDIウィンドウの記憶と復帰]](papagoat)