function getCookieVal(offset){var endstr=document.cookie.indexOf(';',offset);if(endstr==-1)endstr=document.cookie.length;return(unescape(document.cookie.substring(offset,endstr)));};function GetCookie(name){var arg=name+'=',alen=arg.length,clen=document.cookie.length,i=0,j;while(i<clen){j=i+alen;if(document.cookie.substring(i,j)==arg)return(getCookieVal(j));i=document.cookie.indexOf(' ',i)+1;if(i==0)break;};return(null);};function GetDateToCookie(value){var today=new Date(),expires=new Date();expires.setTime(today.getTime()+(value*24*60*60*1000));return(expires);};function SetCookie(name,value){var arr=new Array(name,value,null,null,null,false);var argv=get_arguments_details(SetCookie.arguments,arr);var expires=argv[2],path=argv[3],domain=argv[4],secure=argv[5];document.cookie=name+'='+escape(value)+((expires==null)?'':(';expires='+GetDateToCookie(expires).toGMTString()))+((path==null)?'path=/':(';path='+path))+((domain==null)?'':(';domain='+domain))+((secure==true)?';secure':'');};function completeCookie(name,value){SetCookie(name,GetCookie(name)+'##'+value);};function createCookie(name,value,days){var expires='',date;if(days){date=new Date();date.setTime(date.getTime()+(days*24*60*60*1000));expires=';expires='+date.toGMTString();};document.cookie=name+'='+value+expires+';path=/';};function readCookie(name){var nameEQ=name+'=',ca=document.cookie.split(';'),i,c;for(i=0;i<ca.length;i++){c=ca[i];while(c.charAt(0)==' ')c=c.substring(1,c.length);if(c.indexOf(nameEQ)==0)return(c.substring(nameEQ.length,c.length));};return(null);};function eraseCookie(name){SetCookie(name,'',0);};function extract_head_survey_text(text,tagid,newheader){var sep=';!',s=text.split(tagid);s=s[s.length-1];if(!s)return({'header':'','value':''});var n=s.indexOf(sep);var header=(newheader?newheader:tagid+s.substr(0,n));var value=header+s.substr(n);return({'header':header,'value':value});};function detect_the_survey_choiced(that1,that2){var x=that1.split(']='),y=that2.split(']=');if(x[0]!=y[0])return('');return(that2);};function change_the_survey_choiced(text,header,value,taginputother,thatname){var sep=';!',thelist=text.split(sep),mem='',z,i,y,x;for(i=0;i<thelist.length;i++){if(thelist[i]!=header&&thelist[i]!=''){y=value;if(taginputother&&thatname){z=taginputother+thatname;if($Prot(z)&&thelist[i].substring(0,taginputother.length)==taginputother){y=z+'='+$Prot(z).value;}};x=detect_the_survey_choiced(thelist[i],y);if(x)thelist[i]=x;mem+=thelist[i]+sep;};return(mem);}};