function pageScrollToTop(){
	var speed1 = 2;
	var speed2 = 5;
	var sec = 20;
	var y;
	var cy;
	var gy = 0;
	var scrollEngine;
	if(document.all){
		cy = document.body.scrollTop;
	}
	else if(document.layers || document.getElementById){
		cy = pageYOffset;
	}
	y = cy-gy;
	if(Math.abs(y)>50){
		cy = Math.round(cy-(y/speed1));
		window.scroll(0,cy);
		scrollEngine = setTimeout("pageScrollToTop()",sec);	
	}else if(Math.abs(y)>2){
		cy = Math.round(cy-(y/speed2));
		window.scroll(0,cy);
		scrollEngine = setTimeout("pageScrollToTop()",sec);	
	}else{
		window.scroll(0,0);
		clearTimeout(scrollEngine);
	}
}

function openDetail(wUrl,wWidth,wHeight){
	wWidth = 640;
	wHeight = 600;
	scWidthCenter = screen.availWidth / 2;
	scHeightCenter = screen.availHeight / 2;
	wOption =
	"toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=" + wWidth + ",height=" + wHeight + ",left=" + (scWidthCenter - (wWidth / 2)) + ",top=" + (scHeightCenter - (wHeight / 2));

	detailwin = window.open(wUrl,"detail",wOption);
	detailwin.window.focus();
}

function flwriteKeyword(id){
	document.open();
	document.write('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="580" height="382">');
	document.write('<param name="movie" value="/shared/swf/ImgSld_d.swf?colorT=FFFFFF&colorA=FF0000&colorB=000000&dir=keyword&id=' + id + '">');
	document.write('<param name="quality" value="high">');

	document.write('<embed src="/shared/swf/ImgSld_d.swf?colorT=FFFFFF&colorA=FF0000&colorB=000000&dir=keyword&id=' + id + '" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="580" height="382"></embed>');
	document.write('</object>');
	document.close();
}

function flwriteWorks(id){
	document.open();
	document.write('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="580" height="382">');
	document.write('<param name="movie" value="/shared/swf/ImgSld_d.swf?colorT=000000&colorA=FF0000&colorB=FFFFFF&dir=works&id=' + id + '">');
	document.write('<param name="quality" value="high">');
	document.write('<embed src="/shared/swf/ImgSld_d.swf?colorT=000000&colorA=FF0000&colorB=FFFFFF&dir=works&id=' + id + '" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="580" height="382"></embed>');
	document.write('</object>');
	document.close();
}

function flwriteCreatorsfile(id){
	document.open();
	document.write('<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="580" height="382">');
	document.write('<param name="movie" value="/shared/swf/ImgSld_d.swf?colorT=000000&colorA=FF0000&colorB=FFFFFF&dir=creatorsfile&id=' + id + '">');
	document.write('<param name="quality" value="high">');
	document.write('<embed src="/shared/swf/ImgSld_d.swf?colorT=000000&colorA=FF0000&colorB=FFFFFF&dir=creatorsfile&id=' + id + '" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="580" height="382"></embed>');
	document.write('</object>');
	document.close();
}



function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v3.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}