///////////////////////////
// Finexprestel javascript
// Alan Machado 2002
///////////////////////////

/////////////////////////////////////////
// DHTML Enhanced methods
// Alan Machado 2000.
/////////////////////////////////////////

var is=new function (){ 
	this.VER=navigator.appVersion
	this.AGENT=navigator.userAgent
	this.DOM=document.getElementById?1:0
	this.IE4=(document.all && !this.DOM)?1:0;
	this.IE5=(this.VER.indexOf("MSIE 5")>-1 && this.DOM)?1:0; 
	this.IE6=(this.VER.indexOf("MSIE 6")>-1 && this.DOM)?1:0;
	this.IE=(this.IE4||this.IE5||this.IE6)
	
	this.MAC=this.AGENT.indexOf("Mac")>-1
	this.NS6=document.getElementById&&!document.all?1:0
	this.NS4=(document.layers && !this.DOM)?1:0;
	return this
}

function getElement(id){

	if (is.DOM)	return document.getElementById(id)
	else
	if (is.IE) 	return eval("document.all."+id)
	else
	if (is.NS)	return eval("document."+id)

}

function getTags(name){
	if (is.DOM)
		return document.getElementsByTagName(name)
	else
	if (is.IE)
		return document.all.tags(name)
	else
	if (is.NS4)
		return eval('document.layers')
}

function shiftTo(id, x, y){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.left = x + 'px'
		obj.style.top = y + 'px'
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.pixelLeft = x
		obj.style.pixelTop = y
		}
	else
	if (is.NS4)	{
		var obj = eval("document."+id)
		obj.moveTo(x,y)
		}

}

function setBGColor(id, color){

	if (is.DOM){
		var obj = document.getElementById(id)
		document.getElementById(id).style.backgroundColor = color
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.backgroundColor = color
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.bgColor = color
		}

}

function show(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.visibility = "visible"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.visibility = "visible"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.visibility = "visible"
		}
}

function hide(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.visibility = "hidden"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id)
		obj.style.visibility = "hidden"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.visibility = "hidden"
		}

}

function getLeft(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return parseInt(obj.style.left)
		}
	else
	if (is.IE) {
		return obj.pixelLeft
		}
	else
	if (is.NS4) {
		return eval("document."+id+".left")
		}
}

function getTop(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return parseInt(obj.style.top)
		}
	else
	if (is.IE) {
		return obj.pixelLeft
		}
	else
	if (is.NS4) {
		return eval("document."+id+".top")
		}
}

function getHeight(id){

	if (is.DOM){
		var obj = document.getElementById(id)
		return obj.offsetHeight
		}
	else
	if (is.IE) {
		return eval("document.all."+id+".offsetHeight")
		}
	else
	if (is.NS4) {
		return eval("document."+id+".document.height")
		}

}

function getWidth(id){
	if (is.DOM){
		var obj = document.getElementById(id)
		return obj.offsetWidth
		}
	else
	if (is.IE) {
		return eval("document.all."+id+".offsetWidth")
		}
	else
	if (is.NS4) {
		return eval("document."+id+".document.width")
		}
}

function setClip(id,ct,cr,cb,cl){
	if (is.DOM){
		var obj = document.getElementById(id)
		obj.style.clip = "rect(" + ct + "px " + cr + "px " + cb +"px " + cl + "px)"
		}
	else
	if (is.IE) {
		var obj = eval("document.all."+id+".style")	
		obj.clip = "rect(" + ct + "px " + cr + "px " + cb +"px " + cl + "px)"
		}
	else
	if (is.NS4) {
		var obj = eval("document."+id)
		obj.clip.top = ct;
		obj.clip.right = cr;
		obj.clip.bottom = cb;
		obj.clip.left = cl;
		}
}

function setFrame(id,URL) {
	if (is.DOM || is.IE){
   		var IFrameDoc = getFrameDoc(id)
   		if (IFrameDoc == false) return false
   		IFrameDoc.location.replace(URL);
   		return false;
		}
	else	
	if (is.NS4){
		var obj = eval(getLayerRef(getTopParent().document,"IF"+id))
		obj.src = frm
		}
	
}

