<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1253">
<META content="MSHTML 6.00.6000.16981" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2>Hello everyone,</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>I'm trying to create a XY plot (actually a spaghetti plot)
using a .txt file as data source.</FONT></DIV>
<DIV><FONT size=2>Part of my script is :</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2><SPAN lang=E>
<P><EM><FONT size=3>while (1)</FONT></EM></P>
<P><EM><FONT size=3>ret = read(My.File)</FONT></EM></P>
<P><EM><FONT size=3>rc = sublin(ret,1)</FONT></EM></P>
<P><EM><FONT size=3>if (rc>0) </FONT></EM></P>
<P><EM><FONT size=3>break</FONT></EM></P>
<P><EM><FONT size=3>endif</FONT></EM></P>
<P><EM><FONT size=3>rec = sublin(ret,2)</FONT></EM></P>
<P><EM><FONT size=3>x = subwrd(rec,1)</FONT></EM></P>
<P><EM><FONT size=3>y = subwrd(rec,2)</FONT></EM></P>
<P><EM><FONT size=3>x = 1.0+(x-xmin)*xdif</FONT></EM></P>
<P><EM><FONT size=3>y = 1.5+(y-ymin)*ydif</FONT></EM></P>
<P><EM><FONT size=3>i=1</FONT></EM></P>
<P><EM><FONT size=3>while (i<21)</FONT></EM></P>
<P><EM><FONT size=3>z.i = subwrd(rec,i+2)</FONT></EM></P>
<P><EM><FONT size=3>z.i = 1.5+(z.i-ymin)*ydif</FONT></EM></P>
<P><EM><FONT size=3>k.i=i+21</FONT></EM></P>
<P><EM><FONT size=3>say x' 'y' 'z.i' 'k.i</FONT></EM></P>
<P><EM><FONT size=3>if (first) </FONT></EM></P>
<P><EM><FONT size=3>'set line 1 1 8'</FONT></EM></P>
<P><EM><FONT size=3>'draw line 'xold' 'yold' 'x' 'y</FONT></EM></P>
<P><EM><FONT size=3>'set line 0' </FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'yold' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 21'</FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'yold' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 'k.i' 1 3'</FONT></EM></P>
<P><EM><FONT size=3>'draw line 'xold' 'oldz.i' 'x' 'z.i</FONT></EM></P>
<P><EM><FONT size=3>'set line 0' </FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'oldz.i' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 'k.i</FONT></EM></P>
<P><EM><FONT size=3>'draw mark 4 'xold' 'oldz.i' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>endif</FONT></EM></P>
<P><EM><FONT size=3>first = 1</FONT></EM></P>
<P><EM><FONT size=3>xold = x</FONT></EM></P>
<P><EM><FONT size=3>yold = y</FONT></EM></P>
<P><EM><FONT size=3>oldz.i = z.i</FONT></EM></P>
<P><EM><FONT size=3>'set line 0' </FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'yold' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 21'</FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'yold' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 0' </FONT></EM></P>
<P><EM><FONT size=3>'draw mark 3 'xold' 'oldz.i' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>'set line 'k.i</FONT></EM></P>
<P><EM><FONT size=3>'draw mark 4 'xold' 'oldz.i' 0.05'</FONT></EM></P>
<P><EM><FONT size=3>i=i+1</FONT></EM></P>
<P><EM><FONT size=3>endwhile</FONT></EM></P>
<P><EM><FONT size=3>endwhile</FONT></EM></P></SPAN> </FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>But besides the white line (<EM><FONT size=3>'set line 1 1
8'</FONT></EM>) it only plots the first line ( <EM><FONT size=3>'set line 'k.i'
1 3' </FONT></EM>defined by i=1, or whatever value I
give to i) ignoring the while loop!</FONT></DIV>
<DIV><FONT size=2>Any help it would be much appreciated</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>Best Regards,</FONT></DIV>
<DIV><FONT size=2>Dimitris</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV>
<DIV class=Section1>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial Rounded MT Bold'">--------------------------------------------------------------------------------------------<BR></SPAN><STRONG><SPAN
style="FONT-SIZE: 10pt; COLOR: navy; FONT-FAMILY: 'Arial Rounded MT Bold'">Dr.
Dimitrios K. Katsanos</SPAN></STRONG></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial Rounded MT Bold'">--------------------------------------------------------------------------------------------</SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 10pt; COLOR: teal; FONT-FAMILY: 'Arial Rounded MT Bold'">National
Observatory of Athens<BR>Institute for Environmental Research<BR>Lofos Koufou
15236-Penteli<BR>Athens-Greece</SPAN></P>
<P class=MsoNormal><STRONG><I><SPAN
style="FONT-SIZE: 10pt; COLOR: gray; FONT-FAMILY: 'Arial Rounded MT Bold'">T</SPAN></I></STRONG><SPAN
style="FONT-SIZE: 10pt; COLOR: gray; FONT-FAMILY: 'Arial Rounded MT Bold'">:
+30 210 8109136 <BR><EM><B><SPAN
style="FONT-FAMILY: 'Arial Rounded MT Bold'">F</SPAN></B></EM>: +30 210
8103236<BR><EM><B><SPAN
style="FONT-FAMILY: 'Arial Rounded MT Bold'">M:</SPAN></B></EM> +30 697
4598389</SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Arial Rounded MT Bold'"><A
href="http://www.noa.gr/forecast">http://www.noa.gr/forecast</A> (NOA Weather
forecasts in English)<BR><A href="http://www.meteo.gr">http://www.meteo.gr</A>
(NOA Weather forecasts in Greek)</SPAN></P></DIV></DIV></BODY></HTML>