jitter_s_net.m

good for who wants it

function varargout = jitter_s_net(h, eventdata, handles, varargin)
% trgraph
global NET HIST DELAY

DELAY=1;
HIST=0;
NET=1; % whole network
czyscosie;
[czy, opis]=czyopis('send event time', h, eventdata, handles);
if czy==0
    [opoz,id,stime,tr]=netdel(handles,1);
    if isempty(opoz)
        hplot=wykrespusty(handles);
        zapisz_wykres(0, opis, handles);
    else
        stime=stime(1:(end-1));
        opoz=abs(opoz(2:end)-opoz(1:(end-1))); % jitter(i)=abs((r(i+1)-s(i+1))-(r(i)-s(i)))
        [hplot,stime,opoz]=rysuj(stime, opoz, handles);
        zapisz_wykres([stime, opoz], opis, handles);
    end
    plot_info(opis, eventdata, hplot, handles);
	xylabel('packet send time at source node [sec]','jitter [sec]' , hplot, handles);
end
DELAY=0;
zapisz_wykres_jpg(opis,handles);