
function setLeft(ziel,pfad)
  { // alert(opener.location.href);

    if (parent.frames.length > 0)
     { if (parent.linksFrame.location.href.search(ziel) == -1)
         {
           // alert(pfad+ziel+".HTM");
           parent.linksFrame.location.href = pfad+ziel+".HTM";
         }

       if (navigator.userAgent.search(/Opera/) != -1) parent.hauptFrame.focus();
     }
  } /* setLeft */


function flagWin(titel,nr,hymne,detStr,dir,lang,mapStr,wiki)
  {
    document.open("text/html","replace");
    // document.open("text/html","replace");

function UmlautToHtml(s)
/* Sonderzeichen HTML-konform umwandeln */
 { var i;

   if (s == "") return "";

   res = "";
   for (i=0; i<s.length; i++)
     { code = s.charCodeAt(i);
       res = res + (code > 127 ? "&#"+code+";" : s.charAt(i));
     }

   return res.replace(/'/g,"&#39;");
 } /* UmlautToHtml */

    var breite = 530;
    if (dir == "INTE_ORG/" && titel.search(/Rote|Red/) != -1) breite = 350;
    else if (titel.search(/Schweiz|Switzer|Keski/) != -1) breite = 430;
    else if (titel.search(/Campione|Zivilflagge/) != -1) breite = 530;
    else if (titel.search(/Akershus/) != -1) breite = 250;

    titel = titel.replace(/_/g," ");
    bildRef = titel;

    feld =  document.URL.split("/");
    refBak = feld[feld.length-1];
    ref2Bak = refBak;

    dots = (dir == "" ? "../" : "");

    document.writeln('<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN">');
    document.writeln("<HTML>");
    document.writeln("<HEAD>");

    document.writeln("<META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html; charset=iso-8859-1\">");
    document.writeln("<META NAME=Author CONTENT=\"Klaus Cammin\">");
    document.writeln('<SCRIPT TYPE="text/javascript" SRC='+dots+'FLAGGEN.JS></SCRIPT>');
    document.writeln("<LINK REL=stylesheet TYPE=text/css HREF="+dots+"FLAGGEN.CSS>");
    document.writeln("<LINK REL='SHORTCUT ICON' TYPE=image/gif HREF="+dots+"FAVICON.GIF>");
    document.writeln("<TITLE>"+titel+"</TITLE>");
    document.writeln("</HEAD>\r\n");

    ziel = (wiki == "" ? "" : " target=_blank");
    detStr = UmlautToHtml(detStr);
    titel = UmlautToHtml(titel);
    wiki = UmlautToHtml(wiki);

    if (lang == 1)
      { land = 'LAND.HTM';

        document.writeln("<BODY onLoad='setLeft(\"LFRAME\",\""+dots+"\")'>\r\n");
        document.writeln("<FONT SIZE=3><B>Zur&#252;ck:</B></FONT>");
        document.writeln("<A HREF="+dots+"FLGS1.HTM>Flaggen alphabetisch</A>");
        document.writeln("<A HREF="+dots+"KONTI1.HTM>-Flaggen nach Regionen</A>");
        document.writeln("<A HREF="+dots+"ALADI.HTM>-Internationale Organisationen</A>");

        if (wiki != "")
          { w = wiki.replace(/_/g," ");
             ref2Bak = '"' + "http://de.wikipedia.org/wiki/" + w + '"';
             bildRef = "Mehr &uuml;ber " + w + " auf Wikipedia";
          }
      }
   else if (lang == 2)
      { land = 'ENGLAND.HTM';

        document.writeln("<BODY onLoad='setLeft(\"ENGLFR\",\""+dots+"\")'>\r\n");
        document.writeln("<FONT SIZE=3><B>Back:</B></FONT>");
        document.writeln("<A HREF="+dots+"ENGFLGS1.HTM>Flags alphabetical Order</A>");
        document.writeln("<A HREF="+dots+"ENGKONT1.HTM>-Flags regional Order</A>");
        document.writeln("<A HREF="+dots+"ENGALADI.HTM>-International Organisations</A>");

        if (wiki != "")
          { w = wiki.replace(/_/g," ");
            ref2Bak = '"' + "http://en.wikipedia.org/wiki/" + w + '"';
            bildRef = "More on "+w+" at Wikipedia";
          }
      }
   else if (lang == 3)
      { land = 'FRZLAND.HTM';

        document.writeln("<BODY onLoad='setLeft(\"FRZLFR\",\""+dots+"\")'>\r\n");
        document.writeln("<FONT SIZE=3><B>Retour:</B></FONT>");
        document.writeln("<A HREF="+dots+"FRZFLGS1.HTM>Drapeaux par orde alphab&#233;tique</A>");
        document.writeln("<A HREF="+dots+"FRZKONT1.HTM>-Drapeaux par ordre des r&#233;gions</A>");
        document.writeln("<A HREF="+dots+"FRZALADI.HTM>-Organisations internationales</A>");

        if (wiki != "")
          { w = wiki.replace(/_/g," ");
            ref2Bak = '"' + "http://fr.wikipedia.org/wiki/" + w + '"';
            bildRef = "Plus en "+w+" au Wikipedia";
          }
      }

    for (i=1; i<4; i++)
      if (i != lang)
        { jCallDir = (dir == "" ? "" : dots+dir);
          jCall = "'javascript:flagWin(\""+titel+"\","+nr+",\""+hymne+"\",\""+detStr+"\",\""+jCallDir+"\","+i+",\""+mapStr+"\",\""+wiki+"\");'";

          switch(i)
            { case 1: flg = 'GERMANY'; lng = 'Deutsch'; break;
              case 2: flg = 'UNIT_KIN'; lng = 'English'; break;
              case 3: flg = 'FRANCE'; lng = 'Fran&#231;ais'; break;
            }

          document.writeln("<NOBR><A HREF="+jCall+">");
          document.writeln("<IMG SRC="+dots+"LAENDER/"+flg+".GIF BORDER=0 WIDTH=30 TITLE=\""+lng+"\">"+lng+"</A>");
        }

    document.writeln("\r\n<P>\r\n");
    document.writeln("<A HREF="+dir+land+" TITLE=\""+titel+"\"><H2>"+titel+"</H2></A>");
    document.writeln("<A HREF="+ref2Bak+ziel+">");
    document.writeln("<IMG SRC="+dir+"BFLG"+nr+".GIF TITLE=\""+bildRef+"\" ALIGN=MIDDLE BORDER=0 WIDTH="+breite+"></A>");

    if (mapStr != "" && (hymne != "" || detStr != "")) document.write("<BR>");

    if (mapStr != "")
      { document.writeln("<NOBR><A HREF="+ref2Bak+">");
        document.writeln("<IMG SRC="+dir+mapStr+" ALIGN=MIDDLE TITLE=\""+bildRef+"\"BORDER=0></A>");
      }

    if (hymne != "") document.writeln("<NOBR><EMBED SRC="+dir+hymne+" AUTOSTART=FALSE HEIGHT=35 WIDTH=135>");

    if (detStr != "" && titel.search(/Detail:/) == -1)
      { jCall = "'javascript:flagWin(\""+detStr+"\","+(nr+1)+",\"\",\"\",\""+dir+"\","+lang+",\""+mapStr+"\",\""+wiki+"\");'";
        detStr = detStr.replace(/_/g," ");

        // if (mapStr != "" || hymne != "") document.write("<BR>");

        document.writeln("<NOBR><A HREF="+jCall+">");
        document.writeln("<IMG SRC="+dir+"BFLG"+(nr+1)+".GIF TITLE=\""+detStr+"\" ALIGN=MIDDLE BORDER=0 WIDTH=330></A>");
      }

    document.writeln("\r\n</BODY>\r\n</HTML>");
    document.close();
  } /* flagWin */
