

function esc_qq( s )
{
	s = '' + s;

	s = s.replace( /"/g, '\\"' );
	// s = s.replace( /\\/g, '\\\\' );

	return s;
}

function attr_str( hash )
{
	var s = ' ';

	for ( var k in hash )
	{
		s += esc_qq( k );
		s += '="';
		s += esc_qq( hash[ k ] );
		s += '" ';
	}
	return s;
}

function param_str( hash )
{
	var s = ' ';

	for ( var k in hash )
	{
		s += '<param name="';
		s += esc_qq( k );
		s += '" value="';
		s += esc_qq( hash[ k ] );
		s += '">\n';
	}
	return s;
}

function insert_applet( div_id, ah, ph, dbg_id )
{
	var d = document.getElementById( div_id );
	if ( d )
	{
		var s = '<applet ' + attr_str( ah ) + ' >\n';
		s += param_str( ph );
		s += '</applet>\n';

/*
		if ( dbg_id )
		{
			var dbg_elem = document.getElementById( dbg_id );
			if ( dbg_elem )
			{
				dbg_elem.value = s;
				alert( 'stored ' + s );
			}
			else
			{
				alert( 'no area ' + dbg_id );
			}
		}
*/

		d.innerHTML = s;
	}
}
