function getCookieVal (offset) {
var endstr = document.cookie.indexOf (";", offset);
if (endstr == -1)
endstr = document.cookie.length;
return unescape(document.cookie.substring(offset, endstr));
}

function FixCookieDate (date) {
var base = new Date(0);
var skew = base.getTime(); // dawn of (Unix) time - should be 0
if (skew > 0) // Except on the Mac - ahead of its time
date.setTime (date.getTime() - skew);
}

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,expires,path,domain,secure) {
document.cookie = name + "=" + escape (value) +
((expires) ? "; expires=" + expires.toGMTString() : "") +
((path) ? "; path=" + path : "") +
((domain) ? "; domain=" + domain : "") +
((secure) ? "; secure" : "");
}

function DeleteCookie (name,path,domain) {
if (GetCookie(name)) {
document.cookie = name + "=" +
((path) ? "; path=" + path : "") +
((domain) ? "; domain=" + domain : "") +
"; expires=Thu, 01-Jan-70 00:00:01 GMT";
}
}

function getlangs(langi) {
var langs;
langs="";
if (langi==1) { langs = "_EN"; }
if (langi==2) { langs = ""; }
if (langi==3) { langs = "_FR"; }
if (langi==4) { langs = "_PT"; }
return(langs);
}

function software(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "Software/f_left_software.asp?Leftp=was_ist_mir";
parent.frames["mainFrame"].location.href = "Software/Was_ist_Mirakon/Was_ist_Mirakon"+lang+".htm";
return(1);
}

function software2(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "../../Software/f_left_software.asp?Leftp=was_ist_mir";
parent.frames["mainFrame"].location.href = "../../Software/Was_ist_Mirakon/Was_ist_Mirakon"+lang+".htm";
return(1);
}

function demo(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "demo/F_left_demo.asp?Leftp=Werkzeugbau";
parent.frames["mainFrame"].location.href = "demo/werhzbau/werhzbau"+lang+".htm";
return(1);
}

function bestellung(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "bestellung/F_left_bestellung.asp?Leftp=starterset";
parent.frames["mainFrame"].location.href = "bestellung/Starterset/Starterset"+lang+".htm";
return(1);
}

function ueber(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "ueber_uns/F_left_ueber_uns.asp?Leftp=firma";
parent.frames["mainFrame"].location.href = "ueber_uns/firma/firma"+lang+".htm";
return(1);
}

function res(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "clients_area/f_left_clients.asp?Leftp=homeclients";
parent.frames["mainFrame"].location.href = "clients_area/clients.asp";
return(1);
}



//*****************SOFTWARE*****************

function was_ist_mir(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Was_ist_Mirakon/was_ist_mirakon"+lang+".htm";
return(1);
}

function ihre_vorteile(langi) {
var langs;

var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Vorteile/ihre_vorteile_mit_mirakon-system"+lang+".htm";
return(1);
}

function aufbau(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Aufbau_Funktionsw/aufbau_und_funktionsweise"+lang+".htm";
return(1);
}

function modellwiss(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Modellierung_von_Wissen/modellierung_von_wissen"+lang+".htm";
return(1);
}

function modellprod(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Modellierung_von_Produkten/modellierung_von_produkten"+lang+".htm";
return(1);
}

function modellproz(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Modellierung_von_Prozessen/modellierung_von_prozessen"+lang+".htm";
return(1);
}

function anwendungbei(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Anwendungsbeisp/anwendungsbeispiele"+lang+".htm";
return(1);
}

function preisliste(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Preisliste/preisliste_2002"+lang+".htm";
return(1);
}

function spezifik(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Spezifikationen/spezifikationen"+lang+".htm";
return(1);
}

function pibreader(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "pib_reader/pib_reader"+lang+".htm";
return(1);
}

function pibreaderend(langi) {
var lang;
lang=getlangs(langi);
parent.frames["leftFrame"].location.href = "../f_left_software.asp?leftp=pibreader";
return(1);
}

function reference(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "reference/reference"+lang+".htm";
return(1);
}
//****************************************

//*****************bestellung*************

