var r=0;d=0;n1=0;n2=0;
var a="#*$9276$362663";
a=a+"#*$11484$362663";
a=a+"#*$8450$362663";
a=a+"#*$1720$362663";
var alt=0;
var ft=new Array(1);
var gt=new Array(1);
var tid=new Date();

var t="&Ouml;verraska med guld&ouml;rh&auml;ngen!*422046";
t=t+"#Biljetter till evenemang*114022";
t=t+"#&Aring;hlens finns p&aring; n&auml;tet!*&1386&6027";

function dw(ss){
  document.write(ss);
}

function text(k){
  if(k<1){
    var bt=t.split("#");
    d=bt.length;
    for(var i=0;i<d;i++){
      var c=bt[i].split("*");
      ft[i]=c[0];
      gt[i]=c[1];
    }
  rand(d,n1);
  }else{
    if(r>d-3){
      r=r-2;
    }else{
      r=r+1;
    }
  } 
  link(gt);
  dw("<P ALIGN='Center'>");
  dw("<FONT SIZE=-2 FACE='ariel, helvetica, sans-serif' COLOR='Red'>"+ft[r]+"</FONT>");
  dw("</A>");
}
function dw(ss){
  document.write(ss)
}
  
function banner(m,n2){
  var b=a.split("#");
  var d=b.length;
  var f=new Array(d);
  var g=new Array(d);
  for(var i=0;i<d;i++){
    var c=b[i].split("*");
    f[i]=c[0];
    g[i]=c[1];
  }
  rand(d,n2);
  link(g);
  if(alt==1){
    var s="../";
    var ss="";
    for(var i=0;i<m;i++){ss=ss+s}
    ss=ss+"traded/"+"g"+f[r]+".gif";
    dw("<BR><P ALIGN='Center'>");
    ss="<IMG border=0 src='"+ss+"'>";
    dw(ss);
    dw("</A>");
  }
}


function rand(d,n){
  r=n-1+tid.getDate()+tid.getHours();
  while(r>d-1){r=r-d+1};
  //var x=Math.random();
  //r=x*d-0.5;
  //r=Math.round(r);
}

function link(g){
  str=g[r];
  var chr=str.charAt(0);
  if(chr=="&"){
    dw("<a href='http://tracker.tradedoubler.com/pan/TrackerServlet?p=");
    var pg=g[r].split("&");
    dw(pg[1]+"&a="+pg[2]+"&g=0' target=new>");
    alt=2;
  }else{
    if(chr=="$"){
      dw("<br><P align='Center'><script language='JavaScript' src='http://impse.tradedoubler.com/imp/");
      var pg=g[r].split("$");
      dw(pg[1]+"/"+pg[2]+"'></script>");
      alt=3;
    }else{
      dw("<A href='http://tracker.tradedoubler.com/tracker.asp?code=");
      dw(g[r]+"' target=new>");
      alt=1;
    }
  }
}

function support(n){
  n1=n;
  dw("<TABLE BORDER='0' CELLSPACING='0' CELLPADDING='0' WIDTH='100%'><TR><TD>");  
  text(0);
  dw("</TD><TD>");
  text(1);
  dw("</TD><TD>");
  text(2);
  dw("</TD></TR></TABLE>");
}

function flyg(n){
  n1=n;
  if(n1==2){
    dw("<FONT SIZE=-2 FACE='verdana,arial,helvetica'>");	
  }else{
    dw("<FONT SIZE=-1 FACE='verdana,arial,helvetica'>");	
  }
  dw("Billigt regulj&auml;rflyg till Spanien best&auml;ller Du hos ");		
  dw("<A HREF='http://tracker.tradedoubler.com/tracker.asp?code=232495' target='new'>MrJet</A>.");		  	    
}

function pass(text){
  window.open(text,'new','location=no,menubar=no,directories=no,scrollbars=no,resizeble=no,status=no,width=350,height=450');
}

function lasa(){
  dw("<B>Spanien</B><I> &#150; En komplett handbok om ditt andra hemland</I> v&auml;nder ");
  dw("sig till dem som funderar p&aring; att bos&auml;tta sig i landet f&ouml;r ");
  dw("att studera, arbeta eller efter pensioneringen njuta av det spanska klimatet ");
  dw("och den spanska kulturen.<br>");
  ss="http://www.siestaland.com/books/site.htm#2";
  ss='<A HREF='+'"'+ss+'"'+'>';
  dw(ss);
  dw("Mera information.</A><BR>");
}
function lasa1(){
  dw("<BR><A HREF='http://tracker.tradedoubler.com/tracker.asp?code=10541&amp;URL=");
  dw("http://www.adlibris.se/shop/product.asp?isbn=9170552053&amp;mscssid=AJTXBLUCRUS12PM300JP4772FM8AFF0C' target='new'>Bos&auml;ttning ");	      
  dw("utomlands</A> <I>Handbok &amp; Checklista. </I>&nbsp;<br>");
}

function marknad(){
dw("P&aring; SiestaLands marknad finns drygt 50-talet e-handelsplatser, d&auml;r du kan k&oumlpa t.ex aktier, ");
dw("bilar, b&oumlcker, CD-skivor, dataspel, datorer, elektronik, kl&auml;der, resor, flygbiljetter, sport-utrustning. ");
dw("Och vad kan du inte hitta p&aring; auktionerna? Pricerunner hj&auml;lper dig med <B>pris- och leveransj&auml;mf&oumlrelser</B>.");
dw("<BR><BR>H&auml;r kan du <B>s&oumlka jobb</B>, f&aring; information om IT i brevl&aring;dan utan kostnad. ");
dw("Eller varf&oumlr inte 'koppla upp spargrisen p&aring; Internet' med hj&auml;lp av Kundkraft.<BR><BR> ");
dw("Du kan ocks&aring; <B>boka biljetter</B> till olika evenemang. ");
dw("Allt p&aring; <A HREF='www.siestaland.com/chans/ads/index.html'>SiestaLands marknad.</A>");
}
