function [y1,y2,y3,y4,y5,y6,y7,y8,n]=mwTextRead(datafil);
[y1,y2,y3,y4,y5,y6,y7,y8]=textread(datafil,'%f %f %f %f %f %f %f %f'); %Считывание данных из файла *.txt  
n=length(y1);