// CSS切り替えスクリプト（form用）
//  Piro/outsider reflex(http://www.cc-net.or.jp/~piro/)

// フォーム切り替え時の処理
function Apply(Form) {
	WrtCk('Selected',St[Form.options[Form.selectedIndex].value].name,30);
	var LH = location.href;
	if (LH.indexOf('?') > -1) LH = LH.substr(0,LH.indexOf('?'));
	if (LH.indexOf('#') > -1) LH = LH.substr(0,LH.indexOf('#'));
	location.href = LH;
}

//選択フォーム出力
function MkOption(Nm) {
	var SelAtt = '', Def = '';
	if (Fg[Nm]) SelAtt = '|selected|selected';
	return(MkNode('option|value|'+Nm+'|label|'+St[Nm].label+SelAtt,St[Nm].name+Def)+'\n');
}
function MkOptions() {
	var OpnFg = false, opt = '', optGrp = '';
	if (NN4Mode) opt = MkOption(NN4n); else {
		for (var GN = 1; GN != LastN; GN++) {
			if (St[GN].group != St[GN-1].group) {
				if (OpnFg && optGrp != '' && !N6) opt = opt+MkNode('optgroup|label|'+St[GN-1].group, optGrp);  else opt = opt+optGrp;
				optGrp = '';
				if (St[GN].group != '') OpnFg = true;
			}
			if (!St[GN].hidden) optGrp = optGrp+MkOption(GN);
		}
		if (OpnFg && St[GN-1].group != '' && optGrp != '' && !N6) optGrp = MkNode('optgroup|label|'+St[GN-1].group, optGrp);
		opt = opt+optGrp;
	}
	return(opt+MkOption(0));
}
var StyleForm = ''; if (!(document.layers && NN4Style == 'none')) {
	StyleForm =
	MkNode('div|id|StyleSel',
		MkNode('label|accesskey|S',
			MkNode('kbd|class|key','Select:')+
			MkNode('select|id|Styles|name|Styles|onchange|Apply(this);',MkOptions())
		)
	);
}
document.write(MkNode('form|name|orSysForm|id|orSysForm|action|'+location.href,StyleForm));