function TR3S_writeslide(v_myFunction, v_contentid, v_speed){

	// slideUrlEx ; slidePreloadEx; slideCounterEx
	var slE1 = eval('slideUrlEx'+v_contentid);
	var slE2 = eval('slidePreloadEx'+v_contentid);
	var slE3 = eval('slideCounterEx'+v_contentid);

	var sl_Obj = document.getElementById('myPDIV'+v_contentid);
    // var p_hmtl;
	p_html = '';
    if (isNaN(v_speed)){  v_speed = 5;}
    v_speed = v_speed * 1000;
	switch(v_myFunction){
	case 'direct':
		p_hmtl = '<IMG id="myFunctionIMG'+v_contentid+'" SRC="'+slE1[0]+'">';
		sl_Obj.innerHTML = p_hmtl;
		loadPreload( v_contentid );
		setTimeout("doSlideDirect("+v_contentid+", "+v_speed+")",v_speed);
		break;
	case 'fade' :
		p_hmtl = '<IMG id="myFunctionIMG'+v_contentid+'" SRC="'+slE1[0]+'">';
	    sl_Obj.innerHTML = p_hmtl;
		loadPreload( v_contentid );
		setTimeout("doSlideFade("+v_contentid+", "+v_speed+")",v_speed);
		break;
	case 'scroll' :
        // bij links/rechts: (tabel met colomen) | op/neer (tabel met rijen)
		p_hmtl = '<TABLE cellspacing="0" cellpadding="0"><TR>';
		for(j=0;j<10;j++){// 10x dezelfde, voor soepele overgang laatste plaatje/eerste plaatje
          for (i=0; i<slE1.length;i++){
			p_hmtl += '<TD VALIGN=TOP><IMG ALT="" SRC="'+slE1[i]+'"></TD>';
          }
		}
		p_hmtl += '</TR></TABLE>';
	    sl_Obj.innerHTML = p_hmtl;
		v_speed = v_speed /100;

		setTimeout("doSlideScroll("+v_contentid+", "+v_speed+", "+'\'left\''+")",v_speed); //left | right | up | down

		break;
	}

}

function loadPreload(contentid){

	var i;
	var slEpl1 = eval('slideUrlEx'+contentid);
	var slEpl2 = eval('slidePreloadEx'+contentid);
	var slEpl3 = eval('slideCounterEx'+contentid);

	for (i = 0; i < slEpl1.length; i++){
	   slEpl2[i] = new Image();
	   slEpl2[i].src = slEpl1[i];
    }
}

function doSlideDirect(contentid, speed){

	var slE1 = eval('slideUrlEx'+contentid);
	var slE2 = eval('slidePreloadEx'+contentid);
	var slE3 = eval('slideCounterEx'+contentid);
	var counter;
    counter = slE3[0];

	if (isNaN(counter)){
		counter = 0;
	}
	counter++;
	if (counter > (slE2.length-1)){counter=0;}
	transObj = document.getElementById('myFunctionIMG'+contentid);
	transObj.src = slE2[ counter ].src;

    slE3[0] = counter;

	setTimeout("doSlideDirect("+contentid+", "+speed+")",speed);
}


function doSlideFade(contentid, speed){

	var slE1 = eval('slideUrlEx'+contentid);
	var slE2 = eval('slidePreloadEx'+contentid);
	var slE3 = eval('slideCounterEx'+contentid);
	var counter;
    counter = slE3[0];

	if (isNaN(counter)){
		counter = 0;
	}
	counter++;
	if (counter > (slE2.length-1)){counter=0;}
	transObj = document.getElementById('myFunctionIMG'+contentid);
	transObj.style.filter="blendTrans(duration=1)";

	if(transObj.filters!=null){
	  transObj.filters.blendTrans.Apply();
	  transObj.src = slE2[ counter ].src;
	  transObj.filters.blendTrans.Play();
	}else{
	  transObj.src = slE2[ counter ].src;
	}
    slE3[0] = counter;

	setTimeout("doSlideFade("+contentid+", "+speed+")",speed);
}

function doSlideScroll(v_contentid, speed, direction){
	var step = 1;
	var fotoSeries = 10;
    var totalScrollHeight = 0;
    var totalScrollWidth = 0;
	var slE3 = eval('slideCounterEx'+v_contentid);
	var sl_Obj = document.getElementById('myPDIV'+v_contentid);
    if(sl_Obj!=null){
		totalScrollHeight = sl_Obj.offsetHeight;
		totalScrollWidth = sl_Obj.offsetWidth;
	}
    topPos = slE3[0];
    leftPos = slE3[1];
	if (isNaN(topPos)){
		topPos = 0;
	}
	if (isNaN(leftPos)){
		leftPos = 0;
	}
	switch(direction){
	case 'left': leftPos-=step; break;
	case 'rigth': leftPos+=step; break;
	case 'up': topPos-=step; break;
	case 'down': topPos+=step; break;
    }

	if(topPos<(-(totalScrollHeight/fotoSeries)*5)){
		topPos+= (totalScrollHeight/fotoSeries)*5;
	}else if (topPos>0){
		topPos-= (totalScrollHeight/fotoSeries);
	}

	if(leftPos<(-(totalScrollWidth/fotoSeries)*5)){
		leftPos+= (totalScrollWidth/fotoSeries)*5;
	}else if (leftPos>0){
		leftPos-= (totalScrollWidth/fotoSeries);
	}

	if (sl_Obj!=null){
		sl_Obj.style.top = topPos;
		sl_Obj.style.left = leftPos;
	}
    slE3[0] = topPos;
    slE3[1] = leftPos;


	setTimeout("doSlideScroll("+v_contentid+", "+speed+", '"+direction+"')",speed);
}