function getFrameUrl(id){

	if (is.DOM || is.IE) {
		return getFrameDoc(id).location.href
		}
	else
	if (is.NS4){
		return eval(getLayerRef(getTopParent().document,"IF"+id)+'.src')
		}
}

////////////////////////////////
// IE Specific
///////////////////////////////
function getFrameDoc(id){

  if (parent.document.frames) 
      	var obj = parent.document.frames["IF"+id];
  else
	var obj = parent.document.getElementById("IF"+id)
  
  if (obj.contentDocument)
    	return obj.contentDocument;  // For NS6
  else 
  if (obj.contentWindow) 
	return obj.contentWindow.document; // For IE5.5 and IE6
  else 
  if (obj.document) 
	return obj.document; // IE5
  
  return false

}

////////////////////////////////
// NS Specific
///////////////////////////////
function getLayerRef(doc,id){
var ref
	for(var i=0;i<doc.layers.length;i++){
		
		if (doc.layers[i].id == id)
			return 'document.'+id
		else
		{
			ret = getLayerRef(doc.layers[i].document,id)
			if (ret != '')
				return 'document.'+doc.layers[i].id+'.'+ret
		}
	}
	return ''
	
}

function getTopParent(){
	var p = parent
	for(;p!=p.parent;p=p.parent);
	return p;
}

/////////////////////////////////
// START GENERAL FUNCTIONS
/////////////////////////////////

function writeAbbreviatedString(completestring, maxlength) {
  if (completestring.length > maxlength)
    document.write(completestring.substring(0, maxlength-2)+"...");
  else 
    document.write(completestring);
}


function setSelect(select, value) {

  for (var i = 0; i < select.options.length; i++) 
    if (select.options[i].value == value) 
      select.selectedIndex = i;
}

function writePrefixValue(sym, number) {
  sym = sym + "";
  if (number == "0") 
    document.write(sym+number);    
  else {
    number = (parseFloat(number) + 0.005) + "";
    var dp = number.indexOf(".");
    if (dp >= 0) {
      if (dp+3 <= number.length) 
        number = number.substring(0,dp+3);
      
      if (number.substring(0,1) != '-') 
         document.write("+"+sym+number);
      else 
         document.write("-"+sym+number.substring(1,number.length)); 
    }
  }

}  

function submitToPopup(form,action) {
  if (action != "") 
    form.action = action;
 
  var targetname = form.target;
  if (! targetname) {    
    targetname = "defpopup";
    form.target="defpopup";
  }
  var targetwin = window.open("",targetname,"width=250,height=150")
  form.submit();
}

function submitToPopupII(form,action) {
  if (action != "") 
    form.action = action;
  
  if (! form.target)    
    form.target="defpopup";

  if (! form.height.value) 
	form.height.value = 300

  if (! form.width.value) 
	form.width.value = 300
 
  var targetwin = window.open("",form.target,"width="+form.width.value+",height="+form.height.value+',screenX=100,screenY=100,left=100,top=100')
  form.submit();
}

