Indicestab=nParole=nEvid=nSpans=Wds=Atr=Ann=Ael=0
d=document;da=d.all;dl=d.layers;
wS=hS=0
gWait=zIfr=ttk=0;

glos=zzCla=""
Glx=new Array()
pGl=new Array()
TXXX=""
//
pCol=new Array()
pAbs=new Array()
pAbe=new Array()
pNot=new Array()
penn=0
sOrig=""
usrPre=idox=iNid=0

sBef1='<SPAN style="BACKGROUND-COLOR:'
sBef2='">'
sAft1='<SUP style="COLOR: red">'
sAft2="</SUP></SPAN>"


function AttivaBott(){if (!inAttesa("F",AttivaBott))tMF.ShowHide(5)}


function mOver(n){for(var i in pGl)if (pGl[i][0]==n)ShGloss(pGl[i][1])}

function HdGloss()
{  	var	s=tMG()
  	if (s)s.document.body.innerHTML=""
}

function ShGloss(n)
{  	var	s=tMG()
  	if(s)
	{	var g=Glx[n]
		var z= eval("top.Client.ril"+g[0]+"(g[1],g[2],g[3],g[4],g[5],g[6],g[7],g[8])")
		s.document.body.innerHTML=z
	}
}

function salvaUU()
{	
	var tr =gtP("Tracc");
	var id=gtP("ID");
  	compattaUU()
	v="UU="+tr+","+id
	if (nSpans) for (i=0; i<nSpans; i++) v+=","+pAbs[i]+","+pAbe[i]+","+pCol[i]+","+pNot[i]
	setTimeout("LoadTemp(GetApp('"+v+"'))",400);
}

function compattaUU()	  
{ 
	ERR1
	Atr=new Array()
    for (i=0;i<nSpans;i++)for(j=pAbs[i];j<=pAbe[i];j++)Atr[j]=pCol[i] 
   	for (s=curC=ix=i=0;i<nParole;i++)
	{	c=(0 | Atr[i]);if(c!=curC)
		{   if (curC)
			{	pAbs[ix]=s;pAbe[ix]=i-1;pCol[ix]=curC
				ix++
			}
			curC=c
			s=i
		}
	}
	nSpans=ix;
	ERR1
}


function ConfirmDelete (a,b) 	 
{ if (confirm("Confermi la cancellazione?"))dxLdr1("Delete="+a+"&ID="+b)
}

function insNota()
{   
	f=gtCEl("uFrame").value
	f1=f.replace(/<p>|<.p>+/gi," ")
	pNot[nSpans-1]=f1
	el=gtCEl("diaWin")
	el.style.visibility='hidden'
	sl3()
}

function findY(o)
{	var c=0;if (o.offsetParent){while (o.offsetParent){c+=o.offsetTop;o=o.offsetParent}}
	else if(o.y)c+= o.y;
	return c;
}	

function annot(ix,posH,pL)
{	
	var alt=170;
	var larg=300
 	var offW=0
	if((pL+larg)>gtClBody().clientWidth) offW=larg-20;
	var posL=pL-offW
	if (!tMC()) return
	if (!gtCEl("diaWin")) 
	{	var o=tMC().d.createElement("DIV")
		o.id ="diaWin"
		o.className="diaWs"
		gtClBody().appendChild(o);
	}
	var z= '<img src=../img/dentesu.gif style="position:absolute;top:0; left:'+offW+'; height:10;">'
	z+='<div id=xx style=" position:absolute;top:10;left:0;width:'+larg+'; height:'+alt+'; padding:2; color:white; background-color:#6c9cad;">'
	z+='<b style="font-size:7pt;"> Nota:</b>'
	z+='<button style="position:absolute;top:30;left:6;font-size:7pt;height:20;" onclick="top.Menu.insNota()">'
	z+='OK</button></div>'
   	z+='<form><textarea id="uFrame" style=" position:absolute;top:13;left:34;width:260; height:162;"></textarea></form>'

	var s=gtCEl("diaWin")
	var	ss=s.style
	ss.height=alt
    ss.width =larg
	ss.top=posH
	ss.left=posL+gtClBody().scrollLeft
	var vv=posH+alt-gtClBody().scrollTop-gtClBody().clientHeight
	if (vv>20)gtClBody().scrollTop+=vv
	
	ss.visibility="visible"
 	s.innerHTML=z
	gtCEl("uFrame").focus()

}


