eventr_proc.m

good for who wants it

function varargout = eventr_proc(h, eventdata, handles, varargin)
% trgraph
global NET DC DCONLY AKTWEZ HIST

DC=1;
DCONLY=1;
HIST=0;
NET=0; % whole network
czyscosie;
[czy, opis]=czyopis('receive event time', h, eventdata, handles);
if czy==0
    [opoz,id]=procwsp(handles,1);
    if isempty(opoz)
        hplot=wykrespusty(handles);
        zapisz_wykres(0, opis, handles);
    else
        [id,index]=sort(id);
        opoz=opoz(index);
        [hplot,id,opoz]=rysuj(id, opoz, handles);
        zapisz_wykres([id, opoz], opis, handles);
    end   
    plot_info(opis, eventdata, hplot, handles);
    xylabel(['receive event time at node ',num2str(AKTWEZ),' [sec]'],['processing time at node ', ...
            num2str(AKTWEZ),' [sec]'], hplot, handles);
end
DC=0;    
DCONLY=0;
zapisz_wykres_jpg(opis,handles);