1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
|
scicos_ver = 'scicos2.3'
scs_m=list()
scs_m(1)=list([450,400,0,0],['Linear','/usr/local/lib/scilab/macros/scicos/'],[],[],' ')
scs_m(2)=list('Block',..
list([20,20],[60,40],%t,['-1';'1';'1';'0';'0'],0,0,[],[],..
['txt=[''xd=Ax+Bu'';''y=Cx+Du''];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
list(list('csslti',1),1,1,[],[],0,[],[-1;1;1;0],[],'c',[],[%f,%f],' ',..
list()),' ','CLSS_f')
scs_m(3)=list('Block',..
list([20,129.52381],[50,50],%t,['1';'1+s'],0,0,[],[],..
'xstringb(orig(1),orig(2),[''Num(s)'';''-----'';''Den(s)''],sz(1),sz(2),''fill'');'),..
list(list('csslti',1),1,1,[],[],0,[],[-1;1;1;0],[],'c',[],[%f,%f],' ',..
list()),' ','CLR_f')
scs_m(4)=list('Block',..
list([20,264.7619],[40,40],%t,'0',0,0,[],[],..
'xstringb(orig(1),orig(2),'' 1/s '',sz(1),sz(2),''fill'');'),..
list('integr',1,1,[],[],0,[],[],[],'c',[],[%f,%f],' ',list()),' ',..
'INTEGRAL_f')
scs_m(5)=list('Block',..
list([103.80952,20],[50,50],%t,['1';'1+z'],0,0,0,[],..
['txt=[''Num(z)'';''-----'';''Den(z)''];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
list('dsslti',1,1,1,[],[],0,[-1;1;1;0],[],'d',[],[%f,%f],' ',list()),..
' ','DLR_f')
scs_m(6)=list('Block',..
list([103.80952,155.2381],[60,40],%t,['-1';'1';'1';'0';'0'],0,0,0,[],..
['txt=[''x+=Ax+Bu'';''y=Cx+Du''];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
list(list('dsslti',1),1,1,1,[],[],0,[-1;1;1;0],[],'d',[],[%f,%f],' ',..
list()),' ','DLSS_f')
scs_m(7)=list('Block',..
list([103.80952,264.7619],[60,40],%t,['0';'1';'1';'0';'0'],[0;0],0,0,[],..
['txt=[''Jump'';''(A,B,C,D)''];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')']),..
list(list('tcslti',1),[1;1],1,1,[],0,[],[0;1;1;0],[],'c',[],[%f,%f],' ',..
list()),' ','TCLSS_f')
scs_m(8)=list('Block',..
list([187.61905,20],[16.666667,16.666667],%t,['1';'[1;1;1]'],[0;0;0],0,..
[],[],[]),..
list('sum',[-1;-1;-1],-1,[],[],[],[],[1;1;1],[],'c',[],[%t,%f],' ',..
list()),' ','SOM_f')
scs_m(9)=list('Block',..
list([187.61905,179.04762],[60,40],%t,[],[],[],[],[],..
'xstringb(orig(1),orig(2),[''DUMMY'';''CLSS''],sz(1),sz(2),''fill'');'),..
list('cdummy',[],[],[],[],0,[],[],[],'c',[],[%f,%f],' ',list()),' ',..
'CLINDUMMY_f')
scs_m_1=list()
scs_m_1(1)='Block'
scs_m_1(2)=list([187.61905,288.57143],[40,40],%t,'DELAY_f',0,0,[],[],..
'xstringb(orig(1),orig(2),''Delay'',sz(1),sz(2),''fill'')')
scs_m_1(3)=list('csuper',1,1,[],[],[],[],..
list(list([600,400],'DELAY_f',[],[]),..
list('Block',list([92,210],[20,20],%t,['1';'1'],[],7,[],[],[]),..
list('input',[],1,[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
'IN_f'),..
list('Block',list([440,210],[20,20],%t,['1';'1'],6,[],[],[],[]),..
list('output',1,[],[],[],[],[],[],1,'c',[],[%f,%f],' ',list()),' ',..
'OUT_f'),..
list('Block',..
list([238,195],[50,50],%t,'0;0;0;0;0;0;0;0;0;0',7,6,10,[],..
['dly=model(8);';
'txt=[''Shift'';''Register'';string(dly)];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')']),..
list('delay',1,1,1,[],[],[0;0;0;0;0;0;0;0;0;0],[],[],'d',[],..
[%f,%f],' ',list()),' ','REGISTER_f'),..
list('Block',..
list([243,296],[40,40],%t,['0.1';'1'],[],[],11,8,..
['dt=model(8);';
'txt=[''Delay'';string(dt)];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
list('evtdly',[],[],1,1,[],[],0.1,[],'d',1,[%f,%f],' ',list()),' ',..
'EVTDLY_f'),..
list('Link',[296.6;440],[220;220],'drawlink',' ',[0,0],[1,1],[4,1],..
[3,1]),..
list('Link',[112;229.4],[220;220],'drawlink',' ',[0,0],[1,1],[2,1],..
[4,1]),..
list('Link',[263;263],[290.3;271.2],'drawlink',' ',[0,0],[5,-1],..
[5,1],[9,1]),..
list('Block',list([263;271.2],[1,1],%t,' ',[],[],8,[10;11]),..
list('lsplit',[],[],1,[1;1],[],[],[],[],'d',[-1,-1],[%t,%f],' ',..
list()),' ','CLKSPLIT_f'),..
list('Link',[263;263],[271.2;250.7],'drawlink',' ',[0,0],[5,-1],..
[9,1],[4,1]),..
list('Link',[263;308.6;308.6;263;263],[271.2;271.2;367;367;341.7],..
'drawlink',' ',[0,0],[5,-1],[9,2],[5,1])),[],'h',%f,[%f,%f])
scs_m_1(4)=' '
scs_m_1(5)='DELAY_f'
scs_m(10)=scs_m_1
scs_m(11)=list('Block',..
list([271.42857,20],[50,50],%t,['1';'0;0;0;0;0;0;0;0;0;0';'1'],[0;0],0,..
0,[0;0],..
['txt=[''Variable'';''delay''];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
list(list('delayv',1),[1;1],1,1,[1;1],[],[0;0;0;0;0;0;0;0;0;0;0],1,[],..
'd',[0,-1],[%t,%t],' ',list()),' ','DELAYV_f')
scs_m(12)=list('Block',..
list([271.42857,155.2381],[50,50],%t,'0;0;0;0;0;0;0;0;0;0',0,0,0,[],..
['dly=model(8);';
'txt=[''Shift'';''Register'';string(dly)];';
'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')']),..
list('delay',1,1,1,[],[],[0;0;0;0;0;0;0;0;0;0],[],[],'d',-1,[%f,%f],..
' ',list()),' ','REGISTER_f')
scs_m(13)=list('Block',..
list([271.42857,290.47619],[40,40],%t,' ',0,0,0,[],..
'xstringb(orig(1),orig(2),''S/H'',sz(1),sz(2),''fill'')'),..
list('samphold',-1,-1,1,[],[],[],[],[],'d',[],[%t,%f],' ',list()),' ',..
'SAMPLEHOLD_f')
scs_m(14)=list('Block',..
list([342.38095,20],[40,40],%t,'0',0,0,0,[],..
'xstringb(orig(1),orig(2),''$'',sz(1),sz(2),''fill'')'),..
list('dollar',1,1,1,[],[],0,[],[],'d',[],[%f,%f],' ',list()),' ',..
'DOLLAR_f')
scs_m(15)=list('Block',..
list([340.56818,231.33903],[40,60],%t,'[1;1]',[0;0],0,[],[],..
list(..
['[x,y,typ]=standard_inputs(o) ';
'sgn=o(3)(8)';
'for k=1:size(x,''*'')';
' if sgn(k)>0 then';
' xstring(orig(1)+sz(1)/8 ,y(k)-4,''+'')';
' else';
' xstring(orig(1)+sz(1)/8 ,y(k)-4,''-'')';
' end';
'end';
'xx=sz(1)*[.8 .4 0.75 .4 .8]+orig(1)';
'yy=sz(2)*[.8 .8 .5 .2 .2]+orig(2)';
'xpoly(xx,yy,''lines'')'],[])),..
list(list('sum',2),[-1;-1],-1,[],[],[],[],[1;1],[],'c',[],[%t,%f],' ',..
list()),' ','BIGSOM_f')
scs_m(16)=list('Block',..
list([190.97065,79.77208],[40,40],%t,['1';'1';'1'],0,0,[],[],..
list(..
['[nin,nout]=model(2:3);';
'if nin*nout==1 then gain=string(model(8)),else gain=''Gain'',end';
'if orient then';
' xx=orig(1)+[0 1 0 0]*sz(1);';
' yy=orig(2)+[0 1/2 1 0]*sz(2);';
' x1=0';
'else';
' xx=orig(1)+[0 1 1 0]*sz(1);';
' yy=orig(2)+[1/2 0 1 1/2]*sz(2);';
' x1=1/4';
'end';
'xpoly(xx,yy,''lines'');';
'xstringb(orig(1)+x1*sz(1),orig(2),gain,(1-x1)*sz(1),sz(2));'],[])),..
list('gain',1,1,[],[],[],[],1,[],'c',[],[%t,%f],' ',list()),' ',..
'GAINBLK_f')
|