function ValidEmail(obj){
  if (obj.value.replace(/([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)/ig,"") != ""){
   obj.focus();
   alert("Invalid email")
   return false
  }
  return true
}

function HTMLColorMovement(v){
  if (typeof v == 'undefined')	
     document.write("<FONT color=blue>-</FONT>")
  else
     document.write("<FONT color="+((v==0)?"green":(v>0)?"blue":"red")+">"+v+"</FONT>")
}

function NewSplice(arr,idx){
	for(var i=idx;i<arr.length-1;i++)
		arr[i]=arr[i+1]
	arr.length-- 
	return arr
}

/////////////////////////////////
// COOKIE FUNCTIONS
/////////////////////////////////

var SITECOOKIE = new siteCookie("siteinfo",365)
var PORTFOLIO = new siteCookie("pf",0)

function siteInfoSave() {

   if(WINCHARTS) 
	SITECOOKIE.W_CHT_M = WINCHARTS.minimised
   if(WINSHARECENTRE) 
	SITECOOKIE.W_SHC_M = WINSHARECENTRE.minimised
   if(WINTOPSHARES) 
	SITECOOKIE.W_TPS_M = WINTOPSHARES.minimised
   if(WINFUNDCENTRE) 
	SITECOOKIE.W_FDC_M = WINFUNDCENTRE.minimised
   if(WINTOPFUNDS) 
	SITECOOKIE.W_TPF_M = WINTOPFUNDS.minimised
   if(WININDICES) 
	SITECOOKIE.W_IND_M = WININDICES.minimised

}


function siteCookie(name,dt){

	this._name = name
	this.save = saveCookie;
	this.clear  = clearCookie;
	this._expires = dt
	var cookie = document.cookie
	var start = cookie.indexOf(name+"=")
	if (start==-1) return false
	var end = cookie.indexOf(";",start)
	if (end==-1) end = cookie.length
	cookie = cookie.substring(start+name.length+1,end)
	var start = cookie.indexOf("&")
	var a = cookie.split('&')
	if(a.length > 0){
		for(var i=0;i<a.length;i++)
			a[i] = a[i].split('=')
		for(var i=0;i<a.length;i++)
			this[unescape(a[i][0])] = unescape(a[i][1])
	}
	return true
}

function saveCookie(){

  if(typeof WINCHARTS != "undefined"){
    siteInfoSave();
  }

  var sep = ''
  var cookie = ''
  for(var p in this){
	if (p.charAt(0) == '_' || typeof this[p] == 'function') continue
		cookie += sep + escape(p) + '=' + escape(this[p]) 
		sep = '&'
  }
  cookie = this._name + '=' + cookie 
  var cookieDate  = new Date((new Date()).getTime()+3600000*24*this._expires)
  if (this._expires != 0) {
	cookie += ';expires='+cookieDate.toGMTString()
  }
  cookie +=';path=/screenfinance';
  document.cookie = cookie
}

function clearCookie(){

	cookie = this._name + '=;'
	cookie += 'expires=Fri, 02-Jan-1970 00:00:00 GMT'
	cookie +=';path=/screenfinance';
	document.cookie = cookie
};
/////////////////////////////////////
// init if required 
/////////////////////////////////////
 if (SITECOOKIE.init!='1'){

    SITECOOKIE.W_CHT_M = 0;
    SITECOOKIE.W_NWS_M = 0;
    SITECOOKIE.W_SHC_M = 0;
    SITECOOKIE.W_TPS_M = 1;
    SITECOOKIE.W_FDC_M = 1;
    SITECOOKIE.W_TPF_M = 1; 
    SITECOOKIE.W_IND_M = 1;

    SITECOOKIE.CF_IS1=1;
    SITECOOKIE.CF_IS2=1;
    SITECOOKIE.CF_IS3=1;
    SITECOOKIE.CF_IS4=0;
    SITECOOKIE.CF_IS5=0;
    SITECOOKIE.CF_IS6=1;
    SITECOOKIE.CF_IS7=0;
    SITECOOKIE.CF_IS8=1;
    SITECOOKIE.CF_IS9=1;
    SITECOOKIE.CF_IS10=0;
    SITECOOKIE.CF_IO1="";
    SITECOOKIE.CF_IO2="";
    SITECOOKIE.CF_IO3="";

    SITECOOKIE.CH1_SP=12;
    SITECOOKIE.CH1_CD="NUKX";
    SITECOOKIE.CH2_SP=12;
    SITECOOKIE.CH2_CD="NINDU";

    SITECOOKIE.CLR_SCH=1;

    SITECOOKIE.CHT_CLR=5;
    SITECOOKIE.CHT_SZE=2;
    SITECOOKIE.CHT_GRD=1;
    SITECOOKIE.CHT_DCU=2;
    SITECOOKIE.CHT_LNE=1;

    SITECOOKIE.CH_GP1="000080";
    SITECOOKIE.CH_GP2="FF4040";
    SITECOOKIE.CH_GP3="008800";
    SITECOOKIE.CH_GP4="880088";
    SITECOOKIE.CH_GP5="BBDD11";
    SITECOOKIE.CH_GP6="008888";
    SITECOOKIE.CH_GP7="FFCCFF";
    CH_GP8="FF9900";

    SITECOOKIE.init = '1';

    SITECOOKIE.save();
  }

switch (SITECOOKIE.CHT_SZE){
	case '1' : var gphwidth = 300;var gphheight = 200;break;
	case '3' : var gphwidth = 670;var gphheight = 350;break;
	default  : var gphwidth = 500;var gphheight = 350;break;
}
switch (SITECOOKIE.CHT_LNE){
	case '1' : var gpline = 1; var gf = "";break;
	case '2' : var gpline = 2; var gf = "";break;
	default  : var gpline = ""; var gf = 1;break;
}

switch (SITECOOKIE.CHT_DCU){
	case '1': var gpcur = 1;break;
	default : var gpcur = 0;break;
}

switch (SITECOOKIE.CHT_CLR){
	case '2' : var gpcla = "000000"; var gpclb = "000000";var gpblendp = "2";break;
	case '3' : var gpcla = "CCCCD8"; var gpclb = "CCCCD8";var gpblendp = "2";break;
	case '4' : var gpcla = "FF5555"; var gpclb = "FF5555";var gpblendp = "2";break;
	case '5' : var gpcla = "CCCCD8"; var gpclb = "FFFFFF";var gpblendp = "2";break;
	case '6' : var gpcla = "FF5555"; var gpclb = "FFFFFF";var gpblendp = "2";break;
	case '7' : var gpcla = "22CC22"; var gpclb = "FFFFFF";var gpblendp = "2";break;
	case '8' : var gpcla = "000000"; var gpclb = "FFFFFF";var gpblendp = "2";break;
	default  : var gpcla = "FFFFFF"; var gpclb = "FFFFFF";var gpblendp = "2";break;
}

var gp1 = (typeof SITECOOKIE.CH_GP1 == 'undefined' ) ?"000080":SITECOOKIE.CH_GP1
var gp2 = (typeof SITECOOKIE.CH_GP2 == 'undefined' ) ?"FF4040":SITECOOKIE.CH_GP2
var gp3 = (typeof SITECOOKIE.CH_GP3 == 'undefined' ) ?"008800":SITECOOKIE.CH_GP3
var gp4 = (typeof SITECOOKIE.CH_GP4 == 'undefined' ) ?"880088":SITECOOKIE.CH_GP4
var gp5 = (typeof SITECOOKIE.CH_GP5 == 'undefined' ) ?"BBDD11":SITECOOKIE.CH_GP5
var gp6 = (typeof SITECOOKIE.CH_GP6 == 'undefined' ) ?"008888":SITECOOKIE.CH_GP6
var gp7 = (typeof SITECOOKIE.CH_GP7 == 'undefined' ) ?"FFCCFF":SITECOOKIE.CH_GP7
var gp8 = (typeof SITECOOKIE.CH_GP8 == 'undefined' ) ?"FF9900":SITECOOKIE.CH_GP8

switch (SITECOOKIE.CLR_SCH){
	case '2' : var gpbuttoncol = "FFBB00"; var gpdisabledbarcol = "999999";
		   var gpwindowcol = "FFE0E0"; var gptitlebarcol    = "FF5555";break;
	case '3' : var gpbuttoncol = "333333"; var gpdisabledbarcol = "999999";
		   var gpwindowcol = "FFFFBB"; var gptitlebarcol    = "000000";break;
	case '4' : var gpbuttoncol = "CC0000"; var gpdisabledbarcol = "999999";
		   var gpwindowcol = "E0FFE0"; var gptitlebarcol    = "06C7F5";break;
	case '5' : var gpbuttoncol = "555555"; var gpdisabledbarcol = "999999";
		   var gpwindowcol = "FFDDFF"; var gptitlebarcol    = "AA22AA";break;
	default  : var gpbuttoncol = "06C7F5"; var gpdisabledbarcol = "BBCCEE";
		   var gpwindowcol = "EEEEEE"; var gptitlebarcol    = "003366";break;

}
;
/////////////////////////////////
// ANIMATE FUNCTIONS
/////////////////////////////////

function SetHorizontalBarScale(id,idpos){
	var HS = eval('WIN'+id+'1')
	var ID = eval('WIN'+idpos)
	HS.Move(ID.left+ID.width/2,HS.top)
}
function MoveHorizontalBarScale(id,pos){
	var HS = eval('WIN'+id+'1')
	HS.Move(pos,HS.top)
}

function SetVerticalBarScale(id,idpos){
	var VS = eval('WIN'+id+'1')
	var ID = eval('WIN'+idpos)
	VS.Move(VS.left,ID.top+ID.height/2)
}

function MoveVerticalBarScale(id,pos){
	var VS = eval('WIN'+id+'1')
	VS.Move(VS.left,pos)
}

function SetButton(id,index,showid){

	if (eval('typeof BTN'+id) != 'undefined') {
		var Btn = eval('BTN'+id)
		if(typeof Btn[0] != 'undefined')
			 Btn[0].Hide()
		Btn[0] = eval('WIN'+id+''+index+'1')
		Btn[0].Show()
		if (showid != ''){
			if(typeof Btn[1] != 'undefined')
				Btn[1].Hide()
				Btn[1] = eval('WIN'+showid)
				Btn[1].Show()
		}
			
	}
}

function ButtonsAllOff(id){
	var Btn = eval('BTN'+id)
	if(typeof Btn[0] != 'undefined') Btn[0].Hide()
}
function ShowFrame(id){
	eval('WIN'+id+''+'.Show()')
}
function HideFrame(id){
	eval('WIN'+id+''+'.Hide()')
}

;
function ChartObject(){

	this.MAXLIST 	= 8
	this.MAXPLOT 	= 4
	this.COLORLIST 	= new Array(SITECOOKIE.CH_GP1,SITECOOKIE.CH_GP2,SITECOOKIE.CH_GP3,SITECOOKIE.CH_GP4,SITECOOKIE.CH_GP5,SITECOOKIE.CH_GP6,SITECOOKIE.CH_GP7,SITECOOKIE.CH_GP8)
	
// Functions

	this.names	= new Array();
	this.codes	= new Array();
	this.colors 	= new Array();
	this.plots	= new Array();
	this.selectedCodes = ''
	this.selectedColors = ''
	this.codesList = ''
	
	this.Del 		= ChartDelete;
	this.Add 		= ChartAdd;
	this.Undo  		= ChartUndo;
	this.Clear		= ChartClear;
	this.PlotOn		= ChartPlotOn;
	this.PlotOff		= ChartPlotOff;
	this.NextColor  	= ChartGetNextColor;
	this.Generate		= ChartGenerate;
}	

function ChartDelete(typecode){

  if (this.codes.length > 0) 
  	for(var i=0;i<this.codes.length;i++)
      		if (this.codes[i] == typecode){
			this.names = NewSplice(this.names,i) 
			this.codes = NewSplice(this.codes,i) 
			this.colors = NewSplice(this.colors,i)
			this.plots = NewSplice(this.plots,i)
			return this.Generate()
      		}
}


function ChartAdd(typecode,name){
	if (this.codes.length <= this.MAXLIST) 
		if (this.codes.toString().indexOf(typecode)==-1){
			this.names[this.names.length] 	= name
			this.codes[this.codes.length]	= typecode
			this.colors[this.colors.length]	= this.NextColor()
			this.plots[this.plots.length]	=''
			this.codesList = '';sep=''
			return this.Generate()
		}
	return -1
}

function ChartUndo(){
	if (this.codes.length > 0) {
		this.names.length = Math.max(this.names.length-1,0)
		this.codes.length = Math.max(this.codes.length-1,0)
		this.colors.length = Math.max(this.colors.length-1,0)
		this.plots.length = Math.max(this.plots.length-1,0)
		return this.Generate()
	}
}
function ChartClear(){ 
	this.names	= new Array();
	this.codes	= new Array();
	this.colors 	= new Array();
	this.plots	= new Array();
	return this.Generate()
}

function ChartPlotOn(i){ 
	if (i<0) return
  	var c=0
	for(p=0;p<this.plots.length;p++)
		if(this.plots[p]=='1') c++
	if (c >= this.MAXPLOT) 
		return false
	else
		if(i<this.plots.length){
			this.plots[i] = '1'
			this.Generate()
		} 	
	return true
}


function ChartPlotOff(i){
	if(i<this.plots.length){
		this.plots[i] = '' 	
		this.Generate()
	}
}

function ChartGetNextColor(){

	for(c=0;c<this.COLORLIST.length;c++){
		var found = -1
		for(i=0;i<this.colors.length;i++){
	    		if(this.COLORLIST[c]==this.colors[i])
				found = c
		}
		if (found == -1) return this.COLORLIST[c]
	}
	return '00000'

}

function ChartGenerate() {
	this.codesList = ''
	var sep=''
	for(i=0;i<this.codes.length;i++){
		this.codesList += sep+this.codes[i]
		sep = ','
	}

	sep = ''
	this.selectedCodes  = ''
	this.selectedColors = ''	
	for(var i =0;i<this.codes.length;i++)
		if (this.plots[i]=='1'){
			this.selectedCodes  += sep + this.codes[i]	
			this.selectedColors += sep + 'H' + this.colors[i]	
			sep = ','
		}

	return this.codes.length-1
}


var CHART = new ChartObject()
;
function objQuery(strQry){

	this.QueryString = objQueryGet;

	var start = strQry.indexOf("?")
	if (start < 1) return

	strQry = strQry.substr(start+1)

	var a = strQry.split('&')
	if(a.length > 0){
		for(var i=0;i<a.length;i++)
			a[i] = a[i].split('=')
		for(var i=0;i<a.length;i++)
			this[a[i][0]] = unescape(a[i][1])
	}
	return true
}

function objQueryGet(){

	var sep = ''
	var strQuery = ''
	for(var p in this){
		if (p.charAt(0) == '_' || typeof this[p] == 'function') continue
		strQuery += sep + p + '=' + escape(this[p]) 
		sep = '&'
	}
	return strQuery
}
;


/////////////////////////////////////////
//WIN DHTML object.
//Alan Machado Oct 2001
//Finanical Express Prestel
/////////////////////////////////////////

function DHTMLWin(id,x,y,minimised,showing){
	
// Code around loading issue in NS6+ && IE5+, Insure element is loaded 
	
	this.init = false
	this.src = ""

	this.Init = WinInit;
	this.Move = WinMove;
	this.Minimise = WinMinimise;
	this.Maximise = WinMaximise;
	this.HScroll = WinHScroll;
	this.Show = WinShow;
	this.Hide = WinHide;

	if(id != null)
	{
  	  this.frameRef  = ''
	  this.frameId   = ''
	  this.idsml	 = id
	  this.id        = "WIN"+id	
	  this.startLeft = x
	  this.startTop  = y
	  this.minimised = minimised
	  this.showing   = showing
	}

	if(is.DOM && getElement(id) == null) return
	if(is.NS4) return

	this.Init()
	
}

function WinInit(){

	if(this.init) return

	if(is.NS4){	
		RefId = getLayerRef(getTopParent().document,this.id).substr(0)
		idx = RefId.lastIndexOf(".IF") 
		var saveidx = idx+1
		if(idx!=-1){
			for(idx++;RefId[idx]!='.' && idx<RefId.length;idx++);
			this.frameId   = RefId.substr(saveidx,idx-saveidx)
			this.frameRef  = RefId.substr(0,idx)+'.'
		}
	}

	this.bodyId = ''

	var tags = getTags("DIV")
	for(var i = 0; i < tags.length ; i++)
		if (tags[i].id == "BDY"+this.idsml){
			this.bodyId  = "BDY"+this.idsml
			break;
		}

	this.height = getHeight(this.id)

	if (this.bodyId != "")
		this.height = this.height + getHeight(this.bodyId) 

	if (this.bodyId != "") 
	  this.width = getWidth(this.bodyId)
	else
	  this.width = getWidth(this.id)

	this.ScrollClipWidth = this.width
	this.ScrollMaxWidth = this.width
	
	this.titleHeight = 18

	this.expandSize = (this.height-this.titleHeight)-5

	this.Move(this.startLeft,this.startTop)

	if (this.showing) this.Show();

	this.init = true
		
}

function WinMove(x,y){

	this.left = x
	this.top = y
	this.right = x + this.width
	this.bottom = y + this.height
	shiftTo(this.id,x,y)
	if(this.bodyId!="") shiftTo(this.bodyId,x,y+this.titleHeight)
}

function WinShow(){

	if(this.src!=""){
		setFrame(this.id.substr(3),this.src)
		this.src=""
	}

	show(this.id)
	if (this.minimised==0 && this.bodyId!="") show(this.bodyId)
	this.showing = 1
}

function WinHide(){
	hide(this.id)
	if(this.bodyId!="") hide(this.bodyId)
	this.showing = 0 
}

function WinMinimise(){

	if (!this.minimised) {
		id = WIN_FindNearestWindow(this,this.top+this.titleHeight+5)
		if (id != "") this.expandSize = eval(id+'.top')-(this.top+this.titleHeight)-5
		hide(this.bodyId)
		DHTML_WIN_MoveAll(this,this.expandSize*-1)
		this.minimised = 1
	}
}

function WinMaximise(){
	if (this.minimised) {
		DHTML_WIN_MoveAll(this,this.expandSize)
		show(this.bodyId)
		this.minimised = 0
	}
}

function WinHScroll(xoff){

	if(this.left-xoff>this.startLeft ) {
		if(this.left != this.startLeft)
			this.Move(this.startLeft,this.top)
		return 3
	}

	if(this.left-xoff+this.ScrollMaxWidth<this.startLeft+this.ScrollClipWidth){
		return 4
	}

	this.Move(this.left-xoff,this.top)
	setClip(((this.bodyId=='')?this.id:this.bodyId),0,this.startLeft-this.left+this.ScrollClipWidth,this.height,this.startLeft-this.left)

// Determine if a following move will prevent scrolling

	if(this.left-xoff>this.startLeft ) return 1
	if(this.left-xoff+this.ScrollMaxWidth<this.startLeft+this.ScrollClipWidth) return 2

	return 0
}

/////////////////////

function WIN_Minimise(sWin){
	eval(sWin+'.Minimise()')
	//setTimeout("DHTML_WIN(\"if (showing && minimised !=0 && bodyId != '') {hide(bodyId);show(bodyId);}\",'')",1000)
}

function WIN_Maximise(sWin){
	eval(sWin+'.Maximise()')
	//setTimeout("DHTML_WIN(\"if (showing && minimised !=0 && bodyId != '') {hide(bodyId);show(bodyId);}\",'')",1000)
}
function WIN_FindNearestWindow(Win,y){
var SaveId,yLowest
	SaveId = ""
	yLowest = 999999
	var tags = (is.DOM || is.IE || is.NS4) ? getTags("DIV") : eval('document.'+Win.frameId+'document.layers')
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
		with(eval(Win.frameId+tags[i].id)){
			if (right < Win.left || left > Win.right || top < y ) continue;
			if (top < yLowest){
				yLowest = top
	  			SaveId = Win.frameId+id
			}
	
		}
	}
	return SaveId
}

function DHTML_WIN_MoveAll(Win,yInc){
	var tags = (is.DOM || is.IE || is.NS4) ? getTags("DIV") : eval('document.'+Win.frameId+'document.layers')
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
		with(eval(Win.frameId+tags[i].id)){
			if (right < Win.left || left > Win.right || top < Win.top+Win.titleHeight+5 ) continue;
			Move(left,top+yInc)
		}
	}
}
	
function DHTMLInit(){

	DHTML_WIN('eval(tags[i].id+\'.Init()\');','')
	DHTML_WIN('if (minimised){minimised=false; Minimise(); }','')
}

function DHTML_WIN(jscode,frameId){

	var tags = getTags("DIV")
	for(var i = 0; i < tags.length ; i++){
		if (tags[i].id.substr(0,3) != "WIN") continue;
	   	with(eval(tags[i].id)){ 

//if(jscode.indexOf('mini')!=0)
//	alert('b:'+id+':'+frameRef)

eval(jscode) }
	}
}
;