function ERR1()
{   var z="";
	for (i=0;i<nSpans;i++)	z+=" pAbs:"+pAbs[i]+" "+" pAbe:"+pAbe[i]+" col:"+" pCol:"+pCol[i]+"\r\n" 
    z+="\r\n";
	alert(z); 
}

function pul(r){return r.replace(/[ \f\n\r]+/g," ")}


function sbianca(n)
{
	// da rifare
	//penn=n;	if (usrPre) sl2()
}


function undo()
{	
  	k=nSpans-1
	for (i=k;i<nSpans;i++){pAbs[i]=0;pAbe[i]=0;pCol[i]=0;pNot[i]=""}
	nSpans=k;
	sl3()
}




function sl2(i,n)	  
{  
    ix=nSpans
	pCol[ix]=penn
	pNot[ix]=""
	pAbs[ix]=parseInt(i)
	pAbe[ix]=parseInt(n)
	++nSpans
	sl3();
	var v0=gtCEl("k"+n)
	if(v0 && penn=='4')annot(ix,findY(v0)+v0.offsetHeight,v0.offsetLeft)
}




function Delphi(n)	  
{  
    var a=1+n.indexOf("_")
	var b=1+n.lastIndexOf("_")
	if (a<1 || b==a) return;
	nDom=n.substr(a,b-a-1)
	nRis=n.substr(b)
	for (var i=0; i<10;i++)
	{	e= top.Client.gtEl("Delphi_"+nDom+"_"+i)
		if (e) e.src=i==nRis?"../img/si.gif":"../img/no.gif"
	} 
}




function primav(val)
{   
   	if (inAttesa("C",primav,primav.arguments) ||(!gtCEl("TxXx")))return
    stP("Albero","N") //si 12/12
	sOrig=TXXX
   	e=-1;i=0;j=0

	if(val!="")for(;;)
	{	s=++e
		e=val.indexOf(',',s)
		v=val.substring(s,(e<0)?val.length:e)
		n=parseInt(v)
		if(i==0)pAbs[j]=n
		if(i==1)pAbe[j]=n
		if(i==2)pCol[j]=n
		if(i==3)pNot[j]=v
		if(++i==4){i=0;j++}
		if(e<0)break
	}
    nSpans=j
    sl3()
}

function mucol(val)
{   
	if (inAttesa("C",mucol,mucol.arguments) ||(!gtCEl("TxXx")))return
 	gtCEl("TxXx").innerHTML=sOrig=(pul(TXXX))
	sOrig=TXXX
   	nSpans=0;if(val=="")return
   	r=0;g=0;b=0
	e=-1;i=0;j=0;for(;;)
	{	s=++e
		e=val.indexOf(',',s)
		v=val.substring(s,(e<0)?val.length:e)
		n=parseInt(v)
		if(i==0)pAbs[j]=n
		if(i==1)pAbe[j]=n
		if(i==2)r=n
		if(i==3)g=n
		if(i==4)b=n
		if(++i==5){pCol[j]="RGB("+r+","+g+","+b+")";i=0;j++}
		if(e<0)break
	}
    curp=0;z=""
    for (var i=0; i< j; i++)
	{	z+=sOrig.substring(curp,pAbs[i])
		curp=pAbs[i]
		if (pAbe[i]!=1) z+="</SPAN>"
	   	if (pAbe[i] >0) z+=sBef1+pCol[i]+sBef2
		if(i==j-1)z+=sOrig.substring(curp,sOrig.length-1)
	}
	wLy(gtCEl("TxXx"),z)
}


