Xcos examples from textbooks and for blocksHEADmaster

3 files changed, 32 insertions, 0 deletions

diff --git a/Working_Examples/3432/CH5/EX5.6/DEPENDENCIES/fig_settings.sci b/Working_Examples/3432/CH5/EX5.6/DEPENDENCIES/fig_settings.sci
new file mode 100755
index 0000000..5d5e7d4
--- /dev/null
+++ b/Working_Examples/3432/CH5/EX5.6/DEPENDENCIES/fig_settings.sci
@@ -0,0 +1,9 @@
+//------------------------------------------------------------------

+//figure handel settings

+f=get("current_figure"); //Current figure handle

+f.background=8; //make the figure window background white

+l=f.children(1); 

+l.background=8 ;//make the text background white

+id=color('grey');

+xgrid(id);

+//------------------------------------------------------------------

diff --git a/Working_Examples/3432/CH5/EX5.6/Ex5_6.sce b/Working_Examples/3432/CH5/EX5.6/Ex5_6.sce
new file mode 100755
index 0000000..a2573d6
--- /dev/null
+++ b/Working_Examples/3432/CH5/EX5.6/Ex5_6.sce
@@ -0,0 +1,23 @@
+//Example 5.6

+//Root locus for satellite attitude control with a 

+//Transition value for the pole.

+

+xdel(winsid())//close all graphics Windows

+clear;

+clc;

+

+//------------------------------------------------------------------

+//System transfer function and its root locus 

+

+s=poly(0,'s');

+sysL=(s+1)/(s^2*(s+9));

+evans(sysL)

+

+//Title, labels and grid to the figure

+exec .\fig_settings.sci; // custom script for setting figure properties

+title(['Root locus for', '$L(s)=(s+1)/(s^2(s+9))$'],'fontsize',3)

+zoom_rect([-6 -3 2 3])

+h=legend('');

+h.visible = "off"

+

+//------------------------------------------------------------------

diff --git a/Working_Examples/3432/CH5/EX5.6/Ex5_6_f0.pdf b/Working_Examples/3432/CH5/EX5.6/Ex5_6_f0.pdf
new file mode 100755
index 0000000..9fc7e64
--- /dev/null
+++ b/Working_Examples/3432/CH5/EX5.6/Ex5_6_f0.pdf