// 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,"SS保存フォルダへのショートカットの作成",0+16);
}else{
	// パスが存在した場合、「ショートカットを作りますか？」と問い合わせる。
	result = WshShell.Popup("熱血江湖-Online の\nスクリーンショット保存フォルダへのショートカットを、\nデスクトップに作成しますか？",0,"SS保存フォルダへのショートカットの作成",4 + 32);
	if(result == 6){
		// [はい]を選択した場合、ショートカットを作成。
		// デスクトップのパスを取得。
		var strDesktop = WshShell.SpecialFolders("Desktop");
		// ショートカットを作成。ファイル名は「熱血江湖SS保存フォルダ.lnk」。
		var oShellLink = WshShell.CreateShortcut(strDesktop + "\\熱血江湖SS保存フォルダ.lnk");
		// ショートカットのリンク先「インストールパス＋\datas\capture」を設定。
		oShellLink.TargetPath = YBDir + "\\datas\\capture";
		// 起動時のウインドウを「通常のウインドウ」に設定。
		oShellLink.WindowStyle = 1;
		// ショートカットの説明を設定。
		oShellLink.Description = "熱血江湖スクリーンショット保存フォルダへのショートカット";
		// ショートカットを保存。
		oShellLink.Save();	
	}else{
		// [いいえ]を選択した場合、処理を中止。
		result = WshShell.Popup("処理を中止します。",0,"SS保存フォルダへのショートカットの作成",0+64); 
	}
}