var lastpar="N";
	var ref;
	var selphrase="Select sentences ...";
	var database="ticktack";
	var remotescript="/";
	var serverURL = "/msrv4.asp";

	function selph(a)
	{
		selphrase=a;
	}

	function RS1()
	{
		RSEnableRemoteScripting(remotescript);

	}


	var paraBase="A";
	var mediaBase="A";



	var aspObject;


	function TTBegin()
	{
		alert( "Got here");
	}

	function TTStart()
	{
		TTStatus('Starting...');
		init_lang();
		init_lang2();
		document.bgColor="#ccffff";
		LoadSections( sorcLan );
		LoadLng( paraSet );
		TTStatus('Ready');
		TTResize();
	}

	function unico( msx )
	{
		var ucx,dx,lx,vx=0,sc;

		sc=";".charCodeAt(0);

		ucx="";


		if( msx.length==0)
		{
			return msx;
		}



		if( "&".charCodeAt(0)!=msx.charCodeAt( 0 ))
		{
			return msx;
		}


		for( xx=1;xx<=msx.length;xx++)
		{
			dx=msx.charCodeAt( xx-1 );
			
			if( dx==sc )
			{
				ucx=ucx+String.fromCharCode( vx );
				vx=0;
			}
			else
			{

				if( dx>=48 && dx<=(48+9) )
				{

					lx=dx-48;
					vx=vx*10+lx;
				}
			}
		}
		
		return ucx;
	}

	function TTResize()
	{
		document.ttmain.text1.cols=document.body.clientWidth/9.5;


		if( document.body.clientHeight/14-15>0)
		{		
			document.ttmain.text1.rows=document.body.clientHeight/14-15;
		}
	}


	function TTRTest()
	{
		var co = RSExecute(serverURL,"TTRTest",database);
		return co.return_value;
	}

	function TTDebug( p1 )
	{
		alert( p1 );
	}


	function TTPrint()
	{
		TTDebug(TTRTest());
	}