function now(){return new Date().getTime()}
function sl3()	  
{
	Wds=new Array()
	Atr=new Array()
	Ann=new Array()
    Ael=new Array()
	var s,i,e,s=0,i=0,e=0

	for(;;)
	{  	e=1+sOrig.indexOf('§',s)
		Atr[i]=0;
		Wds[i++]=sOrig.substring(s,e?e-1:sOrig.length)
		s=e
		if(e<1)break
	}
	nParole=i;
    
	for (i=0;i<nSpans;i++)
	{	
		for(j=pAbs[i];j<=pAbe[i];j++)Atr[j]=pCol[i]
		if(pNot[i])Ann[--j]=pNot[i]
	} 
	for (i=0;i<pGl.length;i++)Atr[pGl[i][0]]=6
    s=0; curC=ix=0
 
    var nDom=0,nRis=0,zz="",z="",k=0
	for (var i=0;i<Wds.length;i++)
	{	
		//if (!Wds[i].length) continue
		
		///////////////////////////////////////////////////////////////
		if (Wds[i]=="<!--DOMANDA-->"){nRis=0;nDom++}
	    else if (Wds[i]=="<!--RISPOSTA-->") 
		{   
		 	Wds[i]="<img style='cursor:hand;' id =Delphi_"+nDom+"_"+nRis+" src=../img/nond.gif>&nbsp;"
			Atr[i]=7 
			nRis++
		}
		/////////////////////////////////////////////////////////////
		if (Atr[i]<0) z+=Wds[i]
		else
		{   Ael[Ael.length]=i
			z+="<span id ='k"+i+"' class='TXX"+Atr[i]
			if (Atr[i]==6) z+="' onmouseover='mOver("+i+")"
			z+="'>"+Wds[i]+"</span>"
			if (Ann[i]){ z+="<sup class='TXnota'>"+Ann[i]+"</sup>"}
		}
   		if(++k>13){zz+=z;z="";k=0 }
	}
	z+="<br><br><br><br>"
	gtCEl("TxXx").innerHTML=zz+z;
}

function titolo(verbo,tracc,id,ni,nItems,pL1,pLk,pT1,szLk,prima,dopo,pAp,szUid,ErrMsg)
{	
	if (inAttesa("C",titolo,titolo.arguments))return 
	stP("Verbo",verbo) 
	stP("Tracc",tracc)
	stP("ID",id) 
 	if (ni || ErrMsg) tipo="M"
	else if(nItems!=-1)tipo="Y"
	else tipo="N"
	HdGloss()
	if (tipo!="N")
	{	nn=(tipo=="Y")?nItems:ni
   		stP("Albero",tipo)
		SetAr("L1",pL1,nn)
		SetAr("Lk",pLk,nn)
		SetAr("T1",pT1,nn)
		SetAr("Ap",pAp,nn)
		stP("Linee",nn)
		stP("PRIMA",prima)
		stP("DOPO",dopo)
		stP("szLk",szLk)
		stP("CurP",0)
		IndV();
	}
}


sW=screen.width<1000?800:1024

function brk(txt,recc)
{	var nc=0
    for (;;)
    {   k=txt.indexOf(":|:")
        nc++
        if(k<0){recc[nc]=txt;break;}
        recc[nc]=txt.substr(0,k)
        txt=txt.substr(k+3)
    }
    return nc
}

function GetPth(sU)
{
    var iL = sU.length
	var Ix = 0
    for (var i=0; i< iL; i++){if(sU.substring(i,i+1)=="/")Ix= i}
	var ssU=sU.substring(0,Ix+1)
	return (ssU=='http://')?sU+'/':ssU 
}

function GetApp(x)
{
	var tk=gtP("Token")
	if(tk=="#") return "null.htm"
	return GetPth(top.location.href)+top.app+"W="+tk+"&"+x
}

function getVal(n)
{	return dl? navigator.MenuForm[n]:document.MenuForm[n].value
}

