www.pudn.com > WCDMA.rar > SimMenu.m

function fig = SimMenu(sam) 
%************************************************************ 
% 
% Copyright 2002 The Mobile and Portable Radio Research Group 
% 
% Part of GUI for downlink simulator. 
% Generates the Simulation Paramters menu  
% The only simulation paramter is the number of iterations 
% 
%************************************************************ 
 
global FrameHandle   
 
load ModulatorMenu 
 
bdwidth = 5; 
topbdwidth=30; 
ScreenSize = get(0,'ScreenSize'); 
Width = 386; 
Height = 186; 
right = round((ScreenSize(3)-Width)/2)-2*bdwidth; 
bottom = ScreenSize(4)-Height-4*topbdwidth; 
 
 
h0 = figure('Color',[0.8 0.8 0.8], ... 
	'Colormap',mat0, ... 
	'FileName','C:\MATLABR11\work\LGIChannel\DownlinkSimulator\gui\ModulatorMenu.m', ... 
	'PaperPosition',[18 180 576 432], ... 
	'PaperUnits','points', ... 
	'Position',[right bottom 386 186], ... 
	'Tag','Fig1', ... 
   'ToolBar','none'); 
 
% Object for Title 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[ 0.8 0.8 0.8], ... 
	'FontSize',18, ... 
	'ListboxTop',0, ... 
	'Position',[24.75 110 237 24], ... 
	'String','WCDMA Downlink Simulator', ... 
	'Style','text', ... 
   'Tag','StaticText1'); 
 
%Object for subtitle 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[ 0.8 0.8 0.8], ... 
	'FontSize',14, ... 
	'ListboxTop',0, ... 
	'Position',[34.5 55 198.75 50], ... 
	'String','Simulation Parameters', ... 
	'Style','text', ... 
   'Tag','StaticText2'); 
 
%Objects for Determining the Number of Frame to be Processed 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'FontSize',10, ... 
	'BackgroundColor',[ 0.8 0.8 0.8], ... 
	'HorizontalAlignment','left', ... 
	'ListboxTop',0, ... 
	'Position',[51.75 45 50 15], ... 
	'String','Simulate', ... 
	'Style','text', ... 
	'Tag','StaticText3'); 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'FontSize',10, ... 
	'BackgroundColor',[ 0.8 0.8 0.8], ... 
	'HorizontalAlignment','left', ... 
	'ListboxTop',0, ... 
	'Position',[170 45 141.25 15], ... 
	'String','Frames (iterations)', ... 
	'Style','text', ... 
	'Tag','StaticText5'); 
FrameHandle = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[ 1 1 1], ... 
	'ListboxTop',0, ... 
	'Position',[100 45 57 15], ... 
	'String','100' , ... 
	'Style','edit', ... 
	'Tag','Number of Frames Edit Menu'); 
 
%Navigation Buttons 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[0.831372549019608 0.815686274509804 0.784313725490196], ... 
	'ListboxTop',0, ... 
	'Position',[35.25 15 45 15], ... 
   	'Callback','close;ChannelMenu(SimConfig);',... 
	'String','<< Back', ... 
	'Tag','Pushbutton2'); 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[0.831372549019608 0.815686274509804 0.784313725490196], ... 
   	'ListboxTop',0, ... 
   	'Callback','GoSimulation',... 
	'Position',[103.5 15 45 15], ... 
	'String','Go', ... 
	'Tag','Pushbutton2'); 
h1 = uicontrol('Parent',h0, ... 
	'Units','points', ... 
	'BackgroundColor',[0.831372549019608 0.815686274509804 0.784313725490196], ... 
	'ListboxTop',0, ... 
   	'Position',[172.5 15 45 15], ... 
   	'Callback','close',... 
	'String','Cancel', ... 
   	'Tag','Pushbutton2'); 
 
if nargin == 1 
   if isfield(sam,'NumFrames') 
      if sam.NumFrames > 0 
         set(FrameHandle,'string',int2str(sam.NumFrames)); 
      end 
   end 
end 
        
if nargout > 0, fig = h0; end