매틀랩을 이용한 고체 전단력선도 굽힘모멘트선도 처짐곡선 프로그램

소개글

매틀랩을 이용한 고체 전단력선도 굽힘모멘트선도 처짐곡선 프로그램에 대한 보고서 자료입니다.

본문내용

,\'value\')==1 %단순지지보
subplot(3,2,5)
set(gca,\'color\',\'w\')
title(\'보 그림\',\'fontweight\',\'bold\',\'fontsize\',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h/2,h/2])
line([L,L],[-h/2,h/2])
line([a,a],[h/2,4*h])%화살표
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,L/20],[-h/2,-3*h])%왼쪽 지지대
line([0,-L/20],[-h/2,-3*h])%왼쪽 지지대
line([-L/10,L/10],[-3*h,-3*h])%바닥
line([L,L+L/20],[-h/2,-3*h])%왼쪽 지지대
line([L,L-L/20],[-h/2,-3*h])%왼쪽 지지대
line([L-L/10,L+L/10],[-3*h,-3*h])%바닥
line([0,-L/50],[-3*h,-4*h])%오른쪽 빗금
line([-L/50*2,-L/50*3],[-3*h,-4*h])
line([-L/50*4,-L/50*5],[-3*h,-4*h])
line([L/50*2,L/50],[-3*h,-4*h])
line([L/50*4,L/50*3],[-3*h,-4*h])
line([L,L-L/50],[-3*h,-4*h])%왼쪽 빗금
line([L-L/50*2,L-L/50*3],[-3*h,-4*h])
line([L-L/50*4,L-L/50*5],[-3*h,-4*h])
line([L+L/50*2,L+L/50],[-3*h,-4*h])
line([L+L/50*4,L+L/50*3],[-3*h,-4*h])
elseif get(beam(2),\'value\')==1 %단순지지보
subplot(3,2,5)
set(gca,\'color\',\'w\')
title(\'보 그림\',\'fontweight\',\'bold\',\'fontsize\',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h*3,h*3])
line([L,L],[-h/2,h/2])
line([a,a],[h/2,4*h])%화살표축
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,-L/20],[0,-h])%강체
line([0,-L/20],[-h,-h*2])
line([0,-L/20],[-h*2,-h*3])
line([0,-L/20],[h,0])
line([0,-L/20],[h*2,h])
line([0,-L/20],[h*3,h*2])
elseif get(beam(3),\'value\')==1 %양단고정보
subplot(3,2,5)
set(gca,\'color\',\'w\')
title(\'보 그림\',\'fontweight\',\'bold\',\'fontsize\',11)
axis([-L/5,L+L/5,-h*5,h*5])
line([0,L],[h/2,h/2])%보
line([0,L],[-h/2,-h/2])
line([0,0],[-h*3,h*3])
line([L,L],[-h*3,h*3])
line([a,a],[h/2,4*h])%화살표
line([a,a-L/50],[h/2,2*h])
line([a,a+L/50],[h/2,2*h])
line([0,-L/20],[0,-h])%외쪽강체
line([0,-L/20],[-h,-h*2])
line([0,-L/20],[-h*2,-h*3])
line([0,-L/20],[h,0])
line([0,-L/20],[h*2,h])
line([0,-L/20],[h*3,h*2])
line([L,L+L/20],[-h,0])%오른쪽강체
line([L,L+L/20],[-h*2,-h])
line([L,L+L/20],[-h*3,-h*2])
line([L,L+L/20],[0,h])
line([L,L+L/20],[h,h*2])
line([L,L+L/20],[h*2,h*3])
end
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 배 타 적 선 택 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function exchoice1(state1)
global beam
state_max1=length(beam);
if get( beam(state1),\'value\')==1
set( beam([1:(state1-1),(state1+1):state_max1]),\'value\',0);
end
function exchoice2(state2)
global section Q T
state_max2=length(section);
if get( section(state2),\'value\')==1
set( section([1:(state2-1),(state2+1):state_max2]),\'value\',0);
if get( section(1),\'value\')==1
set(T(1),\'visible\',\'on\')
set(T(2),\'visible\',\'on\')
set(T(3),\'visible\',\'on\')
set(T(4),\'visible\',\'off\')
set(Q(5),\'visible\',\'on\')
set(Q(5),\'enable\',\'on\')
elseif get( section(2),\'value\')==1
set(T(1),\'visible\',\'off\')
set(T(2),\'visible\',\'off\')
set(T(3),\'visible\',\'off\')
set(T(4),\'visible\',\'on\')
set(T(5),\'visible\',\'off\')
set(Q(5),\'visible\',\'off\')
set(Q(5),\'enable\',\'off\')
end
end
function exchoice3(state3)
global materials
state_max3=length(materials);
if get( materials(state3),\'value\')==1
set( materials([1:(state3-1),(state3+1):state_max3]),\'value\',0);
end

키워드

매틀랩,   고체,   프로젝트,   수치해석,   프로그램,   보처짐,   매틀랩코딩