ソース、windowsの設定プログラム一覧

<html>
<meta http-equiv="content-type" content="text/html; charset=shift_jis">


<title>windowsの設定プログラム一覧</title>

<script type="text/javascript">function 実行前設定(){//

//■ データ部分の書式を決める ■

コメント印 = '//※'; // 行末までコメント。'//'だけではurlを書けない。
改行無視印 = '\\'; // 次行も行の続きとする。(引用符内の\は二つ続けて一文字の\)
    // コメント印の前に付けても有効、次行が空なら無意味。
    // 最後にこの文字必要の場合、次に空白でも入れておくしかない。
字下げ空白パターン = /^\s*/; //
// パターンの判定順序。字下げ→コメント→見出し→主パターン。

//◇ 区切り文字と順序、コマンド部♪表示部♪注釈部、の設定
主パターン = /([^♪]*)♪([^♪]*)♪{0,1}([^\n]*)/; // 一行の分割
    // [^♪]* は♪以外の文字が続く意味。区切り文字"♪"は変更可能。
    // 二つ目区切り♪はあってもなくてもいい事にする、♪{0,1}。
        // NN では(.*)と書くと、この部分が空の場合、検索結果全体が
        //     nullになってしまう(空でなければ問題ないが)。代わりに([^\n]*)として解決。
コマンド部番号 = 1; // 表示しない、実行される文字列。
表示部番号 = 2; // 表示部分、
注釈部番号 = 3; // 補足説明部分、
    // コマンド部♪表示部♪注釈部、この順序の設定
    // 数字は何番目の括弧部分かの意味。どの部分に当てるかは変更可能。

見出しパターン = /\[([\d\s]{0,3})\[/; //
    // [数[ の後に続く文字を(行末まで)見出しとする。[ の文字(括弧外)は変更可能。
    // 数は見出しのレベル、1 から。例、[1[見出し
    // 小さい数ほど親、中にある部分を括る段落を作る。
    // ([\d\s]{0,3})は、数字か空白文字が0～3個の意味

//■ データの場所 ■
キーワード ='データ'; // このファイルのコメント内にデータがある場合、
    // データ部分であるかどうかを判別する一行目のキーワード

データファイルパス =''; //データを別ファイルにする場合に、ファイル名又はパスを。
    // これに文字が入っていると先にこれを探す。(別ファイルにはキーワード無用)

//■ 表示のスタイル ■
目次文字数 = 3; // 目次に取る文字数
実行ボタン = '■';
指示文字色 = 'highlighttext';
指示背景色 = 'highlight';
ボタン指示色 = 'red';
クリック色 = 'red';
入力欄サイズ = 90;

//■ その他 ■
エディタ = ''; // 空にしておくと既定値を使用。
//エクスプローラ = 'Explorer'; // フォルダを開く時に使用
エクスプローラ = 'Explorer /e,'; // 〃、階層表示付き
    // (Explorerの場合、パス区切りに / は理解しない様)

//◇ コマンド中の *文字を置換える。
//置換え略語配列[0] = ''; // データ中では前に *を付ける。
//置換後パス配列[0] = ''; // パス等。上の置換え後の文字列。
    //(パス区切り\ は二つ続ける必要あり。/ でも可、が引数とする場合はそれぞれ)

//置換え略語配列[1] = 'プ'; // 例
//置換後パス配列[1] = 'C:\\Program Files';
    // "*プ\folder\xxx.exe" hikisuu♪何か実行♪パスに空白含むは""で括る必要あり

//置換え略語配列[2] = 'パ'; // 例
//置換後パス配列[2] = 'C:\\My Documents\\';
    // "*プ\folder\xxx.exe" "*パfolder\file.abc"♪何か実行♪

////////////////
// マウスがかぶるとフォーカスされる、[Enter]で実行。
// 入力欄(のある所)は、[Esc]で閉じる。
//
////////////////
//■
改行 ='\n';// 書き出す表示文に付加、テスト時、HTML文を取出した時、見易い様に。
    // NN では有効？。IEでは無駄、表示文をdocument.write() なら使えるのかも。
タブ ='\t';
//////////////
}</script>
<style type="text/css">/*■■ スタイル設定 ■■*/

/* ■ 表示部 */
body{ margin:0;  overflow:expression("hidden"); /* expression()、IEのみ指定 */
    /* NNはbodyのサイズ指定しないとoverflow:hidden無効？、スクリプトで指定。止め */
}
hyojibubun{  }

/* ■ 目次部 */
.mkjbu{ white-space:nowrap; }
.mkj{  }

/* ■ 階層段落(リスト)部分 <div> */
#level0{  border-style:outset; border-width:5; border-color: windowtext;
    background-color:window; color:windowtext;

    /* ※ body の overflow:hidden と合わせて、表示固定部と可動部を分ける。 */
        /* いつでも表示されている目次部分(アンカー)等を作る為。 */
        /* できれば不要な横スクロールバーを消したいが、判らず。 */
    overflow:expression("scroll");
        /* NN でoverflow:scroll、まともに表示できない？、中途で切れてしまう */
        /*     又、文書内アンカーへのジャンプもできなくなる？、 */
    /* IE は、width,height 指定しないとスクロールバーが表示されない */
    width : expression( document.body.clientWidth );
    height : expression( document.body.clientHeight-level0.offsetTop );
        /* これだと、onresize 時にスクリプトでサイズ変更の必要ない。 */
}

.level1, .level2, .level3, .level4{ margin-left:1em; }
.level1{ line-height:1.3; }
    /* 見出しは一つ上の階層の子 */

/* ■ 見出し <div>、文字は<b>タグで囲ってある */
.midasi1{ background-color:highlight; color:highlighttext;
    margin-left:3px;  }
.midasi2 b{ background-color:highlight; color:highlighttext;
    font-size:smaller;  }
.midasi3 b{ background-color:highlight; color:highlighttext;
    display:inline; font-size:smaller;  }

/* ■ 各項目 <span>、この中の各々も<span> */
.kou{ white-space:nowrap; } /* 一つの項目を括る */
.hyj{ cursor:hand; } /* 表示部 */
.exec{ cursor:hand; /* 実行ボタン */
    border-style:outset; border-color: windowtext;
    border-width:2; padding:0;
    font-size:smaller; }
.dis{ /* 実行しないボタン、区切りに使っている。 */
    border-style:outset; border-color: windowtext;
    border-width:2; padding:0;
    font-size:smaller; color:window; }
.bng{ display:none; }/* NN用、情報取出す(配列)番号入れてある */

/* ■ 操作、補助表示部分(浮動要素) */
#div0{ display:none; position:absolute; /* 浮動要素 */
    z-index:1; /* */
    background-color:window; color:windowtext;
    border-style:outset; border-width:5; border-color: windowtext;
    padding:5;
}
#cmdtxt{ font-family:monospace; font-weight:bolder; /* コマンド入力欄 <input type=text> */
    border-style:inset; border-color: windowtext; border-width:4; }
