//
var SYSTitle ="熱血江湖バージョンチェッカー";
var SYSVer = "1.0.0";


// Windows Scripting Host を定義。
var WshShell = WScript.CreateObject("WScript.Shell");


// レジストリのインストール履歴から、熱血江湖のインストールパスを取得。
// try〜catch() 文を利用してエラー時（値が存在しない等）の処理を分岐。
try{
	// レジストリからパスを探す。
	var YBDir = WshShell.RegRead("HKEY_LOCAL_MACHINE\\SOFTWARE\\YBJP\\Path") ;
}catch(e){
	// エラーが発生したら、空文字を代入。
	YBDir = "";
}


// パスの値にてダイアログを表示。
if (YBDir == ""){
	// 空文字の場合「インストール情報がありません。」ダイアログを表示。
	result = WshShell.Popup("熱血江湖-Online のインストール情報がありません。",0,SYSTitle+SYSVer,0+16);
}else{
	// パスが存在した場合、残りの情報を取得。
	var InsVer = WshShell.RegRead("HKEY_LOCAL_MACHINE\\SOFTWARE\\YBJP\\Version") ;
	var NowVer = WshShell.RegRead("HKEY_LOCAL_MACHINE\\SOFTWARE\\YBJP\\YBOnline\\YBOnline\\Version") ;

	var NKMSG = "【インストールディレクトリ】\n"+YBDir+"\n\n【インストール時のバージョン】\n"+InsVer+"\n\n【現在動作中のバージョン】\n"+NowVer+"\n\n\n\n\n\nCopyright (C) Xiao-ling";

	result = WshShell.Popup(NKMSG,0,SYSTitle+SYSVer,0+64); 

}