function setVal(n,s)
{
    if(dl)navigator.MenuForm[n]=s
	else  document.MenuForm[n].value=s
}

function getIx(x)
{	
	var f0= getVal(0)
	var n=f0.indexOf(x,0)
	if (n<0 && x.length<9) 
	{	f0+=x
		var pad="$$$$$$$$"
		f0+=pad.substring(0,8-x.length)
		setVal(0,f0)
		n=f0.indexOf(x,0) 
	}
	return n
}

function gtP(x,Num)
{ 	
	var n=getIx(x)
	var t=(n<0)?"#":getVal(1+(n>>>3))
	if (Num){var t2=parseInt(t,10);return isNaN(t2)?-1:t2}
	return t
}


function stPN(x,d){n=getIx(x);if(n>=0)setVal(1+(n>>>3),d)}

function stP(x,dd)
{  	var n=getIx(x) 
	var dt=(dd=="")?"#":dd 
	if (n>=0) setVal(1+(n>>>3),dt)
}

function SetAr(x,ar,nI)
{ 
 	var n=getIx(x)   
	if (n>=0)
	{	var dt=''
		for (var i=0; i< nI; i++){dt+=ar[i];dt+="^"}
		setVal(1+(n>>>3),dt)
	}
	return n;
}

function GetAr(x,Num)
{
	var n=getIx(x)  
	if (n<0) return false
	var dd=getVal(1+(n>>>3))
	ar= new Array()
	var ix= 0, ixs=0, ixe=0
	while((ixe=dd.indexOf('^', ixs))>0)
	{	var temp = dd.substring(ixs,ixe)
		if (temp=="")temp=" "
		if (Num){ var t2=parseInt(temp,10); ar[ix++]=isNaN(t2)?-1:t2}
		else    ar[ix++]=temp
		ixs=ixe+1
	}
	return ar
}


function apch(n) 
{ 
 if (Ap[n]) {k=n; k++; while (k<nIt && L1[k]>L1[n]) Ap[k++]=0}
 Ap[n]=1-Ap[n]
 SetAr("Ap",Ap,nIt)
 stPN("CurP",n);CurP=n
 IndV();
 top.Pull.RiscriviIndice()
}

function PadAp(n)
{    
 var k=n
 while (k && L1[k]>=L1[n]) k-- 
 return Ap[k]  
}


function jmp(n)
{   
	tk=gtP("Token")
	tk1="&W="+tk
	var tre=gtP("Albero")
	stPN("CurP",n)
	var lk='<a href=# onclick="top.Menu.IndV();top.Pull.RiscriviIndice();return false";>'
	var Zz=""
	if (tre=='Y') 
	{	var j=n; var Z=new Array; var zx=0 
		for (var i=n-1; i>=0 && L1[j]; i--) 
		{ 
			if (L1[i]<L1[j])
			{	
			  	var p=T1[i].indexOf("</a>")
				Z[zx++]= p<0?T1[i]:T1[i].substring(0,p)
				j=i
			}
		}
	  	var mL=100/zx
	 	Zz+="<table cellpadding=4><tr><td bgcolor= beige>"+lk+"<b>INDICE</b></a></td>"
		for (var i=zx-1;i>=0;i--) 
		{ 
		    if (Z[i].length>mL) Z[i]=Z[i].substring(0,mL)+"..."
		  	Zz+="<td><img src=../img/pall2.jpg></td>";
			Zz+="<td bgcolor= beige><b>"+lk+Z[i]+"</b></a></td>"
		}
		Zz+="</tr></table>"
	}
	stP("Indice",Zz)	
	szLk=gtP("szLk")
	dxLdr1(szLk+Lk[n])

}





function inrg(n,n1)
{return (n>=0 && n<n1)}