#restxt{ font-family:monospace; font-weight:bolder; /* 結果表示欄 <input type=text> */
    border-style:inset; border-color: windowtext; border-width:4; }
.btn{ cursor:hand; font-weight:bolder; /* ボタン類 <span> */
    border-style:outset; border-color: windowtext;
    border-width:4; line-height: 150%;
}
#hohyj{  }/* 補助表示欄 <div> line-height: 130%;*/
#uebtnbu{ font-size:smaller;  }
#idobtn, #xbtn{ line-height: 100% }

</style>

<script type="text/javascript">
var NN; if(window.innerWidth)NN =true;
var WSHシェル, ファイル体系;
var 置換え略語配列 = new Array();
var 置換後パス配列 = new Array();
実行前設定(); // 設定部分

onload = 読込まれ時作業;
function 読込まれ時作業(){
    /*if(NN){ // 止め、まともに表示させれない。
        document.body.style.width = innerWidth;
            //-15、-22、引かないとスクロールバー表示される時あるが？
        document.body.style.height = innerHeight;
        onresize = function(){
            document.body.style.width = innerWidth;//
            document.body.style.height = innerHeight;//
        }/////
    }*/////

    if(NN){ document.getElementById('cmdtxt').size = parseInt(入力欄サイズ/3*2);
        document.getElementById('restxt').size = parseInt(入力欄サイズ/3*2);
    }///
    else{ document.getElementById('cmdtxt').size = 入力欄サイズ;
        document.getElementById('restxt').size = 入力欄サイズ;  }///

    try{ WSHシェル = new ActiveXObject("WScript.Shell");
        ファイル体系 = new ActiveXObject("Scripting.FileSystemObject");
    }catch(err){  }///

    var データ = データを探す();
    if(! データ)alert('データ無し？');
    var 表示文 = データを読む(データ); //
    if(NN)document.getElementById('hyojibubun').innerHTML += 表示文;
    else hyojibubun.innerHTML += 表示文;
        //.replace(/</g, '<' ).replace(/>/g, '>' ).replace(/\n/g, '<br>' );

    document.body.onmouseover = イベント処理;
    //document.body.onmouseout = イベント処理;//なしで済ませる
    document.body.onmousedown = イベント処理;
    document.body.onclick = イベント処理;
    document.body.onkeypress = イベント処理;
    //document(.body).onfocus/onblur を取っても要素のそれは取れない。

    if(WSHシェル)前調査();
    else{ if(エディタ=='')エディタ='notepad';
        windir = 'c:\\windows';
        tmpdir = 'c:\\windows\\temp';
    }///

}//////////=============================================================

