var d = document;

function lineBreak(count) {
    for (i = 0; i < count; i++) {
        d.write("<br>");
    }
}

function refs(level) {
    d.write("<font face=\"Arial\" size=\"2\" color=\"#000000\">");
    d.write(" | ");
    d.write("<a href=\"index.php?option=com_content&view=article&id=304:havainnot&catid=37:lintuhavainnot&Itemid=2\">Tuoreet</a> | ");
    d.write("<a href=\"index.php?option=com_content&view=article&id=48&Itemid=84\">Kuntalyhenteet</a> | ");
    d.write("<a href=\"http://www.birdlife.fi/lintuharrastus/suositus_kenttahavaintojen_merkitsemiseksi.pdf\" target=\"_blank\">Havaintolyhenteet</a> | ");
    d.write("<a href=\"index.php?option=com_content&view=article&id=296:havaintojen-keruuperiaate&catid=70:havaintoarkisto\">Havaintojen keruuperiaate</a> |</font>");
}

function daySeparator(sDay, sMonth, sYear) {
    d.write("<tr>");
    d.write("  <td width=\"590\" bgcolor=\"#006699\" colspan=\"7\">");
    d.write("    <span style=\"font-size: 12pt; color: #ffffff;\"><strong>");
    d.write(sDay + "." + sMonth + "." + sYear);
    d.write("    </strong></span>");
    d.write("   </td>");
    d.write("</tr>");
}

var wSpecie      = 110;
var wSpecieLatin =  50;
var wAmount      =  50;
var wWhere       = 150;
var wRef         =  30;
var wWho         = 200;
var wAdd         =  10;

function specie(theSpecie) {
    d.write("<tr>");
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" width=\"");
    d.write(wSpecie + "\">");
    d.write("    <font face=\"Arial\" size=\"2\">");
    d.write(theSpecie);
    d.write("    </font>");
    d.write("   </td>");
}

function specieNew(theSpecie) {
    d.write("<tr>");
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" width=\"");
    d.write(wSpecie + "\">");
    d.write("    <font face=\"Arial\" size=\"2\" color=\"#ff8000\"><b>");
    d.write(theSpecie);
    d.write("    </b></font>");
    d.write("   </td>");
}

function specieNewForPPLY(theSpecie) {
    d.write("<tr>");
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" width=\"");
    d.write(wSpecie + "\">");
    d.write("    <font face=\"Arial\" size=\"2\" color=\"#ff8000\"><b>");
    d.write(theSpecie);
    d.write("    </b></font>");
    d.write("   </td>");
}

function specieLatin(theSpecieLatin) {
    d.write("  <td valign=\"top\" width=\"");
    d.write(wSpecieLatin + "\">");
    d.write("    <font face=\"Arial\" size=\"2\">");
    d.write(theSpecieLatin);
    d.write("    </font>");
    d.write("   </td>");
}

function specieSame() {
specie("&nbsp;");
specieLatin("&nbsp;");
}

function amount(theAmount) {
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" align=\"right\" width=\"");
    d.write(wAmount + "\">");
    d.write("    <font face=\"Arial\" size=\"2\">");
    d.write(theAmount);
    d.write("    </font>");
    d.write("   </td>");
}

function where(theWhere) {
    d.write("  <td valign=\"top\" width=\"");
    d.write(wWhere + "\">");
    d.write("    <font face=\"Arial\" size=\"2\" color=\"#454A87\">");
    d.write("      <strong><em>");
    d.write(theWhere);
    d.write("      </em></strong>");
    d.write("    </font>");
    d.write("   </td>");
}

function whereMap(thePlace, mapId) {
    var url = "http://www.tiira.fi/kartta/kartalle/?bid=" + mapId;
    mapRef  = "<a href=\"javascript:kartalle('" + url + "')\" title=\"Nayta havaintopaikka kartalla\">"
               + thePlace + "</a>";
    where(mapRef);
}

function refStart() {
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" width=\"");
    d.write(wRef + "\">");
    d.write("    <font face=\"Arial\" size=\"1\">");
}

function refEnd() {
    d.write("</font></td>");
}

function naytahavis(url)
{
    var topvar = 150;
    var leftvar = screen.width - 800;
    window.open(url,"uusi_ikkuna", "toolbar=no, location=no, directories=no, status=no, menubar=no, scrollbars=yes, resizable=yes,copyhistory=no,width=700, height=700, top="+topvar+", left="+leftvar+" ");
}

function kartalle(url) /*NÄYTTÄÄ HAVIKSEN KARTALLA*/
{
      /* var topvar = 150; */
      /* var leftvar = screen.width - 800; */
      window.open(url,"kartalle", "toolbar=no, location=no, directories=no, status=no, menubar=no, scrollbars=yes, resizable=yes, copyhistory=no, width=630, height=600");
}

