function FunzioneDiStampa() {
	document.writeln('var GiorniSettimana=new Array("Domenica", "Lunedi", "Martedi", "Mercoledi", "Giovedi", "Venerdi", "Sabato");');
	document.writeln('var Mesi=new Array("Gennaio", "Febbraio", "Marzo", "Aprile", "Maggio", "Giugno", "Luglio", "Agosto", "Settembre", "Ottobre", "Novembre", "Dicembre");');
	document.writeln('var Giorni=new Array();');
	document.writeln('var MeseIn;');
	document.writeln('var MeseFi;');

	document.writeln('var Giorno;');
	document.writeln('var Mese;');
	document.writeln('var Anno;');
	document.writeln('var GiornoN;');
	document.writeln('var MeseN;');
	document.writeln('var AnnoN;');

	document.writeln('var Oggi = new Date();');
	document.writeln('var GiornoOggi=Oggi.getDate();');
	document.writeln('var MeseOggi=Oggi.getMonth()+1;');
	document.writeln('var AnnoOggi=Oggi.getYear();');
	document.writeln('var scadenza = new Date();');
	document.writeln('var SeInFinestra = 0;');
	document.writeln('var SeSesso = 0;');

	document.writeln('var DataCalcolo;');
	document.writeln('var DataNascita;');
	document.writeln('var Data;');
	document.writeln('var DataTrasformata;');

	document.writeln('var cFisico;');
	document.writeln('var cEmotivo;');
	document.writeln('var cIntellettivo;');

	document.writeln('var win;');

	document.writeln('var GiornoSettimanale;');

	document.writeln('var InizioDisegnoT=70;');

	document.writeln('var InizioDisegnoL=70;');
	document.writeln('var inizio=110+InizioDisegnoT;');
	document.writeln('var combinato=272+InizioDisegnoT;');
	document.writeln('var scostamento=18;');
	document.writeln('var largo=560;');
	document.writeln('var alto=330;');
	document.writeln('var DaInizio=10;');
	document.writeln('var TipoCalcolo;');
	document.writeln('var PosizioneEtichettaL=6+InizioDisegnoL;');
	document.writeln('var PosizioneEtichettaT=6+InizioDisegnoT;');

	document.writeln('var apFisico=new Array(0,-22,-42,-60,-72,-78,-80,-76,-66,-51,-32,-11,11,32,51,66,76,80,78,72,60,42,22);');
	document.writeln('var acFisico=new Array(0,11,12);');
	document.writeln('var avFisico=new Array(0,8,15,18,19,21,23,20,18,17,10,3,2,5,9,9,8,6,7,9,9,9,5);');

	document.writeln('var apEmotivo=new Array(0,-18,-34,-49,-62,-72,-78,-80,-78,-72,-62,-49,-34,-18,0,18,34,49,62,72,78,80,78,72,62,49,34,18);');
	document.writeln('var acEmotivo=new Array(0,14);');
	document.writeln('var avEmotivo=new Array (0,8,15,18,18,19,21,23,21,19,18,18,13,6,0,4,8,9,9,9,7,6,7,9,9,9,8,5);');
	document.writeln('var apIntellettivo=new Array(0,-18,-34,-48,-59,-69,-75,-79,-81,-80,-77,-72,-64,-53,-41,-26,-9, 9,26,41,53,64,72,77,80,81,79,75,69,59,48,34,18);');
	document.writeln('var acIntellettivo=new Array(0,16,17);');
	document.writeln('var avIntellettivo=new Array(0,8,15,17,18,19,20,21,23,22,20,18,17,15,13,10,3,2,5,9,9,9,9,8,7,6,8,8,9,9,9,9,5);');


	document.writeln('function CalcolaBioritmi(pGiorno,pMese,pAnno,pGiornoN,pMeseN,pAnnoN)');
	document.writeln('{');
	document.writeln('	DisegnaInizio("S");');
	document.writeln('	Giorno=pGiorno;');
	document.writeln('	Mese=pMese;');
	document.writeln('	Anno=pAnno;');
	document.writeln('	GiornoN=pGiornoN;');
	document.writeln('	MeseN=pMeseN;');
	document.writeln('	AnnoN=pAnnoN;');
	document.writeln('	ContinuaDisegno("S");');
	document.writeln('	DataCalcolo=new Date(String(Mese)+"/"+String(Giorno)+"/"+String(Anno));');
	document.writeln('	DataNascita=new Date(String(MeseN)+"/"+String(GiornoN)+"/"+String(AnnoN));');
	document.writeln('	Calcolo=parseInt((DataCalcolo-DataNascita)/86400000);');
	document.writeln('	if (DataCalcolo.getDate()!=Giorno) {');
	document.writeln('		alert ("Data di calcolo non valida!");');
	document.writeln('		return	nul};');
	document.writeln('	if (DataNascita.getDate()!=GiornoN) {');
	document.writeln('		alert ("Data di nascita non valida!");');
	document.writeln('		return	nul};');
	document.writeln('	if (Calcolo < 0) {');
	document.writeln('		alert ("Data di nascita successiva alla data di calcolo!");');
	document.writeln('		return	nul};');
	document.writeln('	Calcolo=Calcolo-DaInizio;');
	document.writeln('	cFisico=Calcolo%23;');
	document.writeln('	cEmotivo=Calcolo%28;');
	document.writeln('	cIntellettivo=Calcolo%33;');
	document.writeln('	DisegnaCicli();');
	document.writeln('	DisegnaFineGrafico("FormDatiCalcolo")');
	document.writeln('}');

	document.writeln('function DisegnaInizio(pCompleto)');
	document.writeln('{');
	document.writeln('	win=window.open("","", "height=500, width=700, top=0, left=0, toolbar=no, location=no, directories=no, status=no, menubar=no, scrollbars=no");');
	document.writeln('	win.document.writeln("<HTML><HEAD>");');
	document.writeln('	win.document.writeln("<TITLE>Carta dei Bioritmi</TITLE></HEAD>");');

	rigo='<meta name="author" content="Giuseppe Capozzo">'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<link rel=stylesheet href="Stampa/bioritmi.css" type="text/css">'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<BODY onLoad="JavaScript:window.print();self.close()"><BR>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-6)+'; top: '+String(inizio-148)+'; width: '+String(largo)+'";
	rigo=rigo+'">';
	rigo=rigo+"');";
	document.writeln("win.document.writeln('"+rigo);

	rigo='<TABLE BORDER=0 WIDTH="'+String(largo)+'">'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<TR>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<TH WIDTH="96">'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<A HREF="http://www.shinystat.it/cgi-bin/shinystatv.cgi?USER=BioritmiCalcolo" target="_top">'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<img src="http://www.shinystat.it/cgi-bin/shinystat.cgi?USER=BioritmiCalcolo&NC=1" BORDER="0"></A>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<TD VALIGN="TOP"><p><b>www.bioritmi.info</b><br><i>calcoli on-line eseguiti dal 6 Aprile 2002.'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<TD>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='</TR></TABLE>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='</div>'
	rigo=rigo+"');";
	document.writeln("win.document.writeln('"+rigo);



	document.writeln('}');

	document.writeln('function ContinuaDisegno(pCompleto)');
	document.writeln('{');
	document.writeln('	var i=0;');
	document.writeln('	var GiornoC;');
	document.writeln('	var MeseC;');
	document.writeln('	var AnnoC;');
	document.writeln('	GiornoC=Giorno-DaInizio;');
	document.writeln('	MeseC=Mese;');
	document.writeln('	AnnoC=Anno;');
	document.writeln('	DataO=new Date(String(Mese)+"/"+String(Giorno)+"/"+String(Anno));');
	document.writeln('	Data=new Date(String(MeseC)+"/"+String(GiornoC)+"/"+String(AnnoC));');
	document.writeln('	if (GiornoC < 1) {');
	document.writeln('		MeseC=Mese-1;');
	document.writeln('		if (MeseC < 1) {');
	document.writeln('			MeseC=MeseC+12;');
	document.writeln('			AnnoC=Anno-1 }; ');
	document.writeln('		GiornoC=GiornoC+31 };');
	document.writeln('	Data=new Date(String(MeseC)+"/"+String(GiornoC)+"/"+String(AnnoC));');
	document.writeln('	var ii=1;');
	document.writeln('	while (DataO-Data < 860400000) {');
	document.writeln('		GiornoC=GiornoC-ii');
	document.writeln('		Data=new Date(String(MeseC)+"/"+String(GiornoC)+"/"+String(AnnoC));');
	document.writeln('		ii++ };');
	document.writeln('	while( i < 30) {');
	document.writeln('		Data=new Date(String(MeseC)+"/"+String(GiornoC+i)+"/"+String(AnnoC));');
	document.writeln('		GiornoSettimanale=Data.getDay()');
	document.writeln('		Giorni[i]=String(Data.getDate())');
	document.writeln('		if (i==0) MeseIn=Mesi[Data.getMonth()];');
	document.writeln('		DataTrasformata=GiorniSettimana[GiornoSettimanale]+" "+String(Data.getDate())+" "+Mesi[Data.getMonth()]+" "+String(Data.getYear());');
	document.writeln('		if (i==DaInizio) {');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(InizioDisegnoT)+'";
	rigo=rigo+'"><img src="Stampa/data.gif" width="';
	rigo=rigo+"'+String(scostamento)+'";
	rigo=rigo+'" height="';
	rigo=rigo+"'+String(alto-16)+'";
	rigo=rigo+'"></div>';
	rigo=rigo+"')}"; 
//	rigo='<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(InizioDisegnoT)+'"><img src="Stampa/data.gif" alt="'+String(DataTrasformata)+'" width="'+String(scostamento)+'" height="'+String(alto-16)+'"></div>')}'


	document.writeln("win.document.writeln('"+rigo);

	document.writeln('		else {');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(InizioDisegnoT)+'";
	rigo=rigo+'"><img src="Stampa/base.gif" width="';
	rigo=rigo+"'+String(scostamento)+'";
	rigo=rigo+'" height="';
	rigo=rigo+"'+String(alto-16)+'";
	rigo=rigo+'"></div>';
	rigo=rigo+"')"; 
//	rigo='	<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(InizioDisegnoT)+'"><img src="Stampa/base.gif" alt="'+String(DataTrasformata)+'" width="'+String(scostamento)+'" height="'+String(alto-16)+'"></div>'+chr(39)+')' 

	document.writeln("win.document.writeln('"+rigo);
	document.writeln('		};');
	document.writeln('		MeseFi=Mesi[Data.getMonth()];');
	document.writeln('		i++');
	document.writeln('	};');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL)+'; top: '+String(PosizioneEtichettaT)+'; width: 200; height: 20";
	rigo=rigo+'"><p style="background-color: #FFFFD0; border-right-style: groove; border-bottom-style: groove">&nbsp;</div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL+10)+'; top: '+String(PosizioneEtichettaT+1)+'";
	rigo=rigo+'"><H6>Nato il</H6></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	Data=new Date(String(MeseN)+"/"+String(GiornoN)+"/"+String(AnnoN));');
	document.writeln('	DataTrasformata=String(Data.getDate())+" "+Mesi[Data.getMonth()]+" "+String(Data.getYear());');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL+50)+'; top: '+String(PosizioneEtichettaT+1)+'";
	rigo=rigo+'"><H6><b>';
	rigo=rigo+"'+DataTrasformata+'</b></H6></div>');";
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL+210)+'; top: '+String(PosizioneEtichettaT)+'; width: 200; height: 20";
	rigo=rigo+'"><p style="background-color: #FFFFD0; border-right-style: groove; border-bottom-style: groove">&nbsp;</div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL+220)+'; top: '+String(PosizioneEtichettaT+1)+'";
	rigo=rigo+'"><H6>Calcolo al</H6></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	Data=new Date(String(Mese)+"/"+String(Giorno)+"/"+String(Anno));');
	document.writeln('	DataTrasformata=String(Data.getDate())+" "+Mesi[Data.getMonth()]+" "+String(Data.getYear());');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(PosizioneEtichettaL+280)+'; top: '+String(PosizioneEtichettaT+1)+'";
	rigo=rigo+'"><H6><b>';
	rigo=rigo+"'+DataTrasformata+'</b></H6></div>');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+9)+'";
	rigo=rigo+'"><img src="Stampa/linea.gif" width="';
	rigo=rigo+"'+String(scostamento*30+10)+'";
	rigo=rigo+'" height="3"></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(combinato+7)+'";
	rigo=rigo+'"><img src="Stampa/linea.gif" width="';
	rigo=rigo+"'+String(scostamento*30+10)+'";
	rigo=rigo+'" height="3"></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL+20)+'; top: '+String(alto-(scostamento*2)+26+InizioDisegnoT)+'; width: 520; height: 60";
	rigo=rigo+'"><H6><i>Ogni banda sullo sfondo rappresenta un giorno: quella chiara mostra il giorno di calcolo.'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<BR>In basso la rappresentazione grafica dello stato energetico ed il calendario del mese.'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='</H6></div>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	if (SeSesso == 0) {');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+78)+'";
	rigo=rigo+'"><img src="Stampa/100.gif" alt="Linea di massima energia"></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+114)+'";
	rigo=rigo+'"><img src="Stampa/50.gif" alt="Energia 50%"></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+150)+'";
	rigo=rigo+'"><img src="Stampa/0.gif" alt="Energia 0%"></div>';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-7)+'; top: '+String(inizio+87)+'";
	rigo=rigo+'"><img src="Stampa/lv.gif" alt="Scala" width="3" height="74"></div>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	}');
	document.writeln('}');

	document.writeln('function DisegnaFineGrafico(pLink)');
	document.writeln('{');

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL)+'; top: '+String(inizio+174)+'";
	rigo=rigo+'">';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<TABLE class=data><TR><TD>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	win.document.write(MeseIn);');

	rigo='</tr></table></div>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL+360)+'; top: '+String(inizio+174)+'";
	rigo=rigo+'">';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<TABLE class=data width="182"><TR align="right"><TD>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('	win.document.write	(MeseFi);');

	rigo='</tr></table></div>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL)+'; top: '+String(inizio+186)+'";
	rigo=rigo+'">';
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	rigo='<TABLE class=data><TR>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	document.writeln('	i=0');
	document.writeln('	while( i < 30) {');