//End test functions

	function TTStatus( a )
	{
		window.status=a;
	}

	function add_select( s , n, t, v )
	{ 
		var objOption=new Option( t);
		s.options[n]=objOption;
		s.options[n].value=v;
	}

	function TTSetSorc( s )
	{
		sorcLan=s;
		paraBase="A";
		LoadSections( sorcLan );
		setsrcfont( s );
	}

	function TTSetSect( s )
	{
		paraBase=s;
		LoadPhrase( sorcLan , paraBase );
	}

	function TTSetDst( s )
	{
		dstLan=s;
		setdestfont( s );
	}

	function setDSN(s)
	{
		database=s;
	}

	function TTRSSections(pa,l,p,ps)
	{
		var co = RSExecute(serverURL,"TTLoadSections",pa,l,p+"%",ps,database);
		return co;
	}

	function TTRSMenus(pa,l,p,ps)
	{
		var co = RSExecute(serverURL,"TTLoadMenus",pa,l,p+"%",ps,database);
		return co;
	}

	function TTRSAllMenus(pa,l,p,ps)
	{
		var co = RSExecute(serverURL,"TTAllMenus",pa,l,p+"%",ps,database);
		return co;
	}


	function TTRSLng(l,s)
	{
		var co = RSExecute(serverURL,"TTLoadLng",l,s+"%",database);
		return co;
	}

	function LoadLng( pb  )
	{

		if( loadoff==0 )
		{
			{
				var co = TTRSLng( sorcLan , paraSet);
				var arr=co.return_value.split(':::');
				var v=0;	
				var objSelect=document.forms['ttmain'].elements['src'];
				cleararray(objSelect);
				for(x=1;x<arr.length;x++)
				{
					var arr1=arr[x].split('+++');
					var rr=arr1[1].split(' ');
					var objOption=new Option( arr1[1] );
					objSelect.options[v]=objOption;
					objSelect.options[v].value=rr[0];
					v=v+1;	
				}
			}

			{
				var co = TTRSLng( dstLan , paraSet);
				var arr=co.return_value.split(':::');
				var v=0;	
				var objSelect=document.forms['ttmain'].elements['dst'];
				cleararray(objSelect);
				for(x=1;x<arr.length;x++)
				{
					var arr1=arr[x].split('+++');
					var rr=arr1[1].split(' ');
					var objOption=new Option( arr1[1] );
					objSelect.options[v]=objOption;
					objSelect.options[v].value=rr[0];
					v=v+1;	
				}
			}
		}
	}

	function LoadSections( sl )
	{
		LoadParas( sl , "Z" );
		LoadPhrase( sl , paraBase );

	}

	function LoadIndex( sl )
	{
		//LoadMediaIndex( sl , "Z" );
		//LoadMedia( sl , "A" );
	}
	function TTSetMedia( s )
	{
		mediaBase=s;
		//LoadMedia( sorcLan , s );
	}
	
	function LoadMenus( sl ,mn,pb  )
	{
		var co = TTRSMenus( "media" ,sl , pb ,paraSet);


		var arr=co.return_value.split(':::');
		
		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			add_select( mn , arr1[1] , arr1[2] ,arr1[3] );
		}

	}
	function LoadParas( sl ,pb  )
	{
		var co = TTRSSections( "paras" ,sl , pb ,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;	
		var objSelect=document.forms['ttmain'].elements['sect'];
		cleararray(objSelect);


		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			var rr=arr1[1].split(' ');
			var objOption=new Option( arr1[1] );
			objSelect.options[v]=objOption;
			objSelect.options[v].value=rr[0];
			v=v+1;	
		}
	}

	function LoadPhrase( sl , pb )
	{
		var co = TTRSSections("paras",sl,pb,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;
		var objSelect=document.forms['ttmain'].elements['pars'];
		lastpar="N";
		cleararray(objSelect);

		objSelect.options[v]=new Option( selphrase );
		objSelect.options[v].value="";
		v=v+1;

		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			var z=arr1[0]+' '+arr1[1];
			var objOption=new Option( z.substr( 0,80) );
			objSelect.options[v]=objOption;
			objSelect.options[v].value=arr1[0];
			v=v+1;	
		}
	}
	


	function comboFont( cmb , a )
	{
		sect.style.fontFamily=a;
	}

	function TTAddText( vd )
	{
		var ret;
		var co = TTRSSections("paras",dstLan,paraBase,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;
		lastpar=vd;
		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			if( vd==arr1[0]) ret=arr1[1];
			v=v+1;	
		}

		ret=ret+'\n';
		if(ret=="undefined\n" )
		{
			ret="";
		}
		

		ret=unico( ret );
	

		document.ttmain.text1.value=document.ttmain.text1.value+ret;
	}

	function LoadMediaIndex( sl ,pb  )
	{
		var co = TTRSSections( "media" ,sl , pb ,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;	
		var objSelect=document.forms['ttmain'].elements['mediaindex'];
		cleararray(objSelect);
		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			var rr=arr1[1].split(' ');
			var objOption=new Option( arr1[1] );
			objSelect.options[v]=objOption;
			objSelect.options[v].value=rr[0];
			v=v+1;	
		}
	}

	function LoadMedia( sl , pb )
	{
		var co = TTRSSections("media",sl,pb,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;
		var objSelect=document.forms['ttmain'].elements['media'];
		cleararray(objSelect);
		v=0;
		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			var objOption=new Option( arr1[0]+' '+arr1[1] );
			objSelect.options[v]=objOption;
			objSelect.options[v].value=arr1[0];
			v=v+1;	
		}
	}

	function cleararray( obj )
	{
		for( x=1;x< obj.options.length;x++)
			obj.options[x-1]=null;
	}

	function TTPlayMedia( vd )
	{
		var ret;
		var co = TTRSSections("media",sorcLan,mediaBase,paraSet);
		var arr=co.return_value.split(':::');
		var v=0;
		for(x=1;x<arr.length;x++)
		{
			var arr1=arr[x].split('+++');
			if( vd==arr1[0]) ret=arr1[2];
			v=v+1;	
		}
		ret="..\\media\\"+paraSet+"\\"+sorcLan+"\\"+ret;
		window.location.href=ret;
	}

	function TTPlaySrc( vd )
	{

		var ret;

		ret=vd;
		if( ret!='N')
		{
			ret="..\\media\\"+paraSet+"\\"+sorcLan+"\\"+ret+".wav";
			window.location.href=ret;
		}
	}

	function TTPlayDst( vd )
	{
		var ret;

		ret=vd;
		if( ret!='N')
		{
			ret="..\\media\\"+paraSet+"\\"+dstLan+"\\"+ret+".wav";
			window.location.href=ret;
		}
	}

	function TTPlayList( a,b,c , mnuv )
	{
		var ret;
		if( c!='N')
		{

			ret="..\\media\\"+c;
			var wnd=window.open ( ret );
			wnd.moveTo( screen.width/3,0 );
			wnd.resizeTo( 2*(screen.width/3)*.92,screen.height*.9);

		}
		if( mnuv!=0 )
		{
			mnuv.options[0].selected=true;
		}
	}

	function TTPlayList1( a,b,c, mnuv )
	{
		var ret;
		if( c!='N')
		{
			ret="..\\media\\"+c;
			var wnd=window.open ( ret );
			wnd.moveTo( screen.width/3,0 );
			wnd.resizeTo( 2*(screen.width/3)*.92,screen.height*.9);

		}
	}

	function printsave()
	{
		var ret=window.open();

		ret.document.open()
		ret.document.write("<TEXTAREA ROWS=100 COLS=80 NAME=text1 WRAP=hard></TEXTAREA>");
		ret.text1.value=document.ttmain.text1.value;
		ret.status="select file save or file print";


	}


	function init_lang2()
	{
		setsrcfont( sorcLan );
		setdestfont( dstLan );
	}