function データを探す(){
    if(ファイル体系 && データファイルパス){
        var データ = データファイル読込み();
        if(データ)return データ; //
    }////

    var データ; 階 =0, 止め階 =3;
    var 直下集合処理 = function(節集合){
        if( ! 節集合 || ! 節集合.length)return;//冗長？
        階++;
        var i, 子節, 文, 最初の一行;
        for(i=0; i<節集合.length; i++){ if(データ)return;
            子節 = 節集合[i]; 文 ='';
            if(子節.tagName && 子節.tagName=='!')
                文 = (子節.text)//.replace(/^<--/, '').replace(/-->$/, '');// IE
                    // 最初の一行除くなら、.replace(/^<--/, '')は不要。
                    // 行に分割する時\r|\nのない最後の行は除く。
            else if(子節.nodeType==8)文 = 子節.nodeValue;// NN
            if(文){ 最初の一行 = /^[^\n\r]+/.exec(文); //
                 //if(最初の一行 && キーワード.test(最初の一行+'') )//キーワードはパターン
                    //{ データ = 文; return; }// testでRegExpは使ってしまった
                 if(最初の一行 && (最初の一行+'').indexOf(キーワード)!=-1 )//キーワードは文字列
                    { データ = RegExp.rightContext; return; }// 最初の一行除く
            }///else
            if( 階< 止め階 && 子節.childNodes)
                直下集合処理(子節.childNodes); // 繰返す
        }/////
        階--;
    }///

    直下集合処理( document.childNodes );// 上の繰返す関数の呼出し
    return データ;
}//////////============================================================
function データファイル読込み(){ var パス;
    if( ! /^[\\\/]|:[\\\/]/.test(データファイルパス) )
        パス = ファイル体系.GetParentFolderName( (location+'').replace(/file:\/*/,'' ) ) //*/
            +'/' +データファイルパス;
    else パス = データファイルパス;
    if( ! ファイル体系.fileExists(パス) ){
        alert('データファイルが不明'); return;  }/////

    var 読込流 = ファイル体系.openTextFile(パス);
    var テキスト = 読込流.ReadAll();
    読込流.Close();

    return テキスト;
}///////////
//□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□
var コマンド配列 = new Array();
var 注釈配列 = new Array();

function データを読む(データ){ //var echo=''

    //■ 先ず一行ずつ分割。
    var 行文配列 = new Array();
    var s, 検索結果;
    //var 一行パターン = /^.*$/gm;
        // \r\n 改行の場合 m フラグですると、NNでは行に'\r'が残る。
        //     IEでは、'\r'のみの一行ができてしまう。
    var 一行パターン = /([^\r\n]*)[\r\n]{1,2}/g;// \r\nのない最後の行が入らないが、
    while( ( 検索結果 = 一行パターン.exec(データ)) !=null){
        s = 検索結果[1]; //
        //if(s)//空行、不要でない。行継続の問題あり
        // if(s !='\r')//mフラグでした場合
            行文配列.push( s );// s.replace('\r','') mフラグでした場合'\r'を削除。
        if(! 一行パターン.global)break;
    }/////
    //行文配列.push( RegExp.rightContext ); //\r,\nのない最後の1行、必要なら
    //alert(行文配列.length+'\n\n'+行文配列.join('\n'))
    //==============================================================

    //■ 一行毎に処理
    var 行文, 保留文='', 表示文='', 目次文='', 目次番=0;
    // パターンにすると設定部分で、パターン用文字エスケープを使う様、注意、必要。
    //var 改行無視パターン = new RegExp(改行無視印 +'$');
    var コメント印パ = new RegExp(コメント印);
    var 索果, i, j, n, s, 差, 数;
    var 見出し文, レベル=0, 新レベル;
    var 表示部, 番号=0;
    for(i=0; i< 行文配列.length; i++){
        行文 =行文配列[i];
        //=========================================================
        //◆ 前処理
        索果 = 字下げ空白パターン.exec(行文);
        if(索果)行文 = RegExp.rightContext;
        索果 = コメント印パ.exec(行文);
        if(索果)行文 = RegExp.leftContext; // コメント排除

        if(保留文){ 行文= 保留文 +行文; 保留文=''; }
        if(! 行文)continue; // 保留文を付け足す前に置くと行継続が一行伸びてしまう
        if(行文.lastIndexOf(改行無視印)== (n= 行文.length -改行無視印.length) ){
            保留文 += 行文.substring(0, n); continue; }
        //if( 改行無視パターン.exec(行文); ){ 保留文 += RegExp.leftContext; continue; }
        //=========================================================

        // 階層段落、見出し、目次
        索果 = 見出しパターン.exec(行文);
        if(索果){
            見出し文 = RegExp.rightContext;
            //
            s = 索果[1];
            新レベル = 索果[1].replace(/\s/g, ''); //空白は除外
            if( !isNaN(新レベル) && (新レベル=eval(新レベル)) ){} // 0 でなければ。
            else{ 表示文 += '<span class="other">' +s +'</span>' +改行;
                continue; }

            (新レベル< レベル)? 差 = レベル -新レベル: 差 = 新レベル -レベル;
            // 閉じる、
            if(新レベル <= レベル){ // 同レベルか、上のレベルが現れた場合
                for(j=0; j<(差+1); j++)表示文 += '</div>' +'<! level' +(レベル-j) +'閉じ>' +改行;
            }///下位レベルが現れた時は閉じない。
            // 飛んで下位レベル出現の時、差分開く
            if(新レベル> レベル)for(j=1; j<差; j++)//
                表示文 += '<div class="level' +(レベル+j) +'">' +改行;

            // 見出し文、目次文
            if(新レベル==1){
                目次文 += '<a href="#i' +目次番 +'" class="mkj" '
                    +( (目次番==0)? 'id="mkj" ': '')
                    +'tabindex="1" onfocus="イベント処理()" onblur="イベント処理()">'
                        +見出し文.substr(0,目次文字数) +'</a>' +改行;
                表示文 += 改行 +'<div class="midasi' +新レベル +'" id="i' +目次番
                    +'" tabindex="1"><b>' +見出し文 +'</b></div>' +改行;
                目次番++;
            }///
            else 表示文 += 改行 +'<div class="midasi' +新レベル +'"><b>'
                    +見出し文 +'</b></div>' +改行;
            // 新レベル開く
            表示文 += '<div class="level' +新レベル +'">' +改行;
            レベル = 新レベル;
            continue;
        }/////
        //=========================================================

        // 各項目
        索果 = 主パターン.exec(行文);
        if(索果){
            表示部 = 索果[表示部番号];
            if(表示部){
                コマンド配列.push( 索果[コマンド部番号] );
                注釈配列.push( 索果[注釈部番号] );
                表示文 += '<span class="kou">' +改行
                    + ( (NN)? '<a class="bng">' +番号 +'</a>':'' )// NN の場合仕方ないので
                    + ( (表示部)? '<span class="hyj" bango="' +番号
                        +'" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()">'
                        +表示部 +'</span>': '' )
                    + ( (索果[コマンド部番号])?
                        '<span class="exec" bango="' +番号
                            +'" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()">'
                            +実行ボタン +'</span>':
                        '<span class="dis">' +実行ボタン +'</span>'  )// ただ区切りに
                    + 改行 + '</span>' +改行;
                    // 配列番号を要素の自作属性として入れるのは、NN では無効？、
                        // 何か可能にする方法があるかも知れないが。
                    // タグ名や位置の変更注意、情報を取出す時に使っている。
                番号++;
                continue;
            }///else 只の表示にする
        }/////

        //=========================================================
        // まだ残っていたら
        if(/^<[^\n]*>$/.test)表示文 += 行文; // タグに囲まれている
        else 表示文 += '<span class="other">' +行文 +'</span>' +改行;
        //if(行文!='<br>')echo+=(i+3)+'/ ';// 間違い行探し、
    }///////////alert(echo)
    for(j=0; j<レベル; j++)表示文 += '</div>' +'<! level' +(レベル-j) +'閉じ>' +改行;
        // 残っている閉じ。

    目次文 = '<div id="mkjbu">' +改行 +目次文
            +'  <a id="disp" class="mkj" '
            // href="javascript:void 0"、HTAファイルにした場合、窓が出てしまう。
            +'tabindex="1" onfocus="イベント処理()" onblur="イベント処理()">◆</a>'
            +改行 +'</div>' +改行 +改行;
    var 最後隙間 ='<div id="space" style="height:150px"></div>';
    表示文 = 目次文 +'<div id="level0">' +表示文 +最後隙間 +'</div>';
    return 表示文;
}//////////
//読込まれ時作業、ここまで
//■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■

var 記憶x, 記憶y, 移動中要素; var スキップ; var 前フォーカス要素;
var strXY;
function イベント処理(NNev){
    var i, 種類, 要素, 集合, 浮動要素, キーコード, 位置無, フォーカス;

    if(NN){ if(! NNev)return; // タグから呼んでる'blur''focus'の場合// 'keypress'も？
        種類 = NNev.type;  要素 = NNev.target;
        if(要素.nodeName=='#text')要素 = 要素.parentNode;
    }/////
    else{ 種類 = event.type; 要素 = event.srcElement;  }///
    if(!要素)return; // ?

    //==============================================================
    //◇ 浮動要素の移動時のみ、この二つのイベントを取っている。
    if(種類=='mouseup'){ // 浮動要素、移動の終り。
        // NN ではmouseupしても、ならない時ある、イベントを取るレベルを変えても同じ様。
        //    mousedown が起きてから、そのmouseup を取る事にしている事自体が問題か?
        //    でもない、変更しても同じ。
        document.body.onmousemove = null;
        document.body.onmouseup = null;
        記憶x = 記憶y = 0;

        if(NN)移動中要素.style.borderColor ='windowtext';
        else 移動中要素.style.borderColor ='';
        移動中要素 =null;
        var el = document.getElementById('idobtn'); // ボタンの戻し
        if(NN)el.style.borderStyle ='outset';
        else el.style.borderStyle ='';
        el.style.color ='';
        el.style.backgroundColor ='';

        //if(NN)document.getElementById('cmdtxt').click();// 選択状態を解除、できない
        return;
    }/////
    if(種類=='mousemove'){ // 浮動要素、移動中
        var x = ( (NN)? NNev.clientX: event.x );
        var y = ( (NN)? NNev.clientY: event.y );
        var 差y = y -記憶y; var 差x = x -記憶x;
        if(差y==0 && 差x==0)return;
        記憶x = x; 記憶y = y;
        if(NN){ // NN はこれではだめ、ずれが生じる。
            移動中要素.style.top = (移動中要素.offsetTop +差y) +'px';
            移動中要素.style.left = (移動中要素.offsetLeft +差x) +'px';
        }///
        else{ 移動中要素.style.top = (移動中要素.offsetTop +差y) +'px';
            移動中要素.style.left = (移動中要素.offsetLeft +差x) +'px';  }///
        return;
    }/////
    //==============================================================

    if(種類=='focus' && スキップ){ //if(前フォーカス要素==要素)return;
        スキップ=false; return; }//mouseoverでfocus()させた為。
    else if(種類=='blur' && スキップ){ return; }//mouseoverでfocus()させた為。

    else if(種類=='keypress'){
        if(NN)キーコード = NNev.keyCode; else キーコード = event.keyCode;
        if(キーコード=='27'){ //[Esc]
            浮動要素 = document.getElementById('div0');
            if(浮動要素.style.display)浮動要素.style.display ='';
            return; }///
        else if(キーコード=='13'){ } // || キーコード=='32'
        else return;
    }/////

    var ID = 要素.id;
    if(ID=='cmdtxt' && キーコード=='13'){ ID ='exebtn';
        要素 = document.getElementById('exebtn');  }///
    var クラス名 = 要素.className;
    //if(ID=='disp' && 種類=='click')//位置無 =true;//浮動要素の表示の場合
    if(キーコード && クラス名=='hyj')位置無 =true;//  〃

    //==============================================================
    if( ! (クラス名=='hyj' || クラス名=='exec' || クラス名=='btn'
        || クラス名=='midasi1' || ID=='disp' || クラス名=='mkj') )return;
    //==============================================================

    if(前フォーカス要素 && ( 種類=='mouseover'||種類=='focus'||種類=='blur') ){
        //'blur'を取らないで済ませる事が出来ないかと試してみたが不明。
        //    'focus'か'mouseover'で、'blur'の全部の代りといかない、取りこぼしがある。
        //    'blur'で'focus'の代りといかない。
        if(クラス名=='midasi1' && 種類=='mouseover')return;
            //'mouseover'の場合、この要素はフォーカスさせてないので。

        var 前クラス名= 前フォーカス要素.className;
        if(前クラス名=='hyj' || 前クラス名=='btn' || 前クラス名=='mkj'){
            前フォーカス要素.style.color ='';
            前フォーカス要素.style.backgroundColor ='';
            前フォーカス要素 = null;
        }///
        else if(前クラス名=='exec'){
            前フォーカス要素.style.color = '';
            集合 = 前フォーカス要素.parentNode.getElementsByTagName('span');
            for(i=0; i<集合.length; i++)if(集合[i].className=='hyj'){
                集合[i].style.color ='';
                集合[i].style.backgroundColor ='';
                break; }///
            前フォーカス要素 = null;
        }/////
    }/////

    if(種類=='mouseover' || 種類=='focus'){
        if(前フォーカス要素==要素)alert()//return;
        if(クラス名=='hyj' || クラス名=='btn' || クラス名=='mkj'){
            要素.style.color = 指示文字色;
            要素.style.backgroundColor = 指示背景色;
            if(!NN && 種類=='mouseover'){ 要素.focus(); スキップ=true; }
                // 'mouseover'でここに入ったのならfocus()させる、
                // が、'blur''focus'が生じた時もう一度ここに来ない様にする必要あり。
            前フォーカス要素 = 要素;
        }///
        else if(クラス名=='exec'){
            要素.style.color = ボタン指示色;
            集合 = 要素.parentNode.getElementsByTagName('span');
            for(i=0; i<集合.length; i++)if(集合[i].className=='hyj'){
                集合[i].style.color = 指示文字色;
                集合[i].style.backgroundColor = 指示背景色;
                break; }///
            前フォーカス要素 = 要素;
            if(!NN && 種類=='mouseover'){ 要素.focus(); スキップ=true; }
        }/////
    }/////
    /*else if(種類=='mouseout'){ //
        // 'mouseover'でfocus()させるだけにして、'mouseout'を取らない方がいいかも知れない。
            // 'mouseout'しても'focus'は残っているので、色変をそのままにした方がいい。
        if(クラス名=='hyj' || クラス名=='btn'){
            要素.style.color ='';
            要素.style.backgroundColor ='';
        }///
        if(クラス名=='exec'){
            要素.style.color = '';
            集合 = 要素.parentNode.getElementsByTagName('span');
            for(i=0; i<集合.length; i++)if(集合[i].className=='hyj'){
                集合[i].style.color ='';
                集合[i].style.backgroundColor ='';
                break; }///
        }/////
    }*/////
    //==============================================================

    else if(種類=='mousedown'){
        if(クラス名=='exec' || クラス名=='btn'){
            要素.style.borderStyle = 'inset';
            要素.style.color = クリック色;
        }/// 'mousedown'で色変させ、'click'で実行し色変解除。
        if(ID=='idobtn'){ //
            移動中要素 = document.getElementById('div0');
            移動中要素.style.borderColor = 指示文字色;
            記憶x = ( (NN)? NNev.clientX: event.x );
            記憶y = ( (NN)? NNev.clientY: event.y );
            //
            document.body.onmouseup = イベント処理;
            document.body.onmousemove = イベント処理;
        }///
    }/////
    //==============================================================

    else if(種類=='click' || 種類=='keypress'){
        if(クラス名=='midasi1'){ if(NN)location ='#';
            else location ='#mkj'; return; }/// NN では機能しない？

        var 番号=-1; // 配列番号
        if(クラス名=='exec' || クラス名=='hyj'){
            if(NN){ 集合 = 要素.parentNode.getElementsByTagName('a');
                if(集合.length)番号 = 集合[0].innerHTML; }
            else 番号 = 要素.bango;
        }/////
        if(クラス名=='exec' || クラス名=='btn'){
            if(ID=='xbtn'){
                浮動要素 = document.getElementById('div0');
                浮動要素.style.display ='';
            }/////
            else if(ID=='btmidobtn'){ //
                浮動要素 = document.getElementById('div0');
                //.style.bottom の指定？、bottom位置で揃えたいが不可？
                浮動要素.style.top = (document.body.offsetHeight
                        -浮動要素.offsetHeight-15)+'px';
                if(NN)浮動要素.style.left = 5;
            }///

            else if(ID=='ltbtn'){
                document.getElementById('cmdtxt').size -=10;
                document.getElementById('restxt').size -=10;
            }///
            else if(ID=='gtbtn'){
                if(NN){ var el = document.getElementById('cmdtxt');
                    el.size = eval(el.size) +10; // 文字列連結になる為
                    el = document.getElementById('restxt');
                    el.size = eval(el.size) +10;
                }///
                else{ cmdtxt.size +=10; restxt.size +=10; }
            }///
            else if(ID=='clebtn')
                document.getElementById('cmdtxt').value ='';

            //========================================================
            else if(クラス名=='exec')実行する( コマンド配列[番号] );
            else if(ID=='exebtn' || ID=='fldbtn'
                || ID=='pathbtn' || ID=='appbtn' ){
                結果表示('');
                var コマンド = document.getElementById('cmdtxt').value;
                if(コマンド=='')結果表示('入力欄が空');
                else if(ID=='exebtn')実行する(コマンド);
                else if(ID=='fldbtn')フォルダ開く(コマンド);
                else if(ID=='pathbtn')パス調べる(コマンド);
                else if(ID=='appbtn')開くアプリ調べる(コマンド);
            }/////
            //========================================================
            // ボタンの色変化の戻し
            要素.style.color = '';
            if(NN)要素.style.borderStyle = 'outset';
            else 要素.style.borderStyle ='';// NN の場合これで解除されない。
        }/////
        else if(クラス名=='hyj' || ID=='disp' || 位置無){ var y, 文;
            文 = 要素.innerHTML;//.replace(/<[^>]*>/g,'');
            if( ! document.getElementById('div0').style.display || NN){
                // displayされていたら移動しない事にしたので y は不要。
                if(NN)y = 要素.offsetTop +15;// これでは？
                else if(位置無)y = parseInt( document.body.offsetHeight/2 );
                    // キーイベントだと event.y はだめ？、ならば下に出したいが
                    //     まだdisplay:noneなのでこの要素のoffsetHeightは0。
                else y = event.y +10; //
            }/////
            浮動表示する(番号, y, 文);
            if(キーコード=='32')return false;// 入力欄に空白が押されてしまう。
        }/////
    }/////
    //==============================================================
}/////////////////

//■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
//var 占領済;
function 浮動表示する(番号, 位置, 文){

    var 入力欄 = document.getElementById('cmdtxt');
    var 補表示部 = document.getElementById('hohyj');
    if(番号>=0){
        補表示部.innerHTML = 文 +'　' +注釈配列[番号];
        var コマンド = コマンド配列[番号];
        if(コマンド){ コマンド = コマンドの修正(コマンド);
            if(コマンド=='')コマンド='?'; }///
        入力欄.value = コマンド;
    }/////
    else{ 補表示部.innerHTML = ''; 入力欄.value =''; }///
    結果表示('');

    var 浮動部 = document.getElementById('div0');
    if(位置){//if( ! 浮動部.style.display)
        浮動部.style.top = 位置;
        浮動部.style.left = 5;
        浮動部.style.display = 'block';
    }///
    入力欄.focus();

    /*if(!占領済){ // 隙間、リスト部分の最後の余裕・空白
        var 要素 = document.getElementById('space');
        要素.style.height = 浮動部.offsetHeight +50;
        占領済 =true;
    }*///
    //if(NN)document.body.onmouseup = イベント処理;//テスト
}//////
function 結果表示(str){ //
    document.getElementById('restxt').value =str;
}///

//□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□
function コマンドの修正(コマンド, 呼び){
    var 索果; //alert(コマンド)

    if(コマンド.indexOf('%')!=-1){
        if(WSHシェル){
            索果 = /%[\w]+%/.exec(コマンド);// /%[^%]+%/
            if(索果){ var 答え, 環境変数= 索果[0];
                答え = WSHシェル.ExpandEnvironmentStrings(環境変数);
                if(答え != 環境変数)コマンド = コマンド.replace(環境変数, 答え);
            }///
        }else{ // WSHシェル使えない場合
            if(コマンド.indexOf('%windir%')!=-1)
                コマンド = コマンド.replace('%windir%', windir);
            if(コマンド.indexOf('%temp%')!=-1)
                コマンド = コマンド.replace('%temp%', tmpdir);
        }/////

        // ?????
        if(呼び=='パス調べ')if(/%[\da-f]{2}/i.test){ var 戻り;
            try{ コマンド = decodeURI(コマンド);
            }catch(err){ コマンド =err.name +' ' +err.description; }
        }/// NN のアドレス欄に現れるコードは、s-jis になっている？
    }/////

    // よく判らない、意味ないか？、
    if(WSHシェル && (索果=/::(\{[\w\d\-]+\})/.exec(コマンド)) ){
        var キー, 値;
        キー = 'HKEY_CLASSES_ROOT\\CLSID\\' +索果[1] +'\\';
        try{ 値 = WSHシェル.RegRead(キー); if(! 値)値 ='(値の設定なし)';
        }catch(err){ if(err.name)値 =err.name +' ' +err.description; }///

        if( 呼び=='パス調べ' )コマンド =値; else 結果表示(値);
    }/////

    //=========================================================
    if(コマンド.indexOf('*') ==-1){ return コマンド; }

    if(コマンド.indexOf('*エディタ') !=-1){
        コマンド = コマンド.replace('*エディタ', エディタ);
    }///

    if(コマンド.indexOf('*特殊フォルダ') !=-1){
        if(WSHシェル){
            索果 = /\*特殊フォルダ$([^$]*)\)/.exec(コマンド);
            if(索果 && 索果[1]){  var 鍵語 = 索果[1];
                var 前 = RegExp.leftContext;
                var 後 = RegExp.rightContext;
                var 特殊フォルダ = WSHシェル.SpecialFolders(鍵語);
                if(特殊フォルダ != 鍵語){ // 確か間違いはそのまま返ると思ったが?
                    if(特殊フォルダ.indexOf(' ') !=-1   // 空白含むなら。
                         && !( 前&& 前.charAt(前.length-1)=='"') ){//
                        前 =前+'"';
                        if(後=='' || 後.indexOf(' ')==0)後 ='"'+後;
                        else{ 索果 = /[\s]+/.exec(後);// 後ろの方はパスを続けているかも知れない。
                            if(索果)後 = RegExp.leftContext +'"' +索果[0] +RegExp.rightContext;
                            else 後 =後+'"';    }///
                    }///
                    コマンド = 前 +特殊フォルダ +後;
                }else コマンド = '';///
            }else コマンド = '';///
        }else コマンド = ''; /////
    }///

    if(コマンド.indexOf('*[') !=-1){
        if(WSHシェル){
            var キー, 値;
            索果 = /\*\[[^\]]+\]([^\]]*\]){0,1}/.exec(コマンド);//
            if(索果){  キー = 索果[0];
                var 前 = RegExp.leftContext;
                var 後 = RegExp.rightContext;
                キー = キー.replace('*[', '').replace(']', '\\').replace(/@*]/, '');
                try{ 値 = WSHシェル.RegRead(キー);
                    if( 値.indexOf(' ') !=-1 && (前==''|| 前.charAt(前.length-1)==' ') ){
                        // 前直前に文字あるならこの処理せず
                        前 ='"'+前;
                        if(後=='' || 後.indexOf(' ')==0)後 ='"'+後;
                        else{ 索果 = /[\s]+/.exec(後);
                            if(索果)後 = RegExp.leftContext +'"'
                                +索果[0] +RegExp.rightContext;
                            else 後 =後+'"';
                        }/// 後ろの方はパスを続けているかも知れないので。
                    }///
                    コマンド = 前 +値 +後;
                }catch(err){ コマンド = '*エラー';
                    if(err.name)結果表示(err.name +'  ' +err.description);
                    else 結果表示('エラー');  }///
            }else コマンド = ''; /////
        }else コマンド = ''; /////
    }/////

    if(/\*/.test(コマンド) && 置換え略語配列){ var i;
        for(i in 置換え略語配列){ if(置換え略語配列[i]=='')continue;
            if(コマンド.indexOf('*'+置換え略語配列[i]) !=-1){
                コマンド = コマンド.replace( '*'+置換え略語配列[i], 置換後パス配列[i] );
                //break;//しなければ複数可能になる
            }///
        }///
    }/////
    if(/\*/.test(コマンド)){ コマンド =''; }/////

    return コマンド;
}////////////
//==========================================================================

