|
//*1 *** Macro for 「秀丸エディタ」 ***
//*1 【マクロ名】 KZ_Config2.mac - Ver. 03.04 - 1999/11/11
//*1 (C) Copyright 番頭++ (Bantou++). 1996 - 1999. All Rights Reserved.
//*1 【作者】 K.Nakatake / 番頭++ / E-mail:xxxxxxxx@nifty.ne.jp
//*1 ・このマクロは、フリーウェアです。
//*1 【機能】
//*1 ・CONFIG; の設定 - 簡易版
//*1 ・「ファイルタイプ別の設定」、「動作環境」を一時的に変更します。
//*1 ・自由に変更してご使用下さい !
//*1 ・このマクロは、.フリーウェア.です。
//*1 ・
//*1 【注意】
//*1 ・「秀丸エディタ」の Ver 3.01 以上で使用して下さい。
//*1 config "w250"; // max. Ver. 2.29 まで
//*1 config "w1000"; // max. Ver. 3.00 から
//*1 ・
//
if( version < 301 ){ // about "w1000"
message "すみません、version (3.01) のチェックを行なっています !";
about;
endmacroall;
}
$tbl_menu1[00] = "【 config の設定 】";
$tbl_menu1[01] = "(&T) Tab 4 ";
$tbl_menu1[02] = "(&8) Tab 8 ";
$tbl_menu1[03] = "(&W) Width 81 ";
$tbl_menu1[04] = "(&1) Width 100 ";
$tbl_menu1[05] = "(&2) Width 200 ";
$tbl_menu1[06] = "(&M) Width 1000 (max.) ";
$tbl_menu1[07] = "(&N) Width (20-1000) : " + str(width);
$tbl_menu1[08] = "(&E) 動作環境 ";
#tbl_menu1 = 08 + 1;
mousemenuarray $tbl_menu1, #tbl_menu1;
#menu = result - 1;
if( #menu < 00 ){ // [Esc]
endmacro;
} else if( #menu == 00 ){
CONFIG; endmacro;
} else if( #menu == 01 ){
config "t4";
} else if( #menu == 02 ){
config "t8";
} else if( #menu == 03 ){
config "w81";
} else if( #menu == 04 ){
config "w100";
} else if( #menu == 05 ){
config "w200";
} else if( #menu == 06 ){
//*5 config "w250"; // max. Ver. 2.29 まで
config "w1000"; // max. Ver. 3.00 から
} else if( #menu == 07 ){
$wk1 = str(width);
$wk2 = input("Type-in Width ! (20-1000) ",$wk1);
if( result && $wk2 != "" ){
config "w" + $wk2;
} else {
endmacro;
}
} else if( #menu == 08 ){
ENV; endmacro;
} else {
message "N/A"; endmacro;
}
endmacro;
// end of macro.
|
|