clc
clear all
r=0.05;
l=0.01;
st=0.0001;
v=220;
Kf=18;
j=3;
Tl=60;
i=0;
w=0;
I=[];
W=[];
t=[];
for dt=0:0.0001:1
I=[I i];
t=[t dt];
W=[W w];
i=i+(((v-r*i)-(Kf*w)/l)*st);
w=w+((((Kf*i)-Tl)/j)*st);
end
plot(t,W,'linewidth',4); hold on;
xlabel('time (sec)','fontsize',18,'fontweight','b'); %%Number without ('')
ylabel('SPEED (rpm)','fontsize',22,'fontweight','b');%%Number without ('')
title('Dynamic model of separately excited dc motor under constant excitation');
axis([0 0.5 0 0.5]) %% One limit more
grid on; %%(gri;d)
plot(t,I,'linewidth',4)
xlabel('time (sec)','fontsize',18,'fontweight','b'); %%Number without ('')
ylabel('current (A)','fontsize',22,'fontweight','b'); %%Number without ('')
title('current response of rl circuit');
axis([0 0.5 0 0.5]) %% One limit more