//	rigo='<TD width="14">'+Giorni[i]+');'
	rigo="<TD width=14>'+Giorni[i]);";
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('		i++;');
	document.writeln('	}');

	rigo='</tr></table></div>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+246)+'";
	rigo=rigo+'"><img src="Stampa/linea.gif" width="';
	rigo=rigo+"'+String(scostamento*30+10)+'";
	rigo=rigo+'" height=3></div>';
	rigo=rigo+"');";
	document.writeln("win.document.writeln('"+rigo);
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(InizioDisegnoL-5)+'; top: '+String(inizio+260)+'; width: '+String(largo+20)+'";
	rigo=rigo+'">';
	rigo=rigo+"');";
	document.writeln("win.document.writeln('"+rigo);
	rigo='<P></i>Grazie per aver visitato <b>www.bioritmi.info</b>.'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	rigo='</div>'
	rigo=rigo+"');";
	document.writeln("win.document.writeln('"+rigo);
	rigo='</BODY></HTML>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);
	document.writeln('	win.document.close();');
	document.writeln('}');

	document.writeln('function DisegnaFine()');
	document.writeln('{');

	rigo='</BODY></HTML>'
	rigo=rigo+"');"
	document.writeln("win.document.writeln('"+rigo);

	document.writeln('}');

	document.writeln('function DisegnaCicli()');
	document.writeln('{');
	document.writeln('	DisegnaFisico()');
	document.writeln('	DisegnaEmotivo()');
	document.writeln('	DisegnaIntellettivo()');
	document.writeln('	DisegnaGrafico("Completo")');
	document.writeln('}');

	document.writeln('function DisegnaGrafico(pTipoCalcolo)');
	document.writeln('{');
	document.writeln('	var Limite1=21;');
	document.writeln('	var Limite2=33;');
	document.writeln('	var Limite3=45;');
	document.writeln('	var i=0;');
	document.writeln('	var Ciclo1=23;');
	document.writeln('	var Ciclo2=28;');
	document.writeln('	var Ciclo3=33;');
	document.writeln('	var Valore1;');
	document.writeln('	var Valore2;');
	document.writeln('	var Valore3;');
	document.writeln('	var Bi;');
	document.writeln('	var Ci;');
	document.writeln('	var Ai;');
	document.writeln('	var c;');
	document.writeln('	var Energia;');
	document.writeln('	while( i < 30){');
	document.writeln('		c=0;');
	document.writeln('		Valore1=cFisico+i');
	document.writeln('		Valore2=cEmotivo+i;');
	document.writeln('		Valore3=cIntellettivo+i');
	document.writeln('		if (Valore1 > -1) {');
	document.writeln('			if (Valore1 >= Ciclo1) {Valore1=Valore1-Ciclo1};');
	document.writeln('			if (Valore1 >= Ciclo1) {Valore1=Valore1-Ciclo1};');
	document.writeln('			if (Valore2 >= Ciclo2) {Valore2=Valore2-Ciclo2};');
	document.writeln('			if (Valore2 >= Ciclo2) {Valore2=Valore2-Ciclo2};');
	document.writeln('			if (Valore3 >= Ciclo3) {Valore3=Valore3-Ciclo3};');
	document.writeln('			if (Valore3 >= Ciclo3) {Valore3=Valore3-Ciclo3};');
	document.writeln('			if (pTipoCalcolo=="Fisico"){Energia=avFisico[Valore1]*3};');
	document.writeln('			if (pTipoCalcolo=="Emozionale"){Energia=avEmotivo[Valore2]*3};');
	document.writeln('			if (pTipoCalcolo=="Intellettuale"){Energia=avIntellettivo[Valore3]*3};');
	document.writeln('			if (pTipoCalcolo=="Completo"){Energia=avFisico[Valore1]+avEmotivo[Valore2]+avIntellettivo[Valore3]};');
	document.writeln('			if (Energia < Limite1) {');
	document.writeln('				Bi="BRosso.gif";');
	document.writeln('				Ci="CRosso.gif";');
	document.writeln('				Ai="ARosso.gif";');
	document.writeln('			} else { ');
	document.writeln('				if (Energia < Limite2) {');
	document.writeln('					Bi="BRosa.gif";');
	document.writeln('					Ci="CRosa.gif";');
	document.writeln('					Ai="ARosa.gif";');
	document.writeln('				} else {');
	document.writeln('					if (Energia < Limite3) {');
	document.writeln('						Bi="BGiallo.gif";');
	document.writeln('						Ci="CGiallo.gif";');
	document.writeln('						Ai="AGiallo.gif";');
	document.writeln('					} else {');
	document.writeln('						Bi="BBlu.gif";');
	document.writeln('						Ci="CBlu.gif";');
	document.writeln('						Ai="ABlu.gif";');
	document.writeln('					};');
	document.writeln('				};');
	document.writeln('			};');

