30.01.2015 Views

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

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

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

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

74<br />

EK-2 (Devam) Bilgisayar Programının Kodu<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 />

d = 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 edit5_CreateFcn(hObject, eventdata, handles)<br />

if ispc && isequal(get(hObject,'BackgroundColor'),<br />

get(0,'defaultUicontrolBackgroundColor'))<br />

set(hObject,'BackgroundColor','white');<br />

end<br />

function edit6_Callback(hObject, eventdata, handles)<br />

function edit6_CreateFcn(hObject, eventdata, handles)<br />

if ispc && isequal(get(hObject,'BackgroundColor'),<br />

get(0,'defaultUicontrolBackgroundColor'))

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!