diff options
| author | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
|---|---|---|
| committer | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
| commit | 8ac15bc5efafa2afc053c293152605b0e6ae60ff (patch) | |
| tree | e1bc17aae137922b1ee990f17aae4a6cb15b7d87 /Working_Examples/3432/CH9/EX9.7/Ex9_7.sce | |
| parent | 52a477ec613900885e29c4a0b02806a415b4f83a (diff) | |
| download | Xcos_block_examples-master.tar.gz Xcos_block_examples-master.tar.bz2 Xcos_block_examples-master.zip | |
Diffstat (limited to 'Working_Examples/3432/CH9/EX9.7/Ex9_7.sce')
| -rwxr-xr-x | Working_Examples/3432/CH9/EX9.7/Ex9_7.sce | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/Working_Examples/3432/CH9/EX9.7/Ex9_7.sce b/Working_Examples/3432/CH9/EX9.7/Ex9_7.sce new file mode 100755 index 0000000..cfe5028 --- /dev/null +++ b/Working_Examples/3432/CH9/EX9.7/Ex9_7.sce @@ -0,0 +1,84 @@ +//Example 9.7
+//Analysis and design of the system with limit cycle using the root locus.
+xdel(winsid())//close all graphics Windows
+clear;
+clc;
+//------------------------------------------------------------------
+//System transfer function and its root locus
+
+s=poly(0,'s');
+num=0.1;
+den=(s^2+0.2*s+1)*(s);
+Gs=syslin('c',num/den);
+
+//Root locus
+evans(Gs,40)
+title(["Root locus of", "$(0.1/s(s^2+0.2*s+1)$"],'fontsize',3);
+f=gca();
+f.x_location = "origin"
+f.y_location = "origin"
+h=legend('');
+h.visible = "off"
+exec .\fig_settings.sci; // custom script for setting figure properties
+//------------------------------------------------------------------
+//Response of the system
+figure;
+//Response of the system
+K=0.5;
+i=[1 4 8];
+importXcosDiagram(".\Ex9_7_model.xcos")
+
+for r=i
+xcos_simulate(scs_m,4);
+scs_m.props.context
+plot(yt.time,yt.values)
+end
+
+xlabel('Time (sec.)');
+ylabel('Amplitude');
+title("Step response of the system",'fontsize',3);
+exec .\fig_settings.sci; // custom script for setting figure properties
+zoom_rect([0 0 150 9])
+
+xset('font size',3);
+xstring(80,1.6,"$r=1$");
+xstring(80,4.6,"$r=4$");
+xstring(80,8.2,"$r=8$");
+//------------------------------------------------------------------
+//System with notch compensation
+D=123*(s^2+0.18*s+0.81)/(s+10)^2;
+
+//Root locus
+figure,
+evans(Gs*D,40)
+title(["Root locus including notch compensation"],'fontsize',3);
+f=gca();
+f.x_location = "origin"
+f.y_location = "origin"
+h=legend('');
+h.visible = "off"
+exec .\fig_settings.sci; //custom script for setting figure properties
+zoom_rect([-14 -2 2 2])
+//------------------------------------------------------------------
+//Response of the system witth notch filter
+figure;
+K=0.5;
+i=[2 4];
+importXcosDiagram(".\Ex9_7_model_notch.xcos")
+
+for r=i
+xcos_simulate(scs_m,4);
+scs_m.props.context
+plot(yt.time,yt.values)
+end
+
+xlabel('Time (sec.)');
+ylabel('Amplitude');
+title("Step response of the system with notch filter",'fontsize',3);
+exec .\fig_settings.sci; //custom script for setting figure properties
+xset('font size',3);
+xstring(30,2.2,"$r=2$");
+xstring(34,3.75,"$r=4$");
+//------------------------------------------------------------------
+
+
|