home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1998 January (DVD)
/
VPR980100.ISO
/
OLS
/
WIN32
/
KAKIMAC
/
KAKIMACG.LZH
/
K_GREPST.MAC
< prev
next >
Wrap
Text File
|
1995-12-21
|
12KB
|
229 lines
// k_GREPST.mac k_GREP SETING
//
// k_GREP Ver0.91以降の各種の設定を行うサブマクロ
$f0=hidemarudir+"\\kakimac\\k_grep00.kdf";
//$f0=hidemarudir+"\\kakimac\\kakimac.kdf";
$outExtensionOrg="com;exe;dic;dll;fon;drv;vbx;ttf;hlp;dat";
menutop:
#historyFileYN=getininum($f0,"IT0","historyFileYN");
if(!#historyFileYN){
$histFileYN="[○]:とります";
$historyFile=getinistr($f0,"IT0","historyFile");
if($historyFile=="")$historyFile=hidemarudir+"\\k_GREP01.LOG";
}else{
$histFileYN="[×]:とりません";
$historyFile="ファイルへの履歴はとりません";
}
#outExtensionYN=getininum($f0,"IT0","outExtensionYN");
if(!#outExtensionYN){
$outExtensionYN="[○]:する";
$outExtension=getinistr($f0,"IT0","outExtension");
if($outExtension==""){
$outExtension=$outExtensionOrg;
}
}else{
$outExtensionYN="[×]:しない";
$outExtension="限定しません";
}
#subdirYN=getininum($f0,"IT0","subdirYN");
#regularYN=getininum($f0,"IT0","regularYN");
#inputType=getininum($f0,"IT0","inputType");
#setOneAction=getininum($f0,"IT0","setOneAction");
#HMSIZE=getininum($f0,"IT0","HMSIZE");
if(#setOneAction)$setOneAction="[○]:即もどる";else $setOneAction="[×]:完了による";
if(#subdirYN)$subdirYN="[○]:する";else $subdirYN="[×]:しない";
if(#regularYN)$regularYN="[○]:する";else $regularYN="[×]:しない";
if(#HMSIZE)$HMSIZE="最大化する";else $HMSIZE="変更なし";
$L3=" ・[◎]:選択中";
dispmenu:
menu "● 設定(&H) k_GREP Ver0.96 (C) (C) 水銀水",//1[1]
"──────────────────────[検索動作(&H)]─",//2[2]
" [ 検索オプションの設定 ]",//3[3]
" ・サブディレクトリの検索(&S)="+$subdirYN,//4[4]
" ・正規表現を使用した検索(&R)="+$regularYN,//5[5]
" [ 設定のワンアクション化 ]",//[17]
" ・ワンアクションでの復帰(&O):"+$setOneAction,//[15]
"──────────────────────[入力方式(&H)]─",//6[6]
" [ 3.手動入力(前回記憶)方式 ]",//[11]
$L3,//[12]・1段階 ディレクトリ(フルパス)指定(手動入力)","・2段階 ファイル・ワイルドカード指定 ""・3段階 検索文字列指定(2~3)",
"──────────────────────[閲覧関連(&H)]─",
" [ 閲覧MODE移行時のサイズ ]",//3[3]
" ・該当秀丸のサイズ(&Z):"+$HMSIZE,//[15]
"──────────────────────[他の設定(&H)]─",//[13]
" [ k_GREP履歴ファイルの設定 ]",//[14]
" ・履歴ファイルの使用(&Y):"+$histFileYN,//[15]
" ・設定:"+$historyFile,//[16]
" [ k_GREP検索排除ファイル拡張子の設定 ]",//[17]
" ・拡張子による検索の限定(&X):"+$outExtensionYN,//[18]
" ・排除指定:"+$outExtension,//[19]
"━━━━━━━━━━━━━━━━━━━━━━━━━━━━",
"──────────────────────[完了 &e]─";//[20]
if(result==0){endmacro;
}else if(result==22){endmacro;
}else if(result==1){
message "●設定(v0.90現在)\n"+
"──────────────────────\n"+
"(1)検索動作の設定\n"+
" -秀丸の検索のオプションの一部を設定できます\n"+
"(2)入力方式の設定\n"+
" -[3]手動入力方式では、総ての情報をタイプインします\n"+
" (次版では他に、一括指定、k_OPEN(k_ALAS)流用等可能)\n"+
"(3)閲覧MODEでの秀丸サイズ\n"+
" -検索結果メニューから、ワンクリック閲覧の時の秀丸サイズ。\n"+
"(4)他の設定\n"+
" -ワンアクションで検索動作を設定できます。\n -k_GREPの結果の履歴を取るファイル名を自由に設定できます。\n -拡張子による検索制限を設定できます。\n\n"+
"・なお、各項目で [...] で囲まれた部分をクリックすると詳細が表示されます。";
goto dispmenu;
}else if(result==2){
message "●検索動作の設定\n"+
"──────────────────────\n"+
"秀丸の検索のオプションの下記の設定ができます\n\n"+
"-サブディレクトリを検索する/しない\n"+
"-正規表現を使った検索をする/しない\n\n"+
"-上記設定のワンアクション化も指定できます。\n\n"+
"なお、設定の結果は、k_GREPのメイン画面でそれぞれ表示されます\n";
goto dispmenu;
}else if(result==3){
message "●検索オプションで設定できる内容\n"+
"──────────────────────\n"+
"-サブディレクトリを検索する/しない\n"+
" grepするファイルを指定したディレクトリより下のディレクトリまで検索するかどうかの設定\n\n"+
"-正規表現を使った検索をする/しない\n"+
" 正規表現によって文字列を検索させるかどうかを設定\n\n"+
"なお、正規表現を使う場合、慣れていないと思った通りの検索ができないばかりか、とんでもない検索結果を出すこともあります。"+
"正規表現については、秀丸ヘルプなどを参照してください\n";
goto dispmenu;
}else if(result==8){
message "●入力方式の設定\n"+
"──────────────────────\n"+
" -1 全検索条件(10組)記憶方式\n"+
" -2 k_OPEN(k_ALAS)流用方式 \n"+
" -3 手動入力(前回記憶)方式\n\n"+
"★現状では、手動入力方式を使ってください(^^;;;\n";
goto dispmenu;
}else if(result==9){
message "●手動入力(タイプイン/前回記憶)方式(3ステップ入力)\n"+
"──────────────────────\n"+
"第1ステップ…ディレクトリ(フルパス)指定(手動入力)\n"+
" grepを開始するディレクトリを指定します。ディレクトリ名の右に<subdir...>と表示された場合は、サブディレクトリまで検索します。なお、サブディレクトリまで検索させたい場合は、「設定」の「検索動作」で設定してください。\n\n"+
"第2ステップ…ファイル・ワイルドカード指定\n"+
" 検索したいファイル名のワイルドカードを指定します。特に拡張子は極力指定するようにしてください。text*.*というパターンでは、comやexeファイルも検索してしまいます。\n"+
" なお、複数のワイルドカード指定をする場合には、それぞれを「;」で区切ってください。(例:mail*.txt;nif*.log)\n\n"+
"第3ステップ…検索文字列指定(2~3)\n"+
" k_GREPで検索したい検索文字列を指定します。最大3群まで可能ですが、2種類は必ず指定する必要があります。1種類の場合は秀丸のgrepをお使い下さい。早いです。\n"+
"★現版では、この手動入力方式を使ってください(^^;;;\n";
goto dispmenu;
}else if(result==11){
message "●閲覧MODEでの秀丸サイズ\n"+
"──────────────────────\n"+
"k_GREPの結果リストから、ファイルを閲覧する場合\nその秀丸のサイズを設定します。\n"+
"\n";
goto dispmenu;
}else if(result==12){
message "●閲覧の秀丸サイズの意味\n"+
"──────────────────────\n"+
"・ファイルを閲覧する場合、k_GREP中の閲覧であることを考えれば、閲覧ファイルが検出したいファイルかどうかを判定したいのですから、できるだけ大きく秀丸を広げて閲覧したようが良いわけです。最大化して閲覧したいとお考えの方は「最大化する」に設定すればよいでしょう。もちろんこの設定でも、閲覧が終われば元のサイズに自動的に戻ります。\n"+
"・一方、すでに開いているファイルと比べることで、検出したいファイルかどうかを判定したい場合もあります。こうした閲覧方法をとる方は「変更なし」に設定しておけばよいでしょう。\n";
goto dispmenu;
}else if(result==14){//他の設定
message "●他の設定\n"+
"──────────────────────\n"+
" -履歴ファイルの設定。\n"+
" -k_GREP検索排除ファイル拡張子の設定\n\n"+
"以上、2つの設定を行ないます。それぞれの詳細\nは、該当する内容が[ ]内に書き込まれている部分を\nクリックしてください。";
goto dispmenu;
}else if(result==6){//One Action
message "●設定のワンアクション化\n"+
"──────────────────────\n"+
"・設定画面では、複数の設定が変更されるように想定されていますから、最下段の「完了」を選ばないと元のマクロ画面へ戻りません。\n"+
"・しかし、「サブディレクトリの検索」「正規表現の指定」の項目は、スパッスパッと素早く設定したいものです。で、設定を変更したと同時に、元の画面へ戻り作業が続けてできる指定が、この「ワンアクション化」です。\n"+
"・ただしと言うか当然というか、上記の2設定以外は、「完了」を選択しないと元の画面へは戻りません。";
goto dispmenu;
}else if(result==15){
message "●履歴処理\n"+
"──────────────────────\n"+
" k_GREPによる検索の結果を指定したファイルに履歴としてとる機能の設定です。"+
" 検索結果のメニューで拡張処理を選択すると履歴処理ができるようになります。履歴ファイルを指定したり、履歴ファイルをとるか/とらないかを選択できます。とらない、と指定した場合、k_GREPの結果の拡張設定でファイルへの履歴は取れなくなります。ただし、履歴をとるように設定しても、つねに自動的に履歴を取り続けるわけではなく、検索結果メニューで指定した時だけに履歴がとられる、という意味です。"+
"というのは、履歴ファイルを取る場合、ファイルを開くのでクリップボードへ転送するよりもほんのわずかですが時間がかかります。それが嫌な人はここで、履歴を取らない、ようにしてください。\n"+
"なお、「履歴処理-設定」をクリックすることで、履歴を取るファイルを自由に指定できます。";
goto dispmenu;
}else if(result==16){//history file YN
if(#historyFileYN)#historyFileYN=0;
else #historyFileYN=1;
writeininum $f0,"IT0","historyFileYN",#historyFileYN;
goto menutop;
}else if(result==17){//history file
if(!#historyFileYN){
$historyFile=input("●k_GREP履歴ファイル名入力\n (既定値="+$historyFile+")",$historyFile);
if(result){
writeininum $f0,"IT0","historyFileYN",1;
writeinistr $f0,"IT0","historyFile",$historyFile;
}
}else{
message "●報告...履歴ファイル名は、指定できません。\n"+
"●理由...履歴ファイルを「とらない」ように指定されています。\n"+
"●対策...ファイルへの履歴をとりたい場合は、設定画面で、「履歴ファイルの使用(Y)」を「とる」にしてください。\n";
}
}else if(result==18){//k_GREP検索排除設定をするか/しないか
message "●k_GREP検索排除設定\n"+
" k_GREPによる検索対象から排除するファイルの拡張子を設定します。k_GREP Ver0.90では、論理積による文字列検索実現のために、第一ステップのgrepのあと、第一検索文字列を含むファイルをすべて開きます。したがって、検索対象のファイルのワイルドカード指定に「*」や「???」を指定してしまった場合(極力避けてください)、exeやcomファイルも開いてしまいます。これはあまりよろしくありません。で、排除拡張子をここでせっていするわけです。grepが機能アップした暁には役目を完了する機能ですがとりあえず、これでしのいでください<m(_._)m>\n"+
" なお、デフォルトは「 COM;EXE;DIC;DLL;FON;DRV;VBX;TTF;HLP;DAT 」の拡張子を持つファイルが検索対象から排除されていますが、「排除指定」の段をクリックすることで、自由な拡張子を指定できます。また、k_GREPの初期値に戻す等もできます(^^)";
goto dispmenu;
}else if(result==19){//history file
if(#outExtensionYN)#outExtensionYN=0;
else #outExtensionYN=1;
writeininum $f0,"IT0","outExtensionYN",#outExtensionYN;
goto menutop;
}else if(result==20){//history file
if(!#outExtensionYN){
menu "●排除ファイルの拡張子入力 Setting for k_GREP 水銀水",
" &1 k_GREPによる初期値に戻す。",
" &2 自由な拡張子を設定する。",
" &0 戻る";
if(result==1){
message "●検索から排除したいファイルの拡張子を設定するのに、初期値か、自由設定かを選択する。";
}else if(result==2){
writeininum $f0,"IT0","outExtensionYN",0;
writeinistr $f0,"IT0","outExtension",$outExtensionOrg;
}else if(result==3){
$outExtension=input("●検索から排除するファイル拡張子の小文字指定\n (既定値="+$outExtension+")\n 半角3文字以内。「;」で区切る。",$outExtension);
if(result){
writeininum $f0,"IT0","outExtensionYN",0;
writeinistr $f0,"IT0","outExtension",$outExtension;
}
}
}else{
message "●報告...検索から排除したいファイルの拡張子は、指定できません。\n"+
"●理由...検索から排除するファイルはないように指定されています。\n"+
"●対策...排除する拡張子を指定したい場合は、「検索から排除したいファイルの拡張子」を「する」にしてください。\n";
}
}else if(result==13){//
if(#HMSIZE)#HMSIZE=0;
else #HMSIZE=1;
writeininum $f0,"IT0","HMSIZE",#HMSIZE;
}else if(result==10){message "冷凍保存中...\n眠りいまださめず...<m(_._)m>";//message "yes .2";
// #inputType=1;
// writeininum $f0,"IT0","inputType",#inputType;
}else if(result==7){
if(#setOneAction)#setOneAction=0;
else#setOneAction=1;
writeininum $f0,"IT0","setOneAction",#setOneAction;
}else if(result==12){//message "yes .3";
#inputType=0;
writeininum $f0,"IT0","inputType",#inputType;
}else if(result==4){
if(#subdirYN)#subdirYN=0;
else#subdirYN=1;
writeininum $f0,"IT0","subdirYN",#subdirYN;
if(#setOneAction)endmacro;
}else if(result==5){
if(#regularYN)#regularYN=0;
else#regularYN=1;
writeininum $f0,"IT0","regularYN",#regularYN;
if(#setOneAction)endmacro;
}else goto menutop;
goto menutop;
endmacro;