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

70
EK-2 (Devam) Bilgisayar Programının Kodu
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 edit2_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'),
get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function edit3_Callback(hObject, eventdata, handles)
kHandle = findobj(gcf, 'Tag', 'edit8');
aHandle = findobj(gcf, 'Tag', 'edit7');
bHandle = findobj(gcf, 'Tag', 'edit2');
cHandle = findobj(gcf, 'Tag', 'edit4');
%mHandle = findobj(gcf, 'Tag', 'edit3');
a = str2num(get(aHandle, 'String'));
b = str2num(get(bHandle, 'String'));
c = str2num(get(cHandle, 'String'));
% m = str2num(get(mHandle, 'String'));
m = str2num(get(hObject, 'String'));
set(kHandle, 'String', num2str((a*b)/((m-c)*(a+b))));
SHandle = findobj(gcf, 'Tag', 'edit10');
SIntHandle = findobj(gcf, 'Tag', 'edit11');
aHandle = findobj(gcf, 'Tag', 'edit7');
bHandle = findobj(gcf, 'Tag', 'edit2');
cHandle = findobj(gcf, 'Tag', 'edit4');