function create(t,a,c,p){ // www.xinod.it/script/function_create
	var tag,r,q,g,k,b,l,d=document,w=window,IE=!!(d.all&&!w.opera),
	IEa={'class':'className', 'for':'htmlFor', 'accesskey':'accessKey', 'maxlength':'maxLength', 'readonly':'readOnly', 'tabindex':'tabIndex'};
	tag=t.match(/^<(\w+)>$/);
	if(!tag){
		t=t.replace(/&\w+;/g, function(x){ var dv=d.createElement('div'); dv.innerHTML=x; return dv.innerHTML});
		r=d.createTextNode(t);
	}
	else{
		t=tag[1];
		if(a && a.name && IE) r=d.createElement('<'+t+' name="'+a.name+'">');
		else r=d.createElement(t);
		if(a){
			for(q in a){
				if(IE) for(g in IEa) if(q==g){ q=IEa[g]; a[q]=a[g]; break}
				if(q=='style') for(k in a[q]) r['style'][k]=a[q][k];
				else r.setAttribute(q,a[q]);
			}
		}
		if(c){
			if(c instanceof Array) for(b=0,l=c.length;b<l;b++) r.appendChild(c[b]);
	 		else r.appendChild(c);
		}
	}
	if(p) p.appendChild(r);
	return r
}

function $(id){
	return document.getElementById(id);
}
function createSwf(link){
	if($('swfObject')){$('swfHolder').removeChild($('swfObject'))}
	var path=link.id;
	if(!document.all || window.opera)
		create('<object>',{'id':'swfObject','type':'application/x-shockwave-flash','data':path,'width':'600','height':'300'},[
			create('<param>',{'name':'movie','value':path}),
			create('<param>',{'name':'wmode','value':'transparent'})
		],$('swfHolder'));
	else create('<embed>',{'id':'swfObject','width':'600','height':'300','type':'application/x-shockwave-flash','src':path,'wmode':'transparent'},'',$('swfHolder'));
	return false
}// JavaScript Document