/**
	 * Set cookie with given arguments
	 * 
	 * @author R.J.T. de Vries <rdevries@thirdwave.nl>
	 * @param 	string		name		name of cookie to set
	 * @param		mixed			value		value of cookie to ste
	 * @param		integer		expires	number of days before cookie expires
	 * @param		string		path		path to use cookie in
	 * @param		string		domain	domain to use cookie in
	 * @param		boolean		secure	should this be a secure cookie?
	 * @return	void
	 */
	function Set_Cookie(name, value, expires, path, domain, secure) {
	
		// set time, it's in milliseconds
	
		var today = new Date();
	
		today.setTime( today.getTime() );
	
		/**
		 * if the expires variable is set, make the correct expires time, the current
		 * script below will set it for x number of days, to make it for hours,
		 * delete * 24, for minutes, delete * 60 * 24
		 */
		if ( expires ) expires = expires * 1000 * 60 * 60 * 24;
	
		var expires_date = new Date( today.getTime() + (expires) );
		
		document.cookie = name + "=" +escape( value ) +
	
		( ( expires ) ? ";expires=" + expires_date.toGMTString() : "" ) + 
	
		( ( path ) ? ";path=" + path : "" ) + 
	
		( ( domain ) ? ";domain=" + domain : "" ) +
	
		( ( secure ) ? ";secure" : "" );
	
	} // Set_Cookie()
	
	/**
	 * Get cookie, if it exists
	 * 
	 * @author R.J.T. de Vries <rdevries@thirdwave.nl>
	 * @param 	string	name		name of cookie to get
	 * @return 	mixed						value of cookie if found or null if not found
	 */
	function Get_Cookie( name ) {
		
		var start = document.cookie.indexOf( name + "=" );
	
		var len = start + name.length + 1;
	
		if ( ( !start ) && ( name != document.cookie.substring( 0, name.length ) ) ) {
	
			return null;
	
		}
	
		if ( start == -1 ) return null;
	
		var end = document.cookie.indexOf( ";", len );
	
		if ( end == -1 ) end = document.cookie.length;
	
		return unescape(document.cookie.substring( len, end ));
		
	} // Get_Cookie()
	
	Set_Cookie('test', 'none', '', '/', '', '');
	
	/**
	 * Check cookies
	 * 
	 * @author R.J.T. de Vries <rdevries@thirdwave.nl>
	 */
	function cookie_check(language) {
	
		if ( !language ) language = "EN";
	
		// if Get_Cookie succeeds, cookies are enabled, since 
		// the cookie was successfully created.
		
		switch ( language ) {
		
			case 'EN': {
			
				if ( Get_Cookie('test') ) alert('Your browser DOES accept cookies');
		
				else 											alert('Your browser DOES NOT accept cookies');
				
				break;
				
			} // EN
			
			case 'NL': {
			
				if ( Get_Cookie('test') ) alert('Uw browser accepteert WEL cookies');
		
				else 											alert('Uw browser accepteert GEEN cookies');
				
				break;
				
			} // NL
			
		} // switch()
		
	} // cookie_check()