//	rigo='	<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato)+'"><img src="'+Bi+'" alt="Energia '+ValoreEnergia(Energia)+'" width="'+String(scostamento)+'" height="4"></div>);'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato)+'";
	rigo=rigo+'"><img src="';
	rigo=rigo+"'+Bi+'";
	rigo=rigo+'" width="';
	rigo=rigo+"'+String(scostamento)+'";
	rigo=rigo+'" height=4></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);
//	rigo='	<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato-Energia)+'"><img src="'+Ci+'" alt="Energia '+ValoreEnergia(Energia)+'" width="'+String(scostamento)+'" height="'+String(Energia)+'"></div>);'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato-Energia)+'";
	rigo=rigo+'"><img src="';
	rigo=rigo+"'+Ci+'";
	rigo=rigo+'" width="';
	rigo=rigo+"'+String(scostamento)+'";
	rigo=rigo+'" height="';
	rigo=rigo+"'+String(Energia)+'";
	rigo=rigo+'"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);
//	rigo='	<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato-Energia-4)+'"><img src="'+Ai+'" alt="Energia '+ValoreEnergia(Energia)+'" width="'+String(scostamento)+'" height="4"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL+1)+'; top: '+String(combinato-Energia-4)+'";
	rigo=rigo+'"><img src="';
	rigo=rigo+"'+Ai+'";
	rigo=rigo+'" width="';
	rigo=rigo+"'+String(scostamento)+'";
	rigo=rigo+'" height=4></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('		};');
	document.writeln('		i++');
	document.writeln('	};');
	document.writeln('}');

	document.writeln('function ValoreEnergia(pEnergia)');
	document.writeln('{');
	document.writeln('	var limite=69;');
	document.writeln('	return String(parseInt(pEnergia/limite*100))+"%"');
	document.writeln('}');

	document.writeln('function DisegnaFisico()');
	document.writeln('{');
	document.writeln('	var i=0;');
	document.writeln('	var Ciclo=23;');
	document.writeln('	var Valore;');
	document.writeln('	var c;');
	document.writeln('	var Critico;');
	document.writeln('	while( i < 30){');
	document.writeln('		c=0;');
	document.writeln('		Critico=0;');
	document.writeln('		Valore=cFisico+i');
	document.writeln('		if (Valore > -1) {');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			while( c < 3) {');
	document.writeln('				if (Valore==acFisico[c]) {Critico=1}');
	document.writeln('				c++');
	document.writeln('			};');
	document.writeln('			if (Critico==1) {');

//	rigo='		<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'"><img src="Stampa/FRosso.gif" alt="Fisico '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'";
	rigo=rigo+'"><img src="Stampa/FRosso.gif"></div>';
	rigo=rigo+"');";


	document.writeln("win.document.writeln('"+rigo);

	document.writeln('			} else { ');
	document.writeln('				if (Valore < (Ciclo/2)) {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'"><img src="Stampa/FScuro.gif" alt="Fisico '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'";
	rigo=rigo+'"><img src="Stampa/FScuro.gif"></div>';
	rigo=rigo+"');";


	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				} else {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'"><img src="Stampa/FChiaro.gif" alt="Fisico '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apFisico[Valore])+'";
	rigo=rigo+'"><img src="Stampa/FChiaro.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				};');
	document.writeln('			};');
	document.writeln('		};');
	document.writeln('		i++');
	document.writeln('	};');
	document.writeln('}');


	document.writeln('function DisegnaEmotivo()');
	document.writeln('{');
	document.writeln('	var i=0;');
	document.writeln('	var Ciclo=28;');
	document.writeln('	var Valore;');
	document.writeln('	var c;');
	document.writeln('	var Critico;');
	document.writeln('	while( i < 30) {');
	document.writeln('		c=0;');
	document.writeln('		Critico=0;');
	document.writeln('		Valore=cEmotivo+i;');
	document.writeln('		if (Valore > -1) {');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			while( c < 2) {');
	document.writeln('				if (Valore==acEmotivo[c]) {Critico=1}');
	document.writeln('				c++');
	document.writeln('			};');
	document.writeln('			if (Critico==1) {');

//	rigo='		<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'"><img src="Stampa/ERosso.gif" alt="Emotivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/ERosso.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('			} else { ');
	document.writeln('				if (Valore < (Ciclo/2)) {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'"><img src="Stampa/EScuro.gif" alt="Emotivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/EScuro.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				} else {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'"><img src="Stampa/EChiaro.gif" alt="Emotivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apEmotivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/EChiaro.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				};');
	document.writeln('			};');
	document.writeln('		};');
	document.writeln('		i++');
	document.writeln('	};');
	document.writeln('}');

	document.writeln('function DisegnaIntellettivo()');
	document.writeln('{');
	document.writeln('	var i=0;');
	document.writeln('	var Ciclo=33;');
	document.writeln('	var Valore;');
	document.writeln('	var c;');
	document.writeln('	var Critico;');
	document.writeln('	while( i < 30) {');
	document.writeln('		c=0;');
	document.writeln('		Critico=0;');
	document.writeln('		Valore=cIntellettivo+i');
	document.writeln('		if (Valore > -1) {');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			if (Valore >= Ciclo) {Valore=Valore-Ciclo};');
	document.writeln('			while( c < 3) {');
	document.writeln('				if (Valore==acIntellettivo[c]) {Critico=1}');
	document.writeln('				c++');
	document.writeln('			};');
	document.writeln('			if (Critico==1) {');

//	rigo='		<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'"><img src="Stampa/IRosso.gif" alt="Intellettivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/IRosso.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('			} else { ');
	document.writeln('				if (Valore < (Ciclo/2)) {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'"><img src="Stampa/IScuro.gif" alt="Intellettivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/IScuro.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				} else {');

//	rigo='			<div style="position: absolute; left: '+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'"><img src="Stampa/IChiaro.gif" alt="Intellettivo '+String(Valore)+'"></div>'+chr(39)+')'
	rigo='<div style="position: absolute; left: ';
	rigo=rigo+"'+String(scostamento*(i)+InizioDisegnoL)+'; top: '+String(inizio+apIntellettivo[Valore])+'";
	rigo=rigo+'"><img src="Stampa/IChiaro.gif"></div>';
	rigo=rigo+"');";

	document.writeln("win.document.writeln('"+rigo);

	document.writeln('				};');
	document.writeln('			};');
	document.writeln('		};');
	document.writeln('		i++');
	document.writeln('	};');
	document.writeln('}');
}