rendered paste bodyfunction EnterDataWindow
set(gcf, 'MenuBar', 'none');
set(gcf, 'Name', 'Statistics Calculator');
set(gcf, 'NumberTitle', 'off');
EnterDataButton=uicontrol;
set(EnterDataButton, 'String', 'Enter Data');
set(EnterDataButton, 'FontSize', 25)
set(EnterDataButton, 'Position', [30 250 500 50]);
set(EnterDataButton, 'Callback', {@EnterDataButtonCallback});
AnalyzeDataButton=uicontrol;
set(AnalyzeDataButton, 'String', 'Analyze Data');
set(AnalyzeDataButton, 'FontSize', 25)
set(AnalyzeDataButton, 'Position', [30 150 500 50]);
set(AnalyzeDataButton, 'Callback', {@AnalyzeDataButtonCallback});
function EnterDataButtonCallback(EnterDataButton, eventdata, handles)
set(EnterDataButton, 'Visible', 'off');
set(EnterDataButton, 'Enable', 'off');
set(AnalyzeDataButton, 'Visible', 'off');
set(AnalyzeDataButton, 'Enable', 'off');
set(Directions, 'Visible', 'on');
set(TitleTitle, 'Visible', 'on');
set(TitleEntry, 'Visible', 'on');
set(TitleEntry, 'Enable', 'on');
set(TextEnterButton, 'Visible', 'on');
set(TextEnterButton, 'Enable', 'on');
end
function AnalyzeDataButtonCallback(AnalyzeDataButton, eventdata, handles)
set(EnterDataButton, 'Visible', 'off');
set(EnterDataButton, 'Enable', 'off');
set(AnalyzeDataButton, 'Visible', 'off');
set(AnalyzeDataButton, 'Enable', 'off');
end
Data=[];
Directions=uicontrol;
set(Directions, 'style', 'Edit');
set(Directions, 'String', 'Enter the title of the data set in the box indicated below. When finished press the "Enter" button.');
set(Directions, 'Enable', 'inactive');
set(Directions, 'Position', [50 300 470 50]);
set(Directions, 'Visible', 'off');
TitleTitle=uicontrol;
set(TitleTitle, 'enable', 'inactive');
set(TitleTitle, 'String', 'Title:');
set(TitleTitle, 'Position', [170 200 50 20]);
set(TitleTitle, 'Visible', 'off');
TitleEntry=uicontrol;
set(TitleEntry, 'style', 'edit');
set(TitleEntry, 'Position', [220 200 140 20]);
set(TitleEntry, 'Visible', 'off');
set(TitleEntry, 'Enable', 'off');
TextEnterButton=uicontrol;
set(TextEnterButton, 'Position', [380 200 50 20]);
set(TextEnterButton, 'String', 'Enter');
set(TextEnterButton, 'Callback', {@TextEnterButtonCallback});
set(TextEnterButton, 'Visible', 'off');
set(TextEnterButton, 'Enable', 'off');
DataElementTitle=uicontrol;
set(DataElementTitle, 'enable', 'inactive');
set(DataElementTitle, 'String', ['Data Element :']);
set(DataElementTitle, 'Position', [120 150 100 20]);
set(DataElementTitle, 'Visible', 'off');
DataEntry=uicontrol;
set(DataEntry, 'style', 'edit');
set(DataEntry, 'Position', [220 150 140 20]);
set(DataEntry, 'Visible', 'off');
set(DataEntry, 'Enable', 'off');
DataEnterButton=uicontrol;
set(DataEnterButton, 'Position', [380 150 50 20]);
set(DataEnterButton, 'String', 'Enter');
set(DataEnterButton, 'Callback', {@DataEnterButtonCallback});
set(DataEnterButton, 'Visible', 'off');
set(DataEnterButton, 'Enable', 'off');
EnterDataDoneButton=uicontrol;
set(EnterDataDoneButton, 'Position', [500 20 50 20]);
set(EnterDataDoneButton, 'String', 'Done');
set(EnterDataDoneButton, 'Callback', {@EnterDataDoneButtonCallback});
set(EnterDataDoneButton, 'Visible', 'off');
set(EnterDataDoneButton, 'Enable', 'off');
function TextEnterButtonCallback(TextEnterButton, eventdata, handles)
x=10;
set(Directions, 'String', 'Enter the value of each successive data element, each one followed by the "Enter" button.');
set(TitleEntry, 'enable', 'off');
set(TitleTitle, 'enable', 'off');
set(TextEnterButton, 'enable', 'off');
set(DataElementTitle, 'enable', 'inactive');
set(DataElementTitle, 'Visible', 'on');
set(DataEntry, 'Visible', 'on');
set(DataEntry, 'Enable', 'on');
set(DataEnterButton, 'Enable', 'on');
set(DataEnterButton, 'Visible', 'on');
set(EnterDataDoneButton, 'Visible', 'on');
set(EnterDataDoneButton, 'Enable', 'on');
Title=get(TitleEntry, 'String');
set(TextEnterButton, 'UserData', Title);
end
function DataEnterButtonCallback(DataEnterButton, eventdata, handles)
Title=get(TextEnterButton, 'UserData');
x=[1 2 3];
assignin('caller', Title, x)
whos
end
function EnterDataDoneButtonCallback(EnterDataDoneButton, eventdata, handles)
end
end