var height=20;var iheight=15;var bgc="navy"
var tc="lightblue"
var over_bgc="silver";var over_tc="white";var speed=0;var timerID="";var N=(document.all)?0:1;var width=152
var self_menu=new Array();function write_menu()
{smc=0;document.write("<div style='position:absolute'>");mn=0;mni=1;start=-1;for(i=0;i<Link.length;i++)
{la=Link[i].split("|");if(la[0]=="0")
{if(start==0)
{document.write("</div>");h=csmc*iheight;tmn=mn;self_menu[smc]=new Array(tmn,h,0,-2);smc++;mn--;}
csmc=0;document.write("<div class='slidingmenu' style='top:"+mn+";height:"+height+"' id='down"+smc+"' onclick='pull_down("+smc+","+mni+")'>&nbsp;"+la[1]+"</div>");self_menu[smc]=new Array(mn,height,0,mni);smc++;mni++;mn+=height;start=1;}
else
{if(start==1)
{if(N)mn+=2;document.write("<div class='item_panel' id='down"+smc+"' style='top:"+mn+"'>");start=0;}
document.write("<a href='"+la[2]+"'");if(la[3]!="")document.write(" target='"+la[3]+"' ");document.write("><div class='item' id='d"+i+"' style='height:"+iheight);if(N)document.write(";width:150");document.write("' onmouseover='color(this.id)' onmouseout='uncolor(this.id)'>&nbsp;&nbsp;"+la[1]+"</div></a>");csmc++;}}
if(start==0)
{document.write("</div>");h=csmc*iheight;tmn=mn+5;self_menu[smc]=new Array(tmn,h,0);name="down"+(self_menu.length-1);obj=document.getElementById(name);obj.style.borderBottomColor="darkblue";obj.style.borderBottomWidth=1;obj.style.borderBottomStyle="solid";}
document.write("</div>");}
function color(obj)
{document.getElementById(obj).style.backgroundColor=over_bgc;document.getElementById(obj).style.color=over_tc}
function uncolor(obj)
{document.getElementById(obj).style.backgroundColor=bgc;document.getElementById(obj).style.color=tc}
function pull_down(nr,c)
{if(timerID=="")
{to=self_menu[nr+1][1]
begin=nr+2;if(timerID!="")clearTimeout(timerID);if(self_menu[nr+1][2]==0)
{self_menu[nr+1][2]=1;if(nr==self_menu.length-2){to++;}
epull_down(begin,to,0);}
else
{to=0;self_menu[nr+1][2]=0;name="down"+(nr+2);open_item=0;for(i=0;i<nr;i++)
{if(self_menu[i][2]==1)
{open_item+=self_menu[i][1];}}
if(N==false){open_item-=(c*1)};if(nr==self_menu.length-2){val=self_menu[self_menu.length-1][1];to=-1;}
else val=parseInt(document.getElementById(name).style.top)-(open_item)-(c*height);epull_up(begin,to,val);}}}
function epull_down(nr,to,nowv)
{name="down"+(nr-1);obj=document.getElementById(name).style.clip="rect(0,"+width+","+(nowv+1)+",0)";for(i=nr;i<self_menu.length;i++)
{name="down"+i;obj=document.getElementById(name);obj.style.top=parseInt(obj.style.top)+1;}
nowv++;if(nowv<to)timerID=setTimeout("epull_down("+nr+","+to+","+nowv+")",speed);else timerID="";}
function epull_up(nr,to,nowv)
{name="down"+(nr-1);obj=document.getElementById(name).style.clip="rect(0,"+width+","+nowv+",0)";for(i=nr;i<self_menu.length;i++)
{name="down"+i;obj=document.getElementById(name);obj.style.top=parseInt(obj.style.top)-1;}
nowv--;if(nowv>to)timerID=setTimeout("epull_up("+nr+","+to+","+nowv+")",speed);else timerID="";}
function startup(nr)
{write_menu();if(nr!=0)
{for(i=0;i<self_menu.length;i++)
{if(self_menu[i][3]==nr)pull_down(i,nr)
i==self_menu.length;}}}
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+"=";var alen=arg.length;var clen=document.cookie.length;var i=0;while(i<clen){var 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 SetCookie(name,value){var argv=SetCookie.arguments;var argc=SetCookie.arguments.length;var expires=(argc>2)?argv[2]:null;var path="/";var domain=(argc>4)?argv[4]:null;var secure=(argc>5)?argv[5]:false;document.cookie=name+"="+escape(value)+
((expires==null)?"":("; expires="+
expires.toGMTString()))+
((path==null)?"":("; path="+path))+
((domain==null)?"":("; domain="+domain))+
((secure==true)?"; secure":"");}
var emailcookie=GetCookie('email_address');if(emailcookie==null){emailcookie='your email here';}
function chk(email,formname)
{invalid="";if(!email)
invalid="No email address found!  Try reloading the page then use the 'email a script' feature again.";else{if((email.indexOf("@")==-1)||(email.indexOf(".")==-1))
invalid+="\n\nInvalid email address.  Your email address is missing an '@' sign and a '.' in the domain name (like '.com').  Please check your address then submit again.";if(email.indexOf("youremailhere")>-1)
invalid+="\n\nInvalid email address.  Make sure your email address included your username, the '@' sign, and the domain name (like '.com').";if(email.indexOf("\\")>-1)
invalid+="\n\nEmail address contains an invalid back-slash (\\) character.  Remove the character and submit again.";if(email.indexOf("/")>-1)
invalid+="\n\nEmail address contains an invalid forward-slash (/) character.  Remove the character and submit again.";if(email.indexOf("'")>-1)
invalid+="\n\nEmail address contains an invalid apostrophe (') character.  Remove the character and submit again.";if(email.indexOf("zaz.com.br")>-1)
invalid+="\n\nPlease do not use an email address that has an autoresponder set up for it.  Thanks.";if(email.indexOf("!")>-1)
invalid+="\n\nEmail address contains an invalid exclamation point (!) character.  Remove the character or correct the email address then submit again.";if((email.indexOf(",")>-1)||(email.indexOf(";")>-1))
invalid+="\n\nPlease only enter one email address in the box at a time.  Remove the extra addresses and submit again.";if(email.indexOf("?subject")>-1)
invalid+="\n\nPlease do not add '?subject=...' to your email address.  Scriptbot will send you the script with a pre-defined subject already.  Please remove the '?subject=...' from your email address and submit again.";}
if(invalid=="")
{var largeExpDate=new Date();largeExpDate.setTime(largeExpDate.getTime()+(31*24*3600*1000));SetCookie('email_address',email,largeExpDate);if(formname=="scriptbot")
{page="http://javascript.internet.com/sent.html?"+email;window.open(page,"AdWindow","width=650,height=200");}
return true;}
else
{alert("Oops, something is wrong...."+invalid);return false;}}
function updateNewsletters(){with(document.forms["newslettersignup"]){emailStr=email.value;var emailPat=/^(.+)@(.+)$/;var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]";var validChars="\[^\\s"+specialChars+"\]";var quotedUser="(\"[^\"]*\")";var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;var atom=validChars+'+';var word="("+atom+"|"+quotedUser+")";var userPat=new RegExp("^"+word+"(\\."+word+")*$");var domainPat=new RegExp("^"+atom+"(\\."+atom+")*$");var matchArray=emailStr.match(emailPat);if(matchArray==null){alert("Email address seems incorrect (check @ and .'s)");return false;;}
var user=matchArray[1];var domain=matchArray[2];if(user.match(userPat)==null){alert("The username doesn't seem to be valid.");return false;}
var IPArray=domain.match(ipDomainPat);if(IPArray!=null){for(var i=1;i<=4;i++){if(IPArray[i]>255){alert("Destination IP address is invalid!");return false;}}}
var domainArray=domain.match(domainPat);if(domainArray==null){alert("The domain name doesn't seem to be valid.");return false;}
var atomPat=new RegExp(atom,"g");var domArr=domain.match(atomPat);var len=domArr.length;if(domArr[domArr.length-1].length<2||domArr[domArr.length-1].length>3){alert("The address must end in a three-letter domain, or two letter country.");return false;}
if(len<2){var errStr="This address is missing a hostname!";alert(errStr);return false;}
List_Name.value=newsletter.options[newsletter.selectedIndex].value
+nltype.options[nltype.selectedIndex].value;var largeExpDate=new Date();largeExpDate.setTime(largeExpDate.getTime()+(31*24*3600*1000));SetCookie('email_address',emailStr,largeExpDate);return true;}}