function AvIndAlbero(incr)
{ 


	var tre=gtP("Albero")
	var i=gtP("CurP",1)
	nIt=gtP("Linee")
	Ap=GetAr("Ap",1)
	T1=GetAr("T1")
	Lk=GetAr("Lk")
	L1=GetAr("L1",1)
	if (!i) i=0
 	if (tre=='M'){i+=incr; if(i>=0 && i<nIt) jmp(""+i)}
    if (tre=='Y') while (inrg(i+=incr,nIt))
    { 
       	if (!Ap[i]) 
		{	Ap[i]=1;
			if (incr<0)
			{	var k=i;	
				while (k && L1[k]){Ap[k]=1; k--}
			}
		}
		if (i==(nIt-1) || L1[i+1]<=L1[i]) 
		{	
			SetAr("Ap",Ap,nIt);
			jmp(""+i);
			break;
		}
    }
}


function AvantInd(incr)
{ 
    var tre=gtP("Albero")
	if(tre=="Y" || tre=="M") AvIndAlbero(incr)
    else
	{	var n=(incr>0)?gtP("Bnext"):gtP("Bprev") 
	   	if(n=='NULL') return Indice()
		var v=gtP("Verbo")+"="+gtP("Tracc")+"&id="+n
      	if (v.substr(0,1)=="_") LoadTemp(GetApp(v)) 
	    else dxLdr1(v)
	}
}

function dxLdr1(a)
{   
	if      (a.indexOf('/')<0)top.Pull.location.href=GetApp(a)
	else if (a.indexOf('//')<0){t=top.location;t.href="//"+t.host+a}
	else nuovaFin(a)	
	
}


function nuovaFin(url)
{
    var saH=screen.availHeight
	var saW=screen.availHeight
	var nH=(saH < 560) ? saH-50:560
	var nW=(saW < 640) ? saW-50:640
	var nT=saH*2/5 - nH/2
	var nL=saW/2 - nW/2
	if(nT<0)nT=0
	if(nL<0)nL=0

	var strOpts = "resizable=yes,menubar=yes,status=yes,toolbar=no,height="+String(nH)+",width="+String(nW);
	if(navigator.appName.toUpperCase() == "NETSCAPE")strOpts = "screenX="+String(nL)+",screenY="+String(nT)+ ","+strOpts;
	else									 		 strOpts = "left="+String(nL)+",top=" + String(nT)+ ","+strOpts;
	
	var oWnd = window.open(url, "RatingsForum", strOpts)					
	if(oWnd == null)return false
	oWnd.focus();
	return true;
}

function Indice()
{	
    var tre=gtP("Albero");
  	if(tre=="Y" || tre=="M") { IndV(); top.Pull.RiscriviIndice()}
    else IndicePercorsi()
}

function LoadTemp(h)
{  	
	var	tT=top.Temp; 
	if(tT)tT.location.replace(h);
	else setTimeout("LoadTemp("+h+")",100);
}

function Zoom(verbo)
{ 	if(inAttesa("C",Zoom,Zoom.arguments))return;
   	tMC().location.replace(GetApp(verbo+"="+gtP("Tracc")+"&id="+gtP("ID")))
}


function IndicePercorsi()
{ 
	var v=gtP("Padre")
	var p =gtP("IDPadre")
	var t=gtP("Tracc")
	if(t=='Modulo') dxLdr1("PagPers="+v+"&id="+p)
	else dxLdr1("Page="+v+"&id="+p)
}


function PlayPause()
{ 
	dm=eval("document.mediaPlayer")
	if(dm) 
	{ var ps = dm.playState
	  var a=gtP("Audio")
	  if(a=='on' && (ps==1 || ps==0))dm.play()
	  else if(a == 'off' && ps==2) dm.pause()
	}
}



function IndV()
{   
    var vb =gtP("Verbo")
    var tr =gtP("Tracc")
	var vv =gtP("Sezione")
	
 	T1=GetAr("T1")
	Lk=GetAr("Lk")
	L1=GetAr("L1",1)

	nIt=gtP("Linee")
	szUid=gtP("szUid")
	CurP=gtP("CurP",1)
	tipo=gtP("Albero")

	if (tipo=="M")	aggiMulti(tr,vv)
	else			aggiAlbero(tr,vv)
	top.Pull.zHP01=prima
	top.Pull.zHP02=zzCla+dopo 
}




