aydinlatma-lamba-armatur-hesaplamalari-cozumleri - 320Volt
aydinlatma-lamba-armatur-hesaplamalari-cozumleri - 320Volt
aydinlatma-lamba-armatur-hesaplamalari-cozumleri - 320Volt
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
82<br />
EK-2 (Devam) Bilgisayar Programının Kodu<br />
EHandle = findobj(gcf, 'Tag', 'edit1');<br />
fHandle = findobj(gcf, 'Tag', 'edit9');<br />
mHandle = findobj(gcf, 'Tag', 'edit3');<br />
tHandle = findobj(gcf, 'Tag', 'edit12');<br />
uHandle = findobj(gcf, 'Tag', 'edit13');<br />
%zHandle = findobj(gcf, 'Tag', 'edit14');<br />
a = str2num(get(aHandle, 'String'));<br />
b = str2num(get(bHandle, 'String'));<br />
c = str2num(get(cHandle, 'String'));<br />
d = str2num(get(dHandle, 'String'));<br />
E = str2num(get(EHandle, 'String'));<br />
f = str2num(get(fHandle, 'String'));<br />
m = str2num(get(mHandle, 'String'));<br />
t = str2num(get(tHandle, 'String'));<br />
u = str2num(get(uHandle, 'String'));<br />
%z = str2num(get(zHandle, 'String'));<br />
z = str2num(get(hObject, 'String'));<br />
S = E*a*b*d/...<br />
(f*((0.008* (a*b/((m-c)*(a+b)))^3 - ...<br />
0.093* (a*b/((m-c)*(a+b)))^2 + ...<br />
0.39* (a*b/((m-c)*(a+b))) +0.049) ...<br />
* (1- (0.66*(0.8-t))) ...<br />
- 2*(0.5-u)/10 ...<br />
- (a*b/((m-c)*(a+b)))*(0.3-z)/100));<br />
set(SHandle, 'String', num2str(S));<br />
function edit14_CreateFcn(hObject, eventdata, handles)<br />
if ispc && isequal(get(hObject,'BackgroundColor'),<br />
get(0,'defaultUicontrolBackgroundColor'))<br />
set(hObject,'BackgroundColor','white');<br />
end