//0 Arial 12 for Eng Fre Ger Spa Ita
//1 Arial PL for Slovene.
//2 HTimes 12 for Hungarian

	function setsrcfont( s )
	{
		var num=0;

		
		
		if((s.charAt(0)=='S') && (s.charAt(1)=='L') && (s.charAt(2)=='N'))
		{
			num=1;
		}

		
		if((s.charAt(0)=='M') && (s.charAt(1)=='A') && (s.charAt(2)=='G'))
		{
			num=2;
		}



		if( num==0 )	
		{
			document.ttmain.sect.style.fontFamily="Arial";
			document.ttmain.sect.style.fontSize="12pt";
			//document.ttmain.sect.style.color="green";
			document.ttmain.pars.style.fontFamily="Arial";
			document.ttmain.pars.style.fontSize="12pt";
			//document.ttmain.pars.style.color="green";
		}

		if( num==1 )	
		{
			document.ttmain.sect.style.fontFamily="Arial PL";
			document.ttmain.sect.style.fontSize="10pt";
			//document.ttmain.sect.style.color="blue";
			document.ttmain.pars.style.fontFamily="Arial PL";
			document.ttmain.pars.style.fontSize="10pt";
			//document.ttmain.pars.style.color="blue";
		}

		if( num==2 )	
		{
			//document.ttmain.sect.style.fontFamily="Courier New";
			document.ttmain.sect.style.fontFamily="HTimes";
			document.ttmain.sect.style.fontSize="12pt";
			//document.ttmain.sect.style.color="red";
			//document.ttmain.pars.style.fontFamily="Courier New";
			document.ttmain.pars.style.fontFamily="HTimes";
			document.ttmain.pars.style.fontSize="12pt";
			//document.ttmain.pars.style.color="red";
		}
	}

	function setdestfont( s )
	{
		var num=0;

		
		
		if((s.charAt(0)=='S') && (s.charAt(1)=='L') && (s.charAt(2)=='N'))
		{
			num=1;
		}

		
		if((s.charAt(0)=='M') && (s.charAt(1)=='A') && (s.charAt(2)=='G'))
		{
			num=2;
		}


		if( num==0 )	
		{
			document.ttmain.text1.style.fontFamily="Arial";
			document.ttmain.text1.style.fontSize="12pt";
			//document.ttmain.text1.style.color="green";
		}

		if( num==1 )	
		{
			document.ttmain.text1.style.fontFamily="Arial PL";
			document.ttmain.text1.style.fontSize="10pt";
			//document.ttmain.text1.style.color="blue";
		}

		if( num==2 )	
		{
			
			//MAG
			document.ttmain.text1.style.fontFamily="HTimes";
			//document.ttmain.text1.style.fontFamily="Courier New";
			document.ttmain.text1.style.fontSize="12pt";
			//document.ttmain.text1.style.color="red";
		}
	}