// google/adzehoro.js  2008 0120 1041
aSign=new Array('Aries','Taurus','Gemini','Cancer','Leo','Virgo','Libra','Scorpio','Sagittarius','Capricorn','Aquarius','Pisces');
aPlanet=new Array('.','Sun','Moon','Mercury','Venus','Mars','Jupiter','Saturn','Uranus','Neptune','Pluto');
aAspect=new Array('conjunct','semi-sextile','sextile','square','trine','quincunx','opposite','quincunx','trine','square','sextile','semi-sextile','conjunct');
sOrb='';
function Horoscope(pSign,pBirthday,pDate){
  var sSign=pSign;
  codeSigns='atgmlvbiscqp';
  sPlanets=' RLMVWJSUNP';
  sAspects='&I*+/Q%Q/+*I&';// I=/ Q=+
  sAlert='Inner planet influences (sun, moon, Mercury, Venus, Mars) last from a day to several weeks. Outer planet influences (Jupiter, Saturn, Uranus, Neptune, Pluto) last from several weeks to a month or more.';
  aMonthNames=new Array('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC');
  aDayNames=new Array('Sun','Mon','Tues','Wednes','Thurs','Fri','Satur');
  sFoot='<hr><font size="1"><div align="right"><a target="adze" href="http://www.adze.com/" title="See what else is at the AdZe.com web site.">more from AdZe.com</a></div>Copyright &copy; 2007 MOTTASIA Inc.<br><small>';
  sFoot+='<br><small><b>AdZe MiXXe</b></small>&reg;<small> is a registered trademark of MOTTASIA Inc.</small></font>';
  fErr=false;
  if(sSign=='ONE'){
    fSign=false;
    sNatYear=pBirthday.substr(0,4);
    sNatMonth=pBirthday.substr(5,2);
    sNatDay=pBirthday.substr(8,2);
    sNatHour=0;
    if(pBirthday.length>10){
      sNatHour=pBirthday.substr(10);
    }
    position(parseFloat(sNatYear),parseFloat(sNatMonth),parseFloat(sNatDay),parseFloat(sNatHour));
    aNat=new Array();
    for(iPlanet=1;iPlanet<11;iPlanet++){
      aNat[iPlanet]=Math.abs(aPos[iPlanet]);
    }
  }else{
    fSign=true;
    sSigns='AriTauGemCanLeoVirLibScoSagCapAquPisALL';
    iNatSign=sSigns.indexOf(sSign.substr(0,3))/3;
    if(iNatSign<1) iNatSign=0;
    jPos=(iNatSign*30.)+15.;
  }
  newDate=new Date();
  iDate=parseInt(pDate);
  newDate.setDate(newDate.getDate()+iDate);
  var sMonth = newDate.getMonth();
  var sDay = newDate.getDate();
  var sYear = newDate.getFullYear();
  position(sYear,sMonth+1,sDay,0);
  for(iPlanet=1;iPlanet<11;iPlanet++){
    aPos[iPlanet]=Math.abs(aPos[iPlanet]);
  }
  if(sSign=='ALL'){
    fSign=false;
    aNat=new Array();
    for(iPlanet=1;iPlanet<11;iPlanet++){
      aNat[iPlanet]=aPos[iPlanet];
    }
  }
  sHTML='<center>';
  sDate=aDayNames[newDate.getDay()]+'day, '+aMonthNames[sMonth]+' '+sDay+', '+sYear;
  sHTML+='<b><font size="1">'+sDate;
  if(fSign){
    sHTML+='<font size="3"> - '+sSign+'</font></b>';
  }else{
    if(sSign=='ALL'){
      sHTML+='<font size="3"> - <nobr>All Signs</nobr></font></b><br>(Mundane Horoscope for Everyone)';
    }else{
      iNatSign=Math.floor(Math.abs(aNat[1]/30));
      if(pBirthday=='YYYY-MM-DD'){
        sHTML+='</font></b><br><font color="red"><br>Please enter Birth Date<br>(use "Edit settings" function)<br></font>';
        fErr=true;
      }else{
        if( (pBirthday.substr(4,1)!='-') || (pBirthday.substr(7,1)!='-') || (sNatYear.length!=4) ||(sNatMonth.length!=2) ||(sNatDay.length!=2)  ){
          sHTML+='</font></b><br><font color="red"><br>Invalid Date Format<br>Please Correct<br>(use "Edit settings" function)<br></font>';
          fErr=true;
        }else{
          dPos=MOD30(aNat[2]);
          dPos=(Math.floor(Math.abs(dPos))+(Math.abs(dPos)-Math.floor(Math.abs(dPos)))*0.6);
          dPos=dPos.toFixed(2);
          mPos=Math.round((dPos-Math.floor(dPos))*100);
          iMoonSign=Math.floor(Math.abs(aNat[2]/30));
          t='"Your Sun-sign is '+aSign[iNatSign]+' and your Moon-sign is '+Math.floor(dPos)+'&deg;'+mPos+'&apos; '+aSign[iMoonSign]+'. If these are not correct, use the previous or next day for a more accurate daily horoscope reading. Or, you can adjust the date by plus/minus decimal hours (e.g. 1952-11-23+4.5). If you do not know your Sun and Moon sign positions, consult an astrologer or visit AdZe.com."';
          t="[<a href='javascript:alert("+t+");' title='Click here for Sun/Moon accuracy details.'> ? </a>]";
//          t='<font face="ZodiacJaDy">'+sPlanets.substr(1,1)+codeSigns.substr(iNatSign,1)+sPlanets.substr(2,1)+codeSigns.substr(iMoonSign,1)+'</font> '+t;
          sHTML+='<font size="3"> - '+aSign[iNatSign]+'</font></b><br>Birthdate:('+pBirthday+') '+t;
        }
      }
    }
  }
  sHTML+='</font><br><a target="adze" href="http://www.adze.com/" title="See what else is at the AdZe.com web site."><img src="http://www.adze.com/images/top-logo.gif" height="62" width="144" border="0" /></a>';
  if(sSign=='ONE'){
    sHTML+='&nbsp;<a target="adze" href="http://www.adze.com/Classroom/sunsigns.html" title="Read more about the Sun Signs."><img src="http://www.adze.com/webmaster/images/s_'+aSign[iNatSign].toLowerCase()+'.gif" height="60" width="60" border="0" /></a>';
  }else{
    if(sSign!='ALL'){
      sHTML+='&nbsp;<a target="adze" href="http://www.adze.com/Classroom/sunsigns.html" title="Read more about the Sun Signs."><img src="http://www.adze.com/webmaster/images/s_'+sSign.toLowerCase()+'.gif" height="60" width="60" border="0" /></a>';
    }
  }
  if(fErr){
    return sHTML+sFoot;
  }
  sHTML+='<br><font size="1"><small><a target="gadze" href="http://www.adze.com/google/adzehoro.htm?sign='+pSign+'&birthday='+pBirthday+'&offset=-1" title="open in separate window">yesterday</a>';
  sHTML+=' <a target="gadze" href="http://www.adze.com/google/adzehoro.htm?sign='+pSign+'&birthday='+pBirthday+'" title="open in separate window">today</a>';
  sHTML+=' <a target="gadze" href="http://www.adze.com/google/adzehoro.htm?sign='+pSign+'&birthday='+pBirthday+'&offset=1" title="open in separate window">tomorrow</a></small></font>';
  sHTML+='</center><font size="2"><br><font size="1"><b>Current Influence of the Inner Planets</b> <nobr>[<a href="javascript: alert(';
  sHTML+="'"+sAlert+"'";
  sHTML+=');" title="Each influence lasts from a day to several weeks."> ? </a>]</nobr></font><br>';
  for(iOrb=15;iOrb>1;iOrb--){
    jOrb=30./iOrb;
    sOrb=(jOrb/2).toFixed(1);
    iHit=0;
    tHTML='';
    if(fSign){
      for(iPlanet=1;iPlanet<6;iPlanet++){
        iPos=aPos[iPlanet];
        iSign=Math.floor(iPos/30);
        iAspect=Math.round(Math.abs(iPos-jPos)/jOrb)/iOrb;
        if(iAspect==Math.floor(iAspect)){
          iAspect=Math.floor(iAspect);
          tAspect=sAspects.substr(iAspect,1);
          kTransit=sPlanets.substr(iPlanet,1)+tAspect+'R';
          if((tAspect=='Q')||(tAspect=='I')){
            tTransit=sPlanets.substr(iPlanet,1)+((tAspect=='Q')?'+':'/')+'R';
            sSID=aSID[tTransit]+'';
          }else{
            sSID=aSID[kTransit]+'';
          }
          if(sSID.length>13){
            tHTML+=Text(sSID,iPlanet,iSign,iAspect,1,iNatSign,sSign);
            iHit++;
          }
        }
      }
    }else{
      for(iPlanet=1;iPlanet<6;iPlanet++){
        iPos=aPos[iPlanet];
        iSign=Math.floor(iPos/30);
//        for(jPlanet=1;jPlanet<11;jPlanet++){
        for(jPlanet=iPlanet+1;jPlanet<11;jPlanet++){
          if((sSign=='ALL')&&(jPlanet==iPlanet)){
            continue;
          }
          jPos=aNat[jPlanet];
          iAspect=Math.round(Math.abs(iPos-jPos)/jOrb)/iOrb;
          if(iAspect==Math.floor(iAspect)){
            iAspect=Math.floor(iAspect);
            tAspect=sAspects.substr(iAspect,1);
            kTransit=sPlanets.substr(iPlanet,1)+tAspect+sPlanets.substr(jPlanet,1);
            if((tAspect=='Q')||(tAspect=='I')){
              tTransit=sPlanets.substr(iPlanet,1)+((tAspect=='Q')?'+':'/')+sPlanets.substr(jPlanet,1);
              sSID=aSID[tTransit]+'';
            }else{
              sSID=aSID[kTransit]+'';
            }
            if(sSID.length>13){
              jSign=Math.floor(jPos/30);
              tHTML+=Text(sSID,iPlanet,iSign,iAspect,jPlanet,jSign,sSign);
              iHit++;
            }
          }
        }
      }
    }
    if(iHit>1){
      break;
    }
  }
  if(iHit<1){
    sHTML+='No inner-planet transits. Unusual. Anything can happen.';
  }else{
    sHTML+=tHTML;
  }
  sHTML+='<br><br><font size="1"><b>Current Influence of the Outer Planets</b> <nobr>[<a href="javascript: alert(';
  sHTML+="'"+sAlert+"'";
  sHTML+=');" title="Each influence lasts from several weeks to a month or more."> ? </a>]</nobr></font><br>';
  for(iOrb=15;iOrb>1;iOrb--){
    jOrb=30./iOrb;
    sOrb=(jOrb/2).toFixed(1);
    iHit=0;
    tHTML='';
    if(fSign){
      for(iPlanet=6;iPlanet<11;iPlanet++){
        iPos=aPos[iPlanet];
        iSign=Math.floor(iPos/30);
        iAspect=Math.round(Math.abs(iPos-jPos)/jOrb)/iOrb;
        if(iAspect==Math.floor(iAspect)){
          iAspect=Math.floor(iAspect);
          tAspect=sAspects.substr(iAspect,1);
          kTransit=sPlanets.substr(iPlanet,1)+tAspect+'R';
          if((tAspect=='Q')||(tAspect=='I')){
            tTransit=sPlanets.substr(iPlanet,1)+((tAspect=='Q')?'+':'/')+'R';
            sSID=aSID[tTransit]+'';
          }else{
            sSID=aSID[kTransit]+'';
          }
          if(sSID.length>13){
            tHTML+=Text(sSID,iPlanet,iSign,iAspect,1,iNatSign,sSign);
            iHit++;
          }
        }
      }
    }else{
      for(iPlanet=6;iPlanet<11;iPlanet++){
        iPos=aPos[iPlanet];
        iSign=Math.floor(iPos/30);
        for(jPlanet=1;jPlanet<11;jPlanet++){
//        for(jPlanet=iPlanet+1;jPlanet<11;jPlanet++){
          if( (sSign=='ALL') && ((jPlanet<6)||(jPlanet==iPlanet)) ){
            continue;
          }
          jPos=aNat[jPlanet];
          iAspect=Math.round(Math.abs(iPos-jPos)/jOrb)/iOrb;
          if(iAspect==Math.floor(iAspect)){
            iAspect=Math.floor(iAspect);
            tAspect=sAspects.substr(iAspect,1);
            kTransit=sPlanets.substr(iPlanet,1)+tAspect+sPlanets.substr(jPlanet,1);
            if((tAspect=='Q')||(tAspect=='I')){
              tTransit=sPlanets.substr(iPlanet,1)+((tAspect=='Q')?'+':'/')+sPlanets.substr(jPlanet,1);
              sSID=aSID[tTransit]+'';
            }else{
              sSID=aSID[kTransit]+'';
            }
            if(sSID.length>13){
              jSign=Math.floor(jPos/30);
              tHTML+=Text(sSID,iPlanet,iSign,iAspect,jPlanet,jSign,sSign);
              iHit++;
            }
          }
        }
      }
    }
    if(iHit>1){
      break;
    }
  }
  if(iHit<1){
    sHTML+='No inner-planet transits. Unusual. Anything can happen.';
  }else{
    sHTML+=tHTML;
  }
  return sHTML+'</font>'+sFoot;
}
function Text(pSID,piP,piS,pA,pjP,pjS,pTorN){
  var a=pSID.lastIndexOf(' ')+1;
  sTorN=(pTorN=='ALL')?' transit ':' natal ';
  var t='"Transit '+aPlanet[piP]+' in '+aSign[piS]+' '+aAspect[pA]+sTorN+aPlanet[pjP]+' in '+aSign[pjS];
  t+=' with '+sOrb+'&deg; orb."';
  t="<a href='javascript:alert("+t+");' title="+t+">...</a>";
  t='<font size="1">('+t+')</font>';
  return pSID.substring(0,a)+'<nobr>'+pSID.substring(a)+t+'</nobr> ';
}