ui_clr.m

有关信道估计和信道均衡的仿真程序

% this clears all trajectory traces and associated items for the BERGulator

% Copyright 1997-1998 Phil Schniter

 % keep all variables local in scope
 function [] = ui_clr();
 
 % declare global variables
 berg_global; ui_private_global;

 % delete all valid traces
 for i=1:length(h_trace_f)
   if ishandle(h_trace_f(i))==1, delete(h_trace_f(i)); end;
 end;
 for i=1:length(h_trace_fff)
   if ishandle(h_trace_fff(i))==1, delete(h_trace_fff(i)); end;
 end;
 for i=1:length(h_trace_i)
   if ishandle(h_trace_i(i))==1, delete(h_trace_i(i)); end;
 end;
 for i=1:length(h_trace_iii)
   if ishandle(h_trace_iii(i))==1, delete(h_trace_iii(i)); end;
 end;
 for i=1:length(h_trace_h)
   if ishandle(h_trace_h(i))==1, delete(h_trace_h(i)); end;
 end;
 for i=1:length(h_trace_t)
   if ishandle(h_trace_t(i))==1, delete(h_trace_t(i)); end;
 end;
 for i=1:length(h_trace_tt)
   if ishandle(h_trace_tt(i))==1, delete(h_trace_tt(i)); end;
 end;
 for i=1:length(h_trace_s)
   if ishandle(h_trace_s(i))==1, delete(h_trace_s(i)); end;
 end;
 for i=1:length(h_trace_b)
   if ishandle(h_trace_b(i))==1, delete(h_trace_b(i)); end;
 end;
 
 % clear trace lists
 h_trace_f = [];
 h_trace_i = [];
 h_trace_fff = [];
 h_trace_iii = [];
 h_trace_h = [];
 h_trace_t = [];
 h_trace_tt = [];
 h_trace_s = [];
 h_trace_b = [];

 % no valid simulations
 sim_ran = 0;

 % forget about maximum trace length
 N_max = []; 

 % remove upper message, ensure "sign boundaries", dim clear, enable spike 
 set(h_msg2, 'String','');	
 set(h_sign, 'String','Sign Boundaries');
 set(h_clr, 'Enable', 'off');
 %set(h_spike, 'Enable', 'on');