quote:

---

getfilename *.*; // open file selection dialog... find your ASCII file
%Z=%B%A; // %A is selected file name, %B is its path
%P=%H; // plot name
%W=%[%C,'_']; // wks name. Next, define the TimerProc macro...
def TimerProc {
win -o %W {open -w %Z}; // import ASCII file to wks
lay -a; // rescale to show new data
};
timer 6; // run TimerProc every 6 seconds

---

quote:

---

Originally posted by long123

My problem is, that Origin plots the highest value for each sensor. But I need the latest value for each sensor to be plotted.

sbvdxfnbghm

---

string fname$ = E:\Test\TestData.txt;
impasc;
@glob=1;
range raIn = !; // For reimport
int inirows = count(col(1),!=""); // Count total data rows
//Suppose there are only 3 sensors
plotxy (wcol(1)[inirows-2:inirows],wcol(2)[inirows-2:inirows]) 215; // Plot last sensor set as bar plot
string gname$ = %H;
double olddate = exist(%(fname$),5); // Note the file date-time

def timerproc
{
    double newdate = exist(%(fname$),5); // Current file date-time
    if(newdate != olddate)
    {
        reimport orng:=raIn; // reimport if the file has changed
        olddate = newdate;
        win -c %(gname$); // Delete previous graph
        int nrows = count(col(1),!=""); 
        range rnewX = wcol(1)[nrows-2:nrows]; // Define a range to store last 3 X values
		range rnewY = wcol(2)[nrows-2:nrows]; // Define a range to store last 3 Y values
		plotxy (rnewX,rnewY) 215;
		string gname$ = %H;
    }
    else ty Nothing new ...; // Delete this line if not needed
}

@glob=0;
timer 10;

//timer -k;