function rndSubSet(M, N) { 
				var aSet=[], bSet=[], j;
				if (M>N) 
					M=N;
				while (M>0) {
					j = Math.floor(Math.random()*N + 1);
					if (!aSet[j]) bSet[--M] = aSet[j] = j 
				}
				return bSet
			}

			var mfr = new Array();
		
		
		
					mfr[mfr.length] = "Magn";
				
					mfr[mfr.length] = "Hsuh";
				
					mfr[mfr.length] = "STAN";
				
					mfr[mfr.length] = "Axio";
				
					mfr[mfr.length] = "Orbo";
				
					mfr[mfr.length] = "AVn";
				
					mfr[mfr.length] = "Flum";
				
					mfr[mfr.length] = "WILD";
				
					mfr[mfr.length] = "dmcs";
				
					mfr[mfr.length] = "Crum";
				

		

			var rnd = new Array(4);
			rnd = rndSubSet(4, mfr.length);
			if (rnd.length < 4)
				for (i=rnd.length;i<4;i++)
					rnd[i] = Math.floor(Math.random()*mfr.length + 1);
			

			var siteprefix ="AUDIO";
			
			
			//Cache-busting and pageid value
			var aamRnd = Math.round(Math.random() * 10000000);
			
			//Adserver URL

			//Ad tag targeting
			allAdTags  = "/AAMALL/acc_random=" + aamRnd + "/pageid=" + aamRnd;
			
			varhd1 = "/AAMBHD1/SITE=" + siteprefix + "/AREA=HOME/AAMSZ=HD/CATID=999/MFR=" + mfr[rnd[0]-1];
			varhd2 = "/AAMBHD2/SITE=" + siteprefix + "/AREA=HOME/AAMSZ=HD/CATID=999/MFR=" + mfr[rnd[1]-1];
			varhd3 = "/AAMBHD3/SITE=" + siteprefix + "/AREA=HOME/AAMSZ=HD/CATID=999/MFR=" + mfr[rnd[2]-1];
			varhd4 = "/AAMBHD4/SITE=" + siteprefix + "/AREA=HOME/AAMSZ=HD/CATID=999/MFR=" + mfr[rnd[3]-1];
			
			//bserver ad call - insert the adx variables
			document.write('<SCR' + 'IPT SRC=http://creview.adbureau.net/bservers"' + allAdTags + varhd1 + varhd2 + varhd3 + varhd4 + '" type="text/Javascript">');
			document.write('</SCR' + 'IPT>');