function aleatoire() {
      var args=aleatoire.arguments;
      var tmp=0;
      
      if (args.length<1) {
         return tmp;
      }

      N=args[0];
      tmp = Math.floor((N)*Math.random());
      if (args.length>1) {
         M=args[1];
         if (tmp==M) {
            return aleatoire(N,M);
         }
      } else {
        return tmp;
      }
   }
//Presentational Slideshow Script- By Dynamic Drive
//For full source code and more DHTML scripts, visit http://www.dynamicdrive.com
//This credit MUST stay intact for legal use

var slideshow_width='127px'; //SET SLIDESHOW WIDTH (set to largest image's width if multiple dimensions exist)
var slideshow_height='127px'; //SET SLIDESHOW HEIGHT (set to largest image's height if multiple dimensions exist)
var pause=8000; //SET PAUSE BETWEEN SLIDE (2000=2 seconds)
var slidebgcolor="gray";

var dropimages=new Array();
//SET IMAGE PATHS. Extend or contract array as needed
dropimages[0]="http://www.iecq.org/images/ad-banners/fin-WASTE1_125x125_SSC.gif";
dropimages[1]="http://www.iecq.org/images/ad-banners/lcie.gif";
dropimages[2]="http://www.iecq.org/images/ad-banners/KTL.gif";
dropimages[3]="http://www.iecq.org/images/ad-banners/ATScolor_logo2.JPG";
dropimages[4]="http://www.iecq.org/images/ad-banners/dke.gif";
dropimages[5]="http://www.iecq.org/images/ad-banners/DS_logo.gif";
dropimages[6]="http://www.iecq.org/images/ad-banners/OVE.gif";
dropimages[7]="http://www.iecq.org/images/ad-banners/cteccb-2006.gif";
dropimages[8]="http://www.iecq.org/images/ad-banners/BQPM125.gif";


var droplinks=new Array();
//SET IMAGE URLs. Use "" if you wish particular image to NOT be linked:
droplinks[0]="http://www.sgs.com/iecq";
droplinks[1]="http://www.lcie.com/homePage_frameset.html";
droplinks[2]="http://www.ktl.re.kr/eng/index.asp";
droplinks[3]="http://ats.go.kr/english/index.asp";
droplinks[4]="http://www.dke.de/dke_en/";
droplinks[5]="http://www.ds.dk";
droplinks[6]="http://www.ove.at/defaultE.htm";
droplinks[7]="http://www.cteccb.org.tw/english.htm";
droplinks[8]="http://www.bqpm.com/training/index.shtml";
	

////NO need to edit beyond here/////////////

var preloadedimages=new Array();
for (p=0;p<dropimages.length;p++){
preloadedimages[p]=new Image();
preloadedimages[p].src=dropimages[p];
}

var ie4=document.all;
var dom=document.getElementById;

if (ie4||dom)
document.write('<div style="position:relative;width:'+slideshow_width+';height:'+slideshow_height+';overflow:hidden"><div id="canvas0" style="position:absolute;width:'+slideshow_width+';height:'+slideshow_height+';background-color:'+slidebgcolor+';left:-'+slideshow_width+'"></div><div id="canvas1" style="position:absolute;width:'+slideshow_width+';height:'+slideshow_height+';background-color:'+slidebgcolor+';left:-'+slideshow_width+'"></div></div>')
else
document.write('<a href="javascript:rotatelink()"><img name="defaultslide" src="'+dropimages[0]+'" border=0></a>')

var curpos=parseInt(slideshow_width)*(-1)
var degree=10
var curcanvas="canvas0"
//var curimageindex=linkindex=0
var curimageindex=linkindex=aleatoire(droplinks.length+1);
var nextimageindex=1;


function movepic(){
if (curpos<0){
curpos=Math.min(curpos+degree,0);
tempobj.style.left=curpos+"px";
}
else{
clearInterval(dropslide);
nextcanvas=(curcanvas=="canvas0")? "canvas0" : "canvas1";
tempobj=ie4? eval("document.all."+nextcanvas) : document.getElementById(nextcanvas);
var slideimage='<img src="'+dropimages[curimageindex]+'" border=0>';
tempobj.innerHTML=(droplinks[curimageindex]!="")? '<a href="'+droplinks[curimageindex]+'">'+slideimage+'</a>' : slideimage;
nextimageindex=(nextimageindex<dropimages.length-1)? nextimageindex+1 : 0;
setTimeout("rotateimage()",pause);
}
}

function rotateimage(){
if (ie4||dom){
resetit(curcanvas);
var crossobj=tempobj=ie4? eval("document.all."+curcanvas) : document.getElementById(curcanvas);
crossobj.style.zIndex++;
var temp='setInterval("movepic()",50)';
dropslide=eval(temp);
curcanvas=(curcanvas=="canvas0")? "canvas1" : "canvas0";
}
else
document.images.defaultslide.src=dropimages[curimageindex];
linkindex=curimageindex;
curimageindex=(curimageindex<dropimages.length-1)? curimageindex+1 : 0;
}
function rotatelink(){
if (droplinks[linkindex]!="")
window.location=droplinks[linkindex];
}

function resetit(what){
curpos=parseInt(slideshow_width)*(-1);
var crossobj=ie4? eval("document.all."+what) : document.getElementById(what);
crossobj.style.left=curpos+"px";
}

function startit(){
var crossobj=ie4? eval("document.all."+curcanvas) : document.getElementById(curcanvas);
crossobj.innerHTML='<a href="'+droplinks[curimageindex]+'"><img src="'+dropimages[curimageindex]+'" border=0></a>';
rotateimage();
}
var ie4=document.all;
var dom=document.getElementById;
if (ie4||dom)
window.onload=startit;
else
setInterval("rotateimage()",pause);
