//
//	Program:	zv1tool.js
//	Author:		Viktor Zerkin, V.Zerkin@iaea.org
//	Last modified:	15-May-2008
//	Created:	01-Jan-2008
//	Property of:	International Atomic Energy Agency
//	Organization:	Nuclear Data Section
//			International Atomic Energy Agency (IAEA)
//			Wagramer Strasse 5, P.O.Box 100, A-1400
//			Vienna, Austria
//	Project:	Multi-Platform Nuclear Reaction Databases
//	Usage:		with permission and proper acknowlegement to the IAEA-NDS
//			and author
//	Distribution:	restricted while the project remains unfinished
//	Modifications:	can be done with permission of IAEA-NDS and author
//	Note:		non-commercial software and comes with
//			NO WARRANTY
//

var nds_dirToolLocation='';

var nds_mytoolHome=nds_defToolLocation()+'../';
    //alert("["+nds_mytoolHome+"]");
//---2008.04.24    nds_ndsLoadMyTool(nds_mytoolHome);
//---2008.04.24    nds_setToolLocation(nds_mytoolHome);

function nds_defToolLocation()
{
    var i,base='./';
    var myname='zv1tool.js';
    var scripts=document.getElementsByTagName('script');
    for (i=0; i<scripts.length; i++) {
	if (scripts[i].src.match(myname)) {
	    base=scripts[i].src.replace(myname,'');
	    break;
	}
    }
    return base;
//    document.write("<" + "script src=\"" + base + path + "\"></" + "script>"); 
} 

function nds_ndsLoadMyTool(dir)
{
    document.write('<script src="'+dir+'javascript/pg1_mirr.js"	type="text/javascript"><\/script>');
    document.write('<script src="'+dir+'javascript/zv1comm.js"	type="text/javascript"><\/script>');
    document.write('<script src="'+dir+'javascript/zv1cook.js"	type="text/javascript"><\/script>');
    document.write('<script src="'+dir+'javascript/pg1_obj.js"	type="text/javascript"><\/script>');
    document.write('<script src="'+dir+'javascript/pg1_prog.js"	type="text/javascript"><\/script>');
    document.write('<script src="'+dir+'javascript/zv1top.js"	type="text/javascript"><\/script>');
//??    document.write('<link rel="stylesheet" href="'+dir+'css/pg1_css.css" type="text/css">');
    nds_setToolLocation(dir);
}

function nds_setToolLocation(dir)
{
    nds_dirToolLocation=dir;
}

function nds_getToolLocation()
{
    return nds_dirToolLocation;
}