aydinlatma-lamba-armatur-hesaplamalari-cozumleri - 320Volt

76
EK-2 (Devam) Bilgisayar Programının Kodu
E = str2num(get(EHandle, 'String'));
f = str2num(get(fHandle, 'String'));
m = str2num(get(mHandle, 'String'));
t = str2num(get(tHandle, 'String'));
u = str2num(get(uHandle, 'String'));
z = str2num(get(zHandle, 'String'));
a = str2num(get(hObject, 'String'));
S = E*a*b*d/...
(f*((0.008* (a*b/((m-c)*(a+b)))^3 - ...
0.093* (a*b/((m-c)*(a+b)))^2 + ...
0.39* (a*b/((m-c)*(a+b))) +0.049) ...
* (1- (0.66*(0.8-t))) ...
- 2*(0.5-u)/10 ...
- (a*b/((m-c)*(a+b)))*(0.3-z)/100));
set(SHandle, 'String', num2str(S));
function edit7_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function edit8_Callback(hObject, eventdata, handles)
function edit8_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function listbox2_Callback(hObject, eventdata, handles)
index = get(hObject,'Value');
%selectedValue = CalcSelectedArmValue(index);
[phi, radius, e0] = CalcSelectedArmPhiRadiusDistValue(index);