function パス分離(コマンド){ // パスと引数を分離。
    var 索果 = コマンド.match(/"[^"]+"|[^\s]+/g); //"//
    if(索果){  var 配列 = new Array(); var i;
        for(i=0; i<索果.length; i++)配列.push(索果[i]);
        for(i=0; i<配列.length; i++)
            配列[i] = 配列[i].replace(/"/g,'');//"//括りをはずす
        return 配列;
    }/////
    else return '';//?
}/////

//■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
//◆◆
function 実行する(コマンド){ if(!コマンド)return;
    if( /\*【|\*《/.test(コマンド)){
        キー送る(コマンド); return; }///

    if( ! WSHシェル){ 結果表示('実行不可'); return; }

    コマンド = コマンドの修正(コマンド);
    if(!コマンド){ 結果表示('?'); return; }
    else if(コマンド=='*エラー')return;

    try{ WSHシェル.Run( コマンド );
    }catch(err){ if(err.name)結果表示(err.name +' ' +err.description);
        else 結果表示('エラー');  }///
}/////
function キー送る(コマンド){ // 又、eval()
    var 索果, 答え;
    var パターン = /【([^】]*)】|《([^》]*)》/g;
    while( ( 索果= パターン.exec(コマンド) ) !=null){
        //if( !confirm(索果[1]+索果[2] )break;
        if(索果[1]){ if(WSHシェル)WSHシェル.SendKeys(索果[1]);
            else 結果表示('実行不可'); }
        else if(索果[2]){ 答 = eval(索果[2]); if(答)結果表示(答); }///
    }///// 複数実行の場合、最後だけ表示されるが。
}/////
//============================================================================
//◆◆
function フォルダ開く(コマンド){
    if( ! WSHシェル || ! ファイル体系 ){ 結果表示('実行不可'); return; }

    var パス;
    var 配列 = パス分離(コマンド);
    if(配列){ // 省略コマンドの場合ある、又どっち(引数?)を取るのかも？
        if(! /[\\\/\s]|::/.test(配列[0]) ) // 省略コマンドか？
            パス = 本パス調べる(配列[0]);
        else if(配列.length>1 && /[\\\/]/.test(配列[1]) )パス = 配列[1];
            // 二つ目(引数)もパスなら、二つ目の方を適用する事に // 3つ目は要らない
        else パス = 配列[0];
    }/////
    else{ 結果表示('?'); return; }

    var 付加=' '; if( ! エクスプローラ)付加=''; var 非在;
    if( ファイル体系.FileExists(パス) ){
        if(エクスプローラ)付加=' /select, ';
        else パス = ファイル体系.GetParentFolderName(パス);
    }///
    else if( ! ファイル体系.FolderExists(パス) ){ 結果表示('非在? '+パス); 非在=true; }
    // returnしない、エラー出るに任せておく。

    if(パス.indexOf(' ')!=-1)パス ='"' +パス +'"'; // ""括り、一旦はずしてある
    var 与 = エクスプローラ +付加 +パス;
    try{ WSHシェル.Run( 与 ); if( ! 非在)結果表示(与);}
    catch(err){ if(err.name)結果表示(err.name +' ' +err.description);
        else 結果表示('エラー ' +与); }
}/////
//□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□
//◆◆
function パス調べる(コマンド){
    //◆ レジキー、環境変数、など調べる
    if( /[\*%]|::/.test(コマンド) ){ //
        コマンド = コマンドの修正(コマンド, 'パス調べ');
        if(コマンド=='*エラー'){}
        else if(コマンド)結果表示(コマンド);
        else{ 結果表示('?'); }
        return;
    }/////
    else if( ! WSHシェル){ 結果表示('実行不可'); return; }
    else if( /^\.[^\.\\\/\s]+(\s|$)/.test(コマンド) ){ 開くアプリ調べる(コマンド); return; }
        // 拡張子としか考えられない？場合。
    //====================================
    if( ! ファイル体系){ 結果表示('実行不可'); return; }

    //◆ コマンド(省略された実行ファイルのパス)からパスを復元。
    var 索果 = /^([^\s\\\/"]+)(\s|$)/.exec(コマンド); // "
    if(索果){ コマンド = 索果[1];
        var パス = 本パス調べる(コマンド);
        if(!パス)パス ='不明 ?';
        結果表示(パス);
    }/////

    //◆ その他、
    else{ if(/[\\\/]/.test(コマンド))ショートパス(コマンド);
        else 結果表示('?');    return; }/////

}////////////////

function 本パス調べる(コマンド){
    //◆ パスの環境設定から、(絶対)パスを復元。
    var パス, 拡張子 =true;
    if(コマンド.indexOf('.')==-1)拡張子 =false; // 拡張子なし。
    var i, フォルダ; //
    for(i=0; i<= パス配列.length; i++){
        if(i==パス配列.length)フォルダ =''; // ルート、不要か？
        else フォルダ = パス配列[i] +'\\';
        if(拡張子){ if( ファイル体系.FileExists(パス = フォルダ +コマンド) )break; }///
        else{
            if( ファイル体系.FileExists(パス = フォルダ +コマンド +'.exe') )break;
            if( ファイル体系.FileExists(パス = フォルダ +コマンド +'.com') )break;
            if( ファイル体系.FileExists(パス = フォルダ +コマンド +'.bat') )break;
        }/////
        パス =''; // 最後まで見つからない時に必要。
    }/////
    if(パス !='')パス = ファイル体系.GetAbsolutePathName(パス);

    //◆ レジストリの App Paths から、調べる。
    else{ var 名; if(拡張子)名 =コマンド; else 名 = コマンド +'.exe';
        var キー = "HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\"
                +名 +'\\';
        try{ パス = WSHシェル.RegRead(キー);
        } catch(err){ パス =''; }
        // パスの通じるディレクトリーにはないのに、通るものがあるが、ここにキーあると、パスが通る様。
    }///
    return パス;
}////////////////

//============================================================================
var パス配列;
//◆ パスの環境設定、パスの通じているディレクトリーを調べる。// 事前実行
function パスの通り(){
    パス配列 = new Array();
    var str = WSHシェル.ExpandEnvironmentStrings('%path%');
    パス配列 = str.split(';'); // 各パスを配列に
    var i; while( i< パス配列.length){ // 補正
        パス配列[i] = パス配列[i].replace(/^\s+/, '').replace(/\s+$/, ''); // 前後の空白文字を取る。
        if(パス配列[i] =='')パス配列.splice(i,1); // 空なら削除
        else i++;
    }/////
    パス配列[パス配列.length] = windir +'\\system'; // システムフォルダを追加
}/////

//============================================================================

function ショートパス(コマンド){
    var 配列 = パス分離(コマンド); var i, パス ='', obj;
    for(i in 配列){ obj=null;
        if(/:[\\\/]/.test(配列[i]) ){
            if( ファイル体系.FileExists(配列[i]) )obj = ファイル体系.GetFile(配列[i]);
            else if( ファイル体系.FolderExists(配列[i]) )obj = ファイル体系.GetFolder(配列[i]);
            if(obj)パス += obj.ShortPath;
            else パス += '非在？'+配列[i]
        }///
        else パス +=配列[i];
        if(i < 配列.length-1)パス +=' ';
    }/////
    結果表示(パス);
}/////
//□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□
//◆◆
function 開くアプリ調べる(テキスト){
    if( ! WSHシェル){ 結果表示('実行不可'); return; }
    var 索果, アプリ, 拡張子;

    // 拡張子らしき所の取出し。
    var パターン = /(^|\.)([^\.\s,\\\/"]+)(["\s,]|$)/g;
    var 配列 = new Array();
    while( ( 索果= パターン.exec(テキスト)) !=null){
        配列.push( 索果[1] +索果[2] );  if(! パターン.global)break;
    }///// まだ'.'は入れておく

    if(配列.length){ //var i,s='';for(i in 配列)s+=配列[i]+'\n'; alert(s)
        if(配列.length>1){
            // 1つ目に'.'を含まない又は'exe'なら、二つ目を取る。
            if( /\.*exe/.test(配列[0]) )拡張子 = 配列[1];
            else if( ! /\./.test(配列[0]) )拡張子 = 配列[1];
            else 拡張子 = 配列[0];
        }///
        else 拡張子 = 配列[0];
        拡張子 = 拡張子.replace('.','');

        アプリ = 開くアプリ(拡張子);
        if(アプリ=='')結果表示( '拡張子[' +拡張子 +']  ' +'戻りなし' );
        else if(アプリ!='エラー')結果表示( '拡張子[' +拡張子 +']  ' +アプリ );
        // エラーの表示は済んでいる。
    }///
    else 結果表示('?');
}/////

function 開くアプリ(拡張子){
    var キー, 値;
    try{
        キー = 'HKEY_CLASSES_ROOT\\.' +拡張子 +'\\';
        値 = WSHシェル.RegRead(キー); // 拡張子キーの既定値。

        キー = 'HKEY_CLASSES_ROOT\\' +値 +'\\shell\\';
        値 = WSHシェル.RegRead(キー);// file キーの既定値。
        if(値=='')値 = 'open';

        キー = キー +値 +'\\command\\';
        値 = WSHシェル.RegRead(キー);// 開くアプリのパス。
    }catch(err){ 値='エラー'; if(err.name)結果表示(err.name +' ' +err.description);
            else 結果表示('エラー'); }
    return 値;
}///////////

//□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□

function 前調査(){
    if( ! エディタ){
        エディタ = 開くアプリ('txt');
        エディタ = エディタ.replace('%1','').replace('""','').replace(/\s+$/,'');
        if(エディタ=='')エディタ='notepad';
    }/////
    //windir = ファイル体系.GetSpecialFolder(0).Path;
    windir = WSHシェル.ExpandEnvironmentStrings('%windir%');// 使っている所あり
    if(ファイル体系)パスの通り();
}/////

</script>


<body>


<div id=div0>
<div id="uebtnbu" style="text-align:right;">

    <span id="testbu" style="display:none;" title=" 修正用 ">
    <a onclick="内容取出し('HTML文')">[HTML文取出]</a>
    <a onclick="内容取出し('コマンド')">[コマンド配列取出]</a>
    <a onclick="内容取出し('補文')">[補文配列取出]</a>
    <a onclick="内容取出し('パス配列')">[パス配列取出]</a>
    </span>
    <a onclick="var e=document.getElementById('testbu'); e.style.display=((e.style.display)?'':'none' )">・</a> 

    <span class="btn" id="xbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
        title=" 閉じる "> Ｘ </span> 
    <span class="btn" id="btmidobtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
        title=" 下位置へ移動 "> ↓ </span>
    <span class="btn" id="idobtn" tabindex="" onfocus="" onblur=""
        onselectstart="return false" title=" 掴んで移動 "> ◇ </span>
</div>

<div id="hohyj"></div>
<input id="cmdtxt" type="text" size="" title=" コマンド入力欄 
 [Alt]+[C]  
 [Enter]実行 "
    accesskey="c" tabindex="1">

<div style="white-space:nowrap;">
<span class="btn" id="clebtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄内、消す "> C </span>
<span class="btn" id="ltbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄を短く "> < </span>
<span class="btn" id="gtbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄を長く "> > </span>

  
<span class="btn" id="exebtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄のコマンドを実行(シェルに渡す) ">  実行  </span>
<span class="btn" id="fldbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄にあるパス(コマンド)の在る 
 フォルダを開く(エクスプローラーに渡す) "
    >フォルダ</span>
 
<span class="btn" id="pathbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄にある(省略された形の)コマンドのパスを調べて表示 
 他、パスの修正、ショートパス、存在等 "
    >パス調べる</span>
<span class="btn" id="appbtn" tabindex="1" onfocus="イベント処理()" onblur="イベント処理()"
    title=" 入力欄にある拡張子を持つファイルを 
 (クリックで)開くアプリケーションのパスを調べる "
    >拡張子</span>
</div>

<input id="restxt" type="text" size="" title=" 結果表示欄 ">

</div>


<div id="hyojibubun"></div>


<script type="text/javascript">//テスト、修正用
function 内容取出し(何){
    var str='',i;
    if(何=='HTML文'){
        str = document.getElementById('hyojibubun').innerHTML;//
        str = str.replace(/</g,'<').replace(/\n/g,'<br>');
    }///
    else if(何=='コマンド')for(i in コマンド配列){
            str += i +'：' +コマンド配列[i] +'<br>'    }
    else if(何=='補文')for(i in 注釈配列){
            str += i +'：' +注釈配列[i] +'<br>'    }
    else if(何=='パス配列')for(i in パス配列){
            str += i +'：' +パス配列[i] +'<br>'    }
    var w = open(); w.document.write(str);
}/////
</script>