function aggiMulti(tr,vv)
{  
    prima=gtP('PRIMA'); if (prima=='#') prima=''
	dopo=gtP('DOPO');	if (dopo=='#') dopo=''
   	var zzCla="" 
	codMulti(tr)
}


hr0='<a href=# onclick=\"top.Menu.'
hr1=hr0+'jmp('
hr2=hr0+'apch('
hr3=hr4=');return false;">'
im1='<img src=../images/'
im2='.gif border=0></a>'

function aggiAlbero(tr,vv)
{
	Ap=GetAr("Ap",1);
	prima=gtP('PRIMA'); if (prima=='#') prima=''
	dopo=gtP('DOPO');	if (dopo=='#') dopo=''
	var nR=0,cla=''
 	
	var AttrFoc="</td><td class='ALBFK'>";
	var Attr=new Array;	
	Attr[0]="</div></td><td class='ALB0'>";
	Attr[1]="</div></td><td	class='ALB1'>";
	Attr[2]="</div></td><td	class='ALB2'>";	
	Attr[3]="</div></td><td	class='ALB3'>";
	var EAtr=new Array;    

	EAtr[0]=')"></b>';	
	EAtr[1]=')">';	
	EAtr[2]=')">';	
	EAtr[3]=')">';
	
	maxAttr=3;
    var fok="<div id='fokus'>&nbsp;</div>"
	for (i=0; i< nIt; i++)
	{
	 	if (!L1[i] || PadAp(i))
        {
 		    cla+="<TABLE NOWRAP BORDER=0><TR><TD>"
            for (j=0; j<(L1[i]); j++) cla+=t_DD
	    	var atr= j > maxAttr?maxAttr:j
	        var bc=(i==CurP)?AttrFoc:Attr[atr]
		
			if(tr.indexOf('orum')>0)//Forum
			{	 if (i==(nIt-1) || L1[i+1]<=L1[i]) cla+=im1+'foglia'+im2+bc+hr1+i+hr3 
				 else 
				{  	var ap=Ap[i]?'Ap':'Ch'
					cla+=hr2+i+hr4+im1+ap+im2+bc+hr1+i+hr3
				}				 
			}
			else
			{	
				if (i==(nIt-1) || L1[i+1]<=L1[i]) cla+=hr1+i+hr3+im1+'foglia'+im2+bc+hr1+i+hr3 
				 else 
				{  	var ap=Ap[i]?'Ap':'Ch'
					cla+=hr2+i+hr3+im1+ap+im2+bc+hr2+i+hr4
				}
			}
			nR++
			var p=T1[i].indexOf("§")
			if (p<0)cla+=T1[i]+'</a>'
			else 
			{	cla+=T1[i].substring(0,p)+'</a>'
				if (p<T1[i].length)	cla+='<br>'+T1[i].substring(p+1)
			}				
			cla+=t_DD	
			if (i==CurP)cla+=fok; else cla+='&nbsp;'
			cla+=t_DRT
		}	 
	}
   	vv=2
	zzCla=cla
}

function help()	// context-sensitive in funzione di tracc
{   
   	if(inAttesa("C",help))return
	var ctb=gtP("Tracc")
    var hP=GetPth(tMC().location.href)
	tMC().location.replace(hP+"../static/help_"+ctb+".htm")
}


var nnn="X"
function openw(url) 
{	
	w=screen.width-190;  h=top.Client.document.body.clientHeight; t=screen.height-top.Client.document.body.clientHeight-120;
    op="top="+t+",left=170,width="+w+",height="+h+",scrollbars=yes,resizable=yes"
	nnn=nnn+"1"
	nww=window.open(url,"Dati"+nnn,op) 
	nww.focus()
}


function getRadioV(r){for(i=0;i<r.length;i++)if(r[i].checked)return r[i].value;return "0"}