var scrollTimer

function popup_menu(id_element, btn_width, wdw_width, wdw_listnb, title, id_menu, tab, tick) {
	 var menu_box = document.createElement('div');
	 menu_box.id = id_menu;
	 menu_box.style.width = parseInt(btn_width)+4+'px';
	 menu_box.style.marginLeft = '-2px';
	 menu_box.style.position = 'relative';

	 $(id_element).appendChild(menu_box);

	 var btn = '<div style="float:left"><img src="../images/popup/popup_btn_left.png" id="pp-left'+id_menu+'"></div>';
	 btn += '<div class="pp-middle" id="pp-middle'+id_menu+'"><div id="pp-middle2'+id_menu+'" style="width:500px;">'+title+'</div></div>';
	 btn += '<div style="float:left"><img src="../images/popup/popup_btn_right.png" id="pp-right'+id_menu+'"></div>';
	 btn += '<br style="clear:both;">';
	 new Insertion.Bottom(menu_box.id,btn);
	 $('pp-middle'+id_menu).setStyle({
	 	width: parseInt(btn_width)-22+'px'
	 });

	 $('pp-middle'+id_menu).onclick = function() {
	  	if(!$(id_menu+"-boxlist")) {
	  		menu_boxlist = document.createElement('div');
	  		menu_boxlist.id = id_menu+"-boxlist";
	  		menu_boxlist.style.width = wdw_width+'px';

	  		menu_list = document.createElement('div');
	  		menu_list.id = id_menu+"-list";
	  		menu_list.style.height = (wdw_listnb*15)+'px';

	 			menu_boxlist.appendChild(menu_list);
	 			menu_box.appendChild(menu_boxlist);
		
	 			$(id_menu+"-boxlist").addClassName('pp-boxlist');
	 			$(id_menu+"-list").addClassName('pp-list');

	 			menu_listoverflow = document.createElement('div');
	 			menu_listoverflow.id = id_menu+"-listoverflow";
	 		
	 			dimtab = tab.size();

	  		tab.each(function(val, index) {
	  			if(val[tick] == 1)  flag = index; //test
	 		});
	 		
	 		nbsup = Math.floor((wdw_listnb-1)/2);
	 		nbinf = (wdw_listnb-1) - nbsup;
	 		if((dimtab-(flag+1)) < nbinf) {
	 			nbinf = dimtab - (flag+1);
	 			nbsup = (wdw_listnb-1) - nbinf;
	 		}
	 		if(nbsup > flag) nbsup = flag;
			
			$(id_menu+"-list").appendChild(menu_listoverflow);
	 		$(id_menu+"-listoverflow").setStyle({
	 			position: 'relative',
	 			top: -(flag-nbsup)*15+'px'
	 		});

	 		menu_boxlist.setStyle({
	 			top: (-12-nbsup*15)+'px'
	 		});

	 		tab.each(function(val, index) {
	 			var txt = '<div class="pp-listmenu" id="pp-'+id_menu+'item'+index+'" style="width:'+(wdw_width-2-17)+'px">';
	 			txt += '<div class="pp-tick" id="pp-'+id_menu+'tick'+index+'"></div>';
	 			txt += val["name"]+'</div>';
	 			new Insertion.Bottom(menu_listoverflow.id,txt);
	 			if(val[tick] == 1) { //test
	 				$('pp-'+id_menu+'item'+index).addClassName('pp-listmenuon');
	 				$('pp-'+id_menu+'tick'+index).update('<img src="../images/popup/popup_tickonB.gif">');
	 			} else $('pp-'+id_menu+'item'+index).addClassName('pp-listmenuoff');
	 			
	 			$('pp-'+id_menu+'item'+index).onmouseover = function() {
	 			/*
	 				$(id_menu+"-list").getElementsByClassName('pp-listmenuon').each(function(elselect, elkey) {alert(2)
	 					elselect.removeClassName('pp-listmenuon');
	 					elselect.addClassName('pp-listmenuoff');
	 				});
	 			*/
	 				elselect = $(id_menu+"-list").getElementsByClassName('pp-listmenuon');
	 				elselect[0].removeClassName('pp-listmenuon');
	 				//elselect[0].addClassName('pp-listmenuoff');
					
	 				//$('pp-'+id_menu+'item'+index).removeClassName('pp-listmenuoff');
	 				$('pp-'+id_menu+'item'+index).addClassName('pp-listmenuon');
	 				
	 				if(tab[index][tick] == 1) { //test
	 					$('pp-'+id_menu+'tick'+index).update('<img src="../images/popup/popup_tickonB.gif">');
	 				} else {
	 					tab.each(function(val2, index2) { //test
	 						if(val2[tick] == 1) $('pp-'+id_menu+'tick'+index2).update('<img src="../images/popup/popup_tickon.gif">');
	 					});
	 				}
	 			}
	 			
	 			$('pp-'+id_menu+'item'+index).onclick = function() {
	 				tab.each(function(val2, index2) { //test
	 					if(val2[tick] == 1) val2[tick] = 0;
	 				});
	 				tab[index][tick] = 1;
	 				//res[0] = tab[index]["value"];
	 				$('pp-middle2'+id_menu).update(val["name"]);
	 				if(id_menu == "currencyIN") $('vw-conv-pop2').style.display = "block";
	 				$(id_menu+"-boxlist").remove();
	 			};
	 		});
			
			widthbox = $(id_menu+"-boxlist").getWidth();
			
			partTop = '<div id="pp-'+id_menu+'-scrollT" style="height:15px;">';
			partTop += '<div style="float:left;"><img src="../images/popup/popup_c4.png"></div>';
			partTop += '<div style="width:'+(widthbox-8)+'px;" class="pp-topbox"><img src="../images/popup/popup_a1.png"></div>';
			partTop += '<div style="float:left;"><img src="../images/popup/popup_c3.png"></div>';
			partTop += '</div>';
			
			partBottom = '<div id="pp-'+id_menu+'-scrollB" style="height:15px;">';
			partBottom += '<div style="float:left;"><img src="../images/popup/popup_c1.png"></div>';
			partBottom += '<div style="width:'+(widthbox-8)+'px;" class="pp-bottombox"><img src="../images/popup/popup_a2.png"></div>';
			partBottom += '<div style="float:left;"><img src="../images/popup/popup_c2.png"></div>';
			partBottom += '</div>';
			
	 		new Insertion.Top(id_menu+"-boxlist",partTop);
	 		$('pp-'+id_menu+'-scrollT').onmouseover = function() {
	 			verScroll('up',id_menu+'-listoverflow',(wdw_listnb*15),(dimtab*15));
	 		};
	 		$('pp-'+id_menu+'-scrollT').onmouseout = function() {
	 			stopScroll();
	 		};
			
	 		new Insertion.Bottom(id_menu+"-boxlist",partBottom);
	 		$('pp-'+id_menu+'-scrollB').onmouseover = function() {
	 			verScroll('dn',id_menu+'-listoverflow',(wdw_listnb*15),(dimtab*15));
	 		};
	 		$('pp-'+id_menu+'-scrollB').onmouseout = function() {
	 			stopScroll();
	 		};
	 		
	 	} else {
	 		$(id_menu+"-boxlist").remove();
	 	}
	  };
}

function verScroll(dir,el,outh,inh) {
	var page = document.getElementById(el).style;

	loop = true;
	direction = dir;
	speed = parseInt(20);
	elem = el;
	outheight = outh;
	inheight = inh;
	var y_pos = parseInt(page.top);

	if (direction == "up") {
		if(y_pos == 0) loop = false;
		else if((y_pos + speed) > 0) page.top = 0+'px';
		else page.top = (y_pos + speed)+'px';
	} else if(direction == "dn") {
		if(y_pos == (outh-inh)) loop = false;
		else if(outh > inh) loop = false;
		else if(y_pos < (outh-inh)) page.top = (outh-inh)+'px';
		else page.top = (y_pos - speed)+'px';
	}
  	
  	
  	if(loop) scrolltimer = setTimeout("verScroll(direction,elem,outheight,inheight)", 50);
  	else stopScroll();

}

function stopScroll() {
	clearTimeout(scrolltimer);
}