function tplot(data,draw,pos,UNITCONVERT,DIS,color,plotaxis,lines)
%data為需畫數據,數據按行存貯
%draw為需畫的行號,如[1 5 3],draw(1)為橫軸變量
%pos為需畫的列號,如[2,4:5]
%UNICONVERT為單位換算,可為一個倍數,或一個函數如{1,0.1,'sin'}
%DIS為對各行量的描述,如{'time','temperature','density'}
%color為各曲線顏色，如{'r','b'};
%plotaxis為所畫的軸的句柄
%lines為所要更改的曲線

%------截取數據-------
m=size(data,1);%行數
for i=1:m
    t(i,:)=data(i,pos);
end
data=t;clear t;
for i=1:length(draw)
    t(i,:)=data(draw(i),:);
end
data=t;clear t;
%-----------------------  

%-----單位換算------
s=size(data);
m=s(1);%行數
for i=1:m
    if ischar(UNITCONVERT{draw(i)})
        func=UNITCONVERT{draw(i)};        
        data(i,:)=eval([func,'(','data(i,:)',')']);
    elseif UNITCONVERT{draw(i)}
        times=UNITCONVERT{draw(i)};
        data(i,:)=data(i,:)*times;
    end
end
%--------------------

for i=2:length(draw)
    c=color{i-1};
      set(lines(i-1),'xdata',data(1,:),'ydata',data(i,:),'color',c, 'tag',num2str(DIS{draw(i)}));
%    line(data(1,:),data(i,:),'color',c,'parent',plotaxis,'EraseMode','none', 'tag',num2str(DIS{draw(i)}));
end

drawnow