end% Save the new hrr valueMparam.hrr = hrr;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function hrr_CreateFcn(hObject, eventdata, handles)% hObject    handle to hrr (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction htt_Callback(hObject, eventdata, handles)% hObject    handle to htt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of htt as text%        str2double(get(hObject,'String')) returns contents of htt as a doubleMparam=evalin('base','Mparam');htt = str2double(get(hObject, 'String'));if isnan(htt)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new htt valueMparam.htt = htt;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function htt_CreateFcn(hObject, eventdata, handles)% hObject    handle to htt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction u_Callback(hObject, eventdata, handles)% hObject    handle to u (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of u as text%        str2double(get(hObject,'String')) returns contents of u as a doubleMparam=evalin('base','Mparam');u = str2double(get(hObject, 'String'));if isnan(u)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new u valueMparam.u = u;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function u_CreateFcn(hObject, eventdata, handles)% hObject    handle to u (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction Pt_Callback(hObject, eventdata, handles)% hObject    handle to Pt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of Pt as text%        str2double(get(hObject,'String')) returns contents of Pt as a doubleMparam=evalin('base','Mparam');Pt = str2double(get(hObject, 'String'));if isnan(Pt)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new Pt valueMparam.Pt = Pt;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function Pt_CreateFcn(hObject, eventdata, handles)% hObject    handle to Pt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction Dt_Callback(hObject, eventdata, handles)% hObject    handle to Dt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of Dt as text%        str2double(get(hObject,'String')) returns contents of Dt as a doubleMparam=evalin('base','Mparam');Dt = str2double(get(hObject, 'String'));if isnan(Dt)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new Dt valueMparam.Dt = Dt;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function Dt_CreateFcn(hObject, eventdata, handles)% hObject    handle to Dt (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction Dr_Callback(hObject, eventdata, handles)% hObject    handle to Dr (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of Dr as text%        str2double(get(hObject,'String')) returns contents of Dr as a doubleMparam=evalin('base','Mparam');Dr = str2double(get(hObject, 'String'));if isnan(Dr)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new Dr valueMparam.Dr = Dr;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function Dr_CreateFcn(hObject, eventdata, handles)% hObject    handle to Dr (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction Gamma_Callback(hObject, eventdata, handles)% hObject    handle to Gamma (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of Gamma as text%        str2double(get(hObject,'String')) returns contents of Gamma as a doubleMparam=evalin('base','Mparam');Gamma = str2double(get(hObject, 'String'));if isnan(Gamma)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new Gamma valueMparam.Gamma = Gamma;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function Gamma_CreateFcn(hObject, eventdata, handles)% hObject    handle to Gamma (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction PrSigma_Callback(hObject, eventdata, handles)% hObject    handle to PrSigma (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of PrSigma as text%        str2double(get(hObject,'String')) returns contents of PrSigma as a doubleMparam=evalin('base','Mparam');PrSigma = str2double(get(hObject, 'String'));if isnan(PrSigma)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new PrSigma valueMparam.PrSigma = PrSigma;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function PrSigma_CreateFcn(hObject, eventdata, handles)% hObject    handle to PrSigma (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction Ls_Callback(hObject, eventdata, handles)% hObject    handle to Ls (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of Ls as text%        str2double(get(hObject,'String')) returns contents of Ls as a doubleMparam=evalin('base','Mparam');Ls = str2double(get(hObject, 'String'));if isnan(Ls)    set(hObject, 'String', 0);    errordlg('必須輸入一個數字','錯誤');end% Save the new Ls valueMparam.Ls = Ls;assignin('base','Mparam',Mparam);% --- Executes during object creation, after setting all properties.function Ls_CreateFcn(hObject, eventdata, handles)% hObject    handle to Ls (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.%       See ISPC and COMPUTER.if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))    set(hObject,'BackgroundColor','white');endfunction DeltaR_Callback(hObject, eventdata, handles)% hObject    handle to DeltaR (see GCBO)% eventdata  reserved - to be defined in a future version of MATLAB% handles    structure with handles and user data (see GUIDATA)% Hints: get(hObject,'String') returns contents of DeltaR as text%        str2double(get(hObject,'String')) returns contents of DeltaR as a doubleMparam=evalin('base','Mparam');