function SaveCookie()
{
  var i,i20;
  var v = new Array(43);
    for (var i = 0; i < v.length; ++i) v[i] = new Array(4);
  var text = "";
  var ablauf = new Date();

  for (i = 1; i <= 20; ++i) {
    i20 = i+20;
    for (j = 1; j <= 3; ++j) v[i][j]   = acd[cpc[i]][j]*200.0/Math.PI;
    for (j = 1; j <= 3; ++j) v[i20][j] = acd[cpc[i20]][j]*200.0/Math.PI;
  }
    for (j = 1; j <= 3; ++j) v[41][j] = acv[1][j]*10.0;  /* 41 Verschiebung Frau */
    for (j = 1; j <= 3; ++j) v[42][j] = acv[2][j]*10.0;  /* 42 Verschiebung Mann */

  for (i = 1; i <= 20; ++i) {
    i20 = i+20;
    for (j = 1; j <= 3; ++j) text=text+String(Math.round(v[i][4-j])) + ", ";
    for (j = 1; j <= 3; ++j) text=text+String(Math.round(v[i20][4-j])) + ", ";
  }
    for (j = 1; j <= 3; ++j) text=text+String(Math.round(v[41][j])) + ", ";
    for (j = 1; j <= 3; ++j) text=text+String(Math.round(v[42][j])) + ", ";

  ablauf = new Date(ablauf.getTime() + 90 * 24 * 60 * 60 * 1000);   // 90 Tage
  document.cookie = text + '; expires='+ablauf.toGMTString()+';';
}


function ReadPos(pos)
{
  var i,i20,j,pk;
  var v = new Array(43);
    for (var i = 0; i < v.length; ++i) v[i] = new Array(4);
  var text = pos;
  var s;

  for (i = 1; i <= 20; ++i) {
    i20 = i+20;
    for (j = 1; j <= 3; ++j) {
      pk=text.indexOf(",");
      s=text.substr(0,pk);
      v[i][j]=s;
      text=text.substr(pk+1,text.length-pk);
    }
    for (j = 1; j <= 3; ++j) {
      pk=text.indexOf(",");
      s=text.substr(0,pk);
      v[i20][j]=s;
      text=text.substr(pk+1,text.length-pk);
    }
  }
  for (j = 1; j <= 3; ++j) {
    pk=text.indexOf(",");
    s=text.substr(0,pk);
    v[41][j]=s;
    text=text.substr(pk+1,text.length-pk);
  }
  for (j = 1; j <= 3; ++j) {
    pk=text.indexOf(",");
    s=text.substr(0,pk);
    v[42][j]=s;
    text=text.substr(pk+1,text.length-pk);
  }
  for (i = 1; i <= 20; ++i) {
    i20 = i+20;
    for (j = 1; j <= 3; ++j) acd[cpc[i]][j] = v[i][4-j]*Math.PI/200.0;
    for (j = 1; j <= 3; ++j) acd[cpc[i20]][j] = v[i20][4-j]*Math.PI/200.0;
  }
  for (j = 1; j <= 3; ++j) acv[1][j] = v[41][j]/10.0;  /* 41 Verschiebung Frau */
  for (j = 1; j <= 3; ++j) acv[2][j] = v[42][j]/10.0;  /* 42 Verschiebung Mann */
  geometrie();
  delGraphs();
  neuzeich();
}


function ReadCookie()
{
  if (document.cookie) {
    ReadPos(document.cookie);
  } else {
    alert("Sorry, no Position available ...");
  }
}