function starterset(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Starterset/starterset"+lang+".htm";
return(1);
}

function miete(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Miete/miete"+lang+".htm";
return(1);
}

function lizenzkauf(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Lizenzkauf/lizenzkauf"+lang+".htm";
return(1);
}

function wartvertrag(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Wart_Vertrag/wartungsvertrag"+lang+".htm";
return(1);
}
//****************************************

//*****************demos*************

function Werkzeugbau(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Werhzbau/werhzbau"+lang+".htm";
return(1);
}

function Teilefertigung(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Teilefertigung/teilefertigung"+lang+".htm";
return(1);
}

function Chemische(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Chemische Industrie/chemische_industrie"+lang+".htm";
return(1);
}

function Maschinenbau(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Maschinenbau/maschinenbau"+lang+".htm";
return(1);
}
//****************************************


//*****************ueber uns*************

function firma(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Firma/firma"+lang+".htm";
return(1);
}

function kontakte(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "kontakte/kontakte"+lang+".htm";
return(1);
}

function meilensteine(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Meilensteine/meilensteine"+lang+".htm";
return(1);
}

function partner(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Partner/Partner"+lang+".htm";
return(1);
}

function anfahrt(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Anfahrt_Lageplan/anfahrt"+lang+".htm";
return(1);
}

function referenzen(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "Referenzen/referenzen"+lang+".htm";
return(1);
}
//****************************************

//*****************clients*************

function homeclients(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "clients.asp";
//parent.frames["mainFrame"].location.refresh;
return(1);
}

function news(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "news.asp";
return(1);
}

function updates(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "updates.asp";
return(1);
}

function calendar(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "calendar.asp";
return(1);
}

function chat(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "chat.asp";
return(1);
}

function msgmir(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "msgmir.asp";
return(1);
}

function logout(langi) {
var lang;
lang=getlangs(langi);
parent.frames["mainFrame"].location.href = "logout.asp";
return(1);
}

//****************************************

function change_language(lang) {
var main,pospt,posptl,langs,topp,posq,topsel,ext;
langs="";
ext=".htm";
langs=getlangs(lang);
main=parent.frames["mainFrame"].location.href;
main = main.toUpperCase();
pospt=main.indexOf(".HTM");
if (pospt>0) { ext=".HTM"; }
pospt=main.indexOf(".ASP");
if (pospt>0) { ext=".ASP"; }
pospt=main.indexOf(ext);
posptl=main.indexOf("_PT");
if ((posptl > 0) && (posptl < pospt)) { pospt=posptl; }
posptl=main.indexOf("_EN");
if ((posptl > 0) && (posptl < pospt)) { pospt=posptl; }
posptl=main.indexOf("_FR");
if ((posptl > 0) && (posptl < pospt)) { pospt=posptl; }
main = main.substring(0,pospt);
main = main + langs + ext;
topp = parent.frames["topFrame"].location.href;
topsel="";
posq=topp.indexOf("Topp");
if (posq>0) { topsel=topp.substring(posq,999); }
posq=topp.indexOf("?");
if (posq>0) { topp=topp.substring(0,posq); }
topp=topp+"?LANG="+lang;
if (topsel!="") { topp=topp+"&"+topsel; }
parent.frames["topFrame"].location.href = topp;
parent.frames["mainFrame"].location.href = main;
return(1);
}

function updateupdstat(clinr,updnr,filen) {
var main,posq;
main=parent.frames["mainFrame"].location.href;
posq=main.indexOf("?");
if (posq>0) { main=main.substring(0,posq); }
main=main+"?CLINR="+clinr+"&UPDNR="+updnr+'&FILEN='+filen+"&ACTION=DOWNLUPD";
//parent.frames["mainFrame"].location.href=main;
return(main);
}

function index(langi) {
var lang;
lang=getlangs(langi);
return("index"+lang+".htm"+parent.location.search);
//parent.frames["leftFrame"].location.href = "f_left_index.asp";
//parent.frames["topFrame"].location.href = "f_top_index.asp";
//parent.frames["mainFrame"].location.href = "f_main_index"+lang+".htm";
}