function toolbar_DoFSCommand(command, args) {
	if (command == "show_menu") {
		switch (args) {
			case "1":
				showPanel("WCrete",160,155);
				break;
			case "2":
				showPanel("Chania",260,155);
				break;
			case "3":
				showPanel("Rethymnon",357,155);
				break;
			case "4":
				showPanel("Shop on line",457,155);
				break;
			case "5":
				showPanel("Forums",564,155);
				break;
		}
	}
	if (command == "hide_menu") {
		//hidePanel();
	}
}

// Hook for Internet Explorer 
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && 
	  navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
	document.write('<SCRIPT LANGUAGE=VBScript\> \n');
	document.write('on error resume next \n');
	document.write('Sub toolbar_FSCommand(ByVal command, ByVal args)\n');
	document.write('  call toolbar_DoFSCommand(command, args)\n');
	document.write('end sub\n');
	document.write('</SCRIPT\> \n');
}