function kapeaPopup(url)
{
    var topvar = 150;
    var leftvar = screen.width - 800;
    window.open(url,"uusi_ikkuna", "toolbar=no, location=no, directories=no, status=no, menubar=no, scrollbars=yes, resizable=yes,copyhistory=no,width=450, height=600, top="+topvar+", left="+leftvar+" ");
}

function refkapeaPopup(url, explain, linkExplain) {
    d.write("<a href=\"javascript:kapeaPopup('" + url + "')\" title=\"" + explain + "\">" + linkExplain + "</a>");
}

function refPP(monthNbr) {
    var url = "http://lists.oulu.fi/pipermail/pply/" + monthNbr + ".html";
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti PPLY-listalta\">pp</a>");
}

function refPP_br(monthNbr) {
    var url = "http://lists.oulu.fi/pipermail/pply/" + monthNbr + ".html";
    d.write("<br>");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti PPLY-listalta\">pp</a>");
}

function refPP_p(monthNbr) {
    var url = "http://lists.oulu.fi/pipermail/pply/" + monthNbr + ".html";
    d.write("<p>");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti PPLY-listalta\">pp</a>");
}

function refPP_b(monthNbr) {
    var url = "http://lists.oulu.fi/pipermail/pply/" + monthNbr + ".html";
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti PPLY-listalta\">pp</a>");
}

function refHA(explain) {
    var url = "http://www.tiira.fi";
    d.write("<a href=\"" + url + "\" title=\"PPLY:n havaintoarkisto " + explain + "\">*HA*</a>");
}

function refTI(monthNbr) {
    var url = "http://www.tiira.fi/selain/naytahavis.php?id=" + monthNbr;
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti Tiirasta\">ti</a>");
}

function refTI_b(monthNbr) {
    var url = "http://www.tiira.fi/selain/naytahavis.php?id=" + monthNbr;
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti Tiirasta\">ti</a>");
}

function refKU(messNbr) {
    var url = "http://groups.yahoo.com/group/kuusamonlinnut/message/" + messNbr;
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti Kuusamon listalta\">ku</a>");
}

function refKU_b(messNbr) {
    var url = "http://groups.yahoo.com/group/kuusamonlinnut/message/" + messNbr;
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti Kuusamon listalta\">ku</a>");
}

function refBLY(year, messName) {
    var url = "http://www.pply.fi/havikset/v" + year + "/" + messName;
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta bongariliiton viesti\">bl</a>");
}

function refBLY_b(year, messName) {
    var url = "http://www.pply.fi/havikset/v" + year + "/" + messName;
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta bongariliiton viesti\">bl</a>");
}

function refSIY(year, messName) {
    var url = "http://www.pply.fi/havikset/v" + year + "/" + messName;
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti\">si</a>");
}

function refSIY_b(year, messName) {
    var url = "http://www.pply.fi/havikset/v" + year + "/" + messName;
    d.write("&nbsp;");
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti\">si</a>");
}

function refTA() {
    d.write("<a href=\"http://edu.taivalkoski.fi/tk-koulut/lukio/linnusto/alku.html\" target=\"_blank\">ta</a>");
}

function refTRY(year, messName, explain) {
    var url = "http://www.pply.fi/havikset/v" + year + "/" + messName;
    d.write("<a href=\"javascript:naytahavis('" + url + "')\" title=\"nayta havainnon viesti\">" + explain + "si</a>");
}

function ppRef(monthNbr) {
    refStart();
    refPP(monthNbr);
    refEnd();
}

function tiRef(monthNbr) {
    refStart();
    refTI(monthNbr);
    refEnd();
}

function HARef(explain) {
    refStart();
    refHA(explain);
    refEnd();
}

function kuRef(messNbr) {
    refStart();
    refKU(messNbr);
    refEnd();
}

function siRef() {
    refStart();
    d.write("si");
    refEnd();
}

function siMRef(messName) {
    refStart();
    refSI(messName);
    refEnd();
}

function blRef(messName) {
    refStart();
    refBL(messName);
    refEnd();
}

function taRef(messName) {
    refStart();
    refTA();
    refEnd();
}

function trRef(messName, explain) {
    refStart();
    refTR(messName, explain);
    refEnd();
}

function who(theWho) {
    d.write("  <td valign=\"top\" width=\"");
    d.write(wWho + "\">");
    d.write("    <font face=\"Arial\" size=\"1\">");
    d.write(theWho);
    d.write("    </font>");
    d.write("   </td>");
    d.write("  <td bgcolor=\"#bcd0e5\" valign=\"top\" width=\"" + wAdd + "\">&nbsp;</td>");
    d.write(" </tr>");
}