← Back to branch summary

~ubuntu-branches/ubuntu/hoary/scilab/hoary

« back to all changes in this revision

Viewing changes to demos/scicos/sound.cosf

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Werner
  • Date: 2005-01-09 22:58:21 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050109225821-473xr8vhgugxxx5j
Tags: 3.0-12
http://bugs.debian.org/255869
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
demos/scicos/sound.cosf
1
 
scicos_ver = 'scicos2.5.1'
2
 
scs_m=list()
3
 
scs_m(1)=list([576,472,0,0,600,450],['sound','/usr/local/lib/scilab/demos/scicos/'],..
4
 
[0.0001;1.000D-06;1.000D-10;100001],10000,' ',list(),..
 
1
scicos_ver = 'scicos2.7.3'
 
2
scs_m=scicos_diagram()
 
3
scs_m.props=tlist(..
 
4
['params','wpar','title','tol','tf','context','void1','options','void2','void3',..
 
5
'doc'],[576,472,0,0,600,450],['sound','/usr/local/lib/scilab/demos/scicos/'],..
 
6
[0.0001;1.000E-06;1.000E-10;100001;0;0],10000,' ',[],..
5
7
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,33),[8,1],[1,5],..
6
8
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],list())
7
 
scs_m_1=list()
8
 
scs_m_1(1)=list([600,450,0,0,600,450],'foo',[],[],' ',list(),..
 
9
scs_m_1=scicos_diagram()
 
10
scs_m_1.props=tlist(..
 
11
['params','wpar','title','tol','tf','context','void1','options','void2','void3',..
 
12
'doc'],[600,450,0,0,600,450],'foo',[0;0;0;0;0;0],100000,' ',[],..
9
13
tlist(['scsopt','3D','Background','Link','ID','Cmap'],list(%t,33),[8,1],[1,5],..
10
14
list([5,0],[4,0]),[0.8,0.8,0.8]),[],[],[])
11
 
scs_m_1(2)=list('Block',list([399,162],[20,20],%t,'1',[],[],6,[],[]),..
12
 
           list('output',[],[],1,[],[],[],[],1,'d',[],[%f,%f],' ',list()),' ',..
13
 
           'CLKOUT_f')
14
 
scs_m_1(3)=list('Block',..
15
 
           list([320,232],[40,40],%t,['0.1';'0.1'],[],[],7,4,..
16
 
           ['dt=model(8);';
17
 
           'txt=[''Delay'';string(dt)];';
18
 
           'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');']),..
19
 
           list('evtdly',[],[],1,1,[],[],0.1,[],'d',0.1,[%f,%f],' ',list()),' ',..
20
 
           'EVTDLY_f')
21
 
scs_m_1(4)=list('Link',[340;340;380.71066],[226.28571;172;172],'drawlink',' ',..
22
 
           [0,0],[5,-1],[3,1],[5,1])
23
 
scs_m_1(5)=list('Block',list([380.71066;172],[1,1],%t,' ',[],[],4,[6;7]),..
24
 
           list('lsplit',[],[],1,[1;1],[],[],[],[],'d',[-1,-1],[%t,%f],' ',..
25
 
           list()),' ','CLKSPLIT_f')
26
 
scs_m_1(6)=list('Link',[380.71066;399],[172;172],'drawlink',' ',[0,0],[5,-1],..
27
 
           [5,1],[2,1])
28
 
scs_m_1(7)=list('Link',[380.71066;380.71066;340;340],..
29
 
           [172;301.9943;301.9943;277.71429],'drawlink',' ',[0,0],[5,-1],[5,2],..
30
 
           [3,1])
31
 
scs_m(2)=list('Block',..
32
 
         list([383.38983,359.77157],[40,40],%t,[],[],[],[],4,..
33
 
         list(..
34
 
         ['wd=xget(''wdim'').*[1.016,1.12];';
35
 
         'thick=xget(''thickness'');xset(''thickness'',2);';
36
 
         'p=wd(2)/wd(1);p=1;';
37
 
         'rx=sz(1)*p/2;ry=sz(2)/2;';
38
 
         'xarcs([orig(1)+0.05*sz(1);';
39
 
         'orig(2)+0.95*sz(2);';
40
 
         '   0.9*sz(1)*p;';
41
 
         '   0.9*sz(2);';
42
 
         '   0;';
43
 
         '   360*64],scs_color(5));';
44
 
         'xset(''thickness'',1);';
45
 
         'xx=[orig(1)+rx    orig(1)+rx;';
46
 
         '    orig(1)+rx    orig(1)+rx+0.6*rx*cos(%pi/6)];';
47
 
         'yy=[orig(2)+ry    orig(2)+ry ;';
48
 
         '  orig(2)+1.8*ry  orig(2)+ry+0.6*ry*sin(%pi/6)];';
49
 
         'xsegs(xx,yy,scs_color(10));';
50
 
         'xset(''thickness'',thick);'],[])),list('csuper',[],[],[],1,[],' ',..
51
 
scs_m_1,[],'h',%f,[%f,%f]),' ','CLOCK_f')
52
 
scs_m(3)=list('Block',..
53
 
         list([419.27711,209.81595],[60,40],%t,['2';'0'],9,[],7,[],..
54
 
         ['txt=[''write AU to'';''/dev/audio''];';
55
 
         'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')']),..
56
 
         list(list('writeau',2),1,[],1,[],[],[-1;0;0;0;0;0],[],..
57
 
         [10;30;12;40;2;0;48;13;14;31;48;10;30;13;18;24],'d',[],[%t,%f],' ',..
58
 
         list()),' ','WRITEAU_f')
59
 
scs_m(4)=list('Link',[403.38983;403.70773],[354.05729;346.50018],'drawlink',' ',..
60
 
         [0,0],[5,-1],[2,1],[6,1])
61
 
scs_m(5)=list('Block',..
62
 
         list([87.958115,100.56433],[80,40],%t,['x-files.au';'20';'0'],[],9,8,[],..
63
 
         ['txt=[''read from .au'';'' sound binary file''];';
64
 
         'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')']),..
65
 
         list(list('readau',2),[],1,1,[],[],..
66
 
         [1;1;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0],[],..
67
 
         [10;30;12;40;0;20;1;0;1;33;46;15;18;21;14;28;51;10;30;1],'d',[],[%f,%f],..
68
 
         ' ',list()),' ','READAU_f')
69
 
scs_m(6)=list('Block',..
70
 
         list([403.70773;346.50018],[0.3333333,0.3333333],%t,[],[],[],4,[7;8],[]),..
71
 
         list('split',[],[],1,[1;1],[],[],[],[],'d',[%f,%f,%f],[%f,%f],' ',..
72
 
         list()),' ','CLKSPLIT_f')
73
 
scs_m(7)=list('Link',..
74
 
         [403.70773;403.80181;404.05814;404.11143;404.5633;404.63647;449.27711;
75
 
         449.27711],..
76
 
         [346.50018;344.26375;338.17022;336.90341;326.16161;324.42226;324.42226;
77
 
         255.53024],'drawlink',' ',[0,0],[5,-1],[6,1],[3,1])
78
 
scs_m(8)=list('Link',[403.70773;127.95812;127.95812],..
79
 
         [346.50018;346.50018;146.27862],'drawlink',' ',[0,0],[5,-1],[6,2],[5,1])
80
 
scs_m(9)=list('Link',[176.52954;245.6942;245.6942;410.70568],..
81
 
         [120.56433;120.56433;229.81595;229.81595],'drawlink',' ',[0,0],[1,1],..
82
 
         [5,1],[3,1])
83
 
scs_m(10)=list('Text',..
84
 
          list([397.8836,415.79572],[136.50794,16.033254],%t,..
85
 
          ['Only for Unix systems';'2';'1'],[],[],[],[],[]),..
86
 
          list('text',[],[],[],[],[],[],'Only for Unix systems',[2;1],'c',[],..
87
 
          [%f,%f],' ',list()),' ','TEXT_f')
 
15
scs_m_1.objs(1)=mlist('Deleted')
 
16
scs_m_1.objs(2)=mlist(['Block','graphics','model','gui','doc'],..
 
17
                mlist(..
 
18
                ['graphics','orig','sz','flip','exprs','pin','pout','pein',..
 
19
                'peout','gr_i','id','in_implicit','out_implicit'],[399,162],..
 
20
                [20,20],%t,'1',[],[],6,[],[],emptystr(),[],[]),..
 
21
                mlist(..
 
22
                ['model','sim','in','out','evtin','evtout','state','dstate',..
 
23
                'rpar','ipar','blocktype','firing','dep_ut','label','nzcross',..
 
24
                'nmode','equations'],'output',[],[],1,[],[],[],[],1,'d',[],..
 
25
                [%f,%f],' ',0,0,list()),'CLKOUT_f',list())
 
26
scs_m_1.objs(3)=mlist(['Block','graphics','model','gui','doc'],..
 
27
                mlist(..
 
28
                ['graphics','orig','sz','flip','exprs','pin','pout','pein',..
 
29
                'peout','gr_i','id','in_implicit','out_implicit'],[320,232],..
 
30
                [40,40],%t,['0.1';'0.1'],[],[],7,4,..
 
31
                ['dt=model.rpar;';
 
32
                'txt=[''Delay'';string(dt)];';
 
33
                'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'');'],..
 
34
                emptystr(),[],[]),..
 
35
                mlist(..
 
36
                ['model','sim','in','out','evtin','evtout','state','dstate',..
 
37
                'rpar','ipar','blocktype','firing','dep_ut','label','nzcross',..
 
38
                'nmode','equations'],'evtdly',[],[],1,1,[],[],0.1,[],'d',0.1,..
 
39
                [%f,%f],' ',0,0,list()),'EVTDLY_f',list())
 
40
scs_m_1.objs(4)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
41
                [340;340;380.71066],[226.28571;172;172],' ',[0,0],[5,-1],[3,1,0],..
 
42
                [5,1,1])
 
43
scs_m_1.objs(5)=mlist(['Block','graphics','model','gui','doc'],..
 
44
                mlist(..
 
45
                ['graphics','orig','sz','flip','exprs','pin','pout','pein',..
 
46
                'peout','gr_i','id','in_implicit','out_implicit'],..
 
47
                [380.71066;172],[1,1],%t,' ',[],[],4,[6;7],[],emptystr(),[],[]),..
 
48
                mlist(..
 
49
                ['model','sim','in','out','evtin','evtout','state','dstate',..
 
50
                'rpar','ipar','blocktype','firing','dep_ut','label','nzcross',..
 
51
                'nmode','equations'],'lsplit',[],[],1,[1;1],[],[],[],[],'d',..
 
52
                [-1,-1],[%t,%f],' ',0,0,list()),'CLKSPLIT_f',list())
 
53
scs_m_1.objs(6)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
54
                [380.71066;399],[172;172],' ',[0,0],[5,-1],[5,1,0],[2,1,1])
 
55
scs_m_1.objs(7)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
56
                [380.71066;380.71066;340;340],[172;301.9943;301.9943;277.71429],..
 
57
                ' ',[0,0],[5,-1],[5,2,0],[3,1,1])
 
58
scs_m.objs(1)=mlist(..
 
59
              ['Block','graphics','model','gui','doc'],..
 
60
              mlist(..
 
61
              ['graphics','orig','sz','flip','exprs','pin','pout','pein','peout','gr_i','id',..
 
62
              'in_implicit','out_implicit'],[383.38983,359.77157],[40,40],%t,[],[],[],[],3,..
 
63
              list(..
 
64
              ['wd=xget(''wdim'').*[1.016,1.12];';
 
65
              'thick=xget(''thickness'');xset(''thickness'',2);';
 
66
              'p=wd(2)/wd(1);p=1;';
 
67
              'rx=sz(1)*p/2;ry=sz(2)/2;';
 
68
              'xarcs([orig(1)+0.05*sz(1);';
 
69
              'orig(2)+0.95*sz(2);';
 
70
              '   0.9*sz(1)*p;';
 
71
              '   0.9*sz(2);';
 
72
              '   0;';
 
73
              '   360*64],scs_color(5));';
 
74
              'xset(''thickness'',1);';
 
75
              'xx=[orig(1)+rx    orig(1)+rx;';
 
76
              '    orig(1)+rx    orig(1)+rx+0.6*rx*cos(%pi/6)];';
 
77
              'yy=[orig(2)+ry    orig(2)+ry ;';
 
78
              '  orig(2)+1.8*ry  orig(2)+ry+0.6*ry*sin(%pi/6)];';
 
79
              'xsegs(xx,yy,scs_color(10));';
 
80
              'xset(''thickness'',thick);'],[]),emptystr(),[],[]),mlist(..
 
81
              ['model','sim','in','out','evtin','evtout','state','dstate','rpar','ipar',..
 
82
              'blocktype','firing','dep_ut','label','nzcross','nmode','equations'],..
 
83
              'csuper',[],[],[],1,[],' ',scs_m_1,[],'h',%f,[%f,%f],emptystr(),0,..
 
84
              0,list()),'CLOCK_f',[])
 
85
scs_m.objs(2)=mlist(['Block','graphics','model','gui','doc'],..
 
86
              mlist(..
 
87
              ['graphics','orig','sz','flip','exprs','pin','pout','pein','peout',..
 
88
              'gr_i','id','in_implicit','out_implicit'],[419.27711,209.81595],..
 
89
              [60,40],%t,['2';'0'],8,[],6,[],..
 
90
              ['txt=[''write AU to'';''/dev/audio''];';
 
91
              'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')'],emptystr(),..
 
92
              [],[]),..
 
93
              mlist(..
 
94
              ['model','sim','in','out','evtin','evtout','state','dstate','rpar',..
 
95
              'ipar','blocktype','firing','dep_ut','label','nzcross','nmode',..
 
96
              'equations'],list('writeau',2),1,[],1,[],[],[-1;0;0;0;0;0],[],..
 
97
              [10;30;12;40;2;0;48;13;14;31;48;10;30;13;18;24],'d',[],[%t,%f],' ',..
 
98
              0,0,list()),'WRITEAU_f',list())
 
99
scs_m.objs(3)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
100
              [403.38983;403.70773],[354.05729;346.50018],' ',[0,0],[5,-1],..
 
101
              [1,1,0],[5,1,1])
 
102
scs_m.objs(4)=mlist(['Block','graphics','model','gui','doc'],..
 
103
              mlist(..
 
104
              ['graphics','orig','sz','flip','exprs','pin','pout','pein','peout',..
 
105
              'gr_i','id','in_implicit','out_implicit'],[87.958115,100.56433],..
 
106
              [80,40],%t,['x-files.au';'20';'0'],[],8,7,[],..
 
107
              ['txt=[''read from .au'';'' sound binary file''];';
 
108
              'xstringb(orig(1),orig(2),txt,sz(1),sz(2),''fill'')'],emptystr(),..
 
109
              [],[]),..
 
110
              mlist(..
 
111
              ['model','sim','in','out','evtin','evtout','state','dstate','rpar',..
 
112
              'ipar','blocktype','firing','dep_ut','label','nzcross','nmode',..
 
113
              'equations'],list('readau',2),[],1,1,[],[],..
 
114
              [1;1;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0],[],..
 
115
              [10;30;12;40;0;20;1;0;1;33;46;15;18;21;14;28;51;10;30;1],'d',[],..
 
116
              [%f,%f],' ',0,0,list()),'READAU_f',list())
 
117
scs_m.objs(5)=mlist(['Block','graphics','model','gui','doc'],..
 
118
              mlist(..
 
119
              ['graphics','orig','sz','flip','exprs','pin','pout','pein','peout',..
 
120
              'gr_i','id','in_implicit','out_implicit'],[403.70773;346.50018],..
 
121
              [0.3333333,0.3333333],%t,[],[],[],3,[6;7],[],emptystr(),[],[]),..
 
122
              mlist(..
 
123
              ['model','sim','in','out','evtin','evtout','state','dstate','rpar',..
 
124
              'ipar','blocktype','firing','dep_ut','label','nzcross','nmode',..
 
125
              'equations'],'split',[],[],1,[1;1],[],[],[],[],'d',[%f,%f,%f],..
 
126
              [%f,%f],' ',0,0,list()),'CLKSPLIT_f',list())
 
127
scs_m.objs(6)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
128
              [403.70773;403.80181;404.05814;404.11143;404.5633;404.63647;
 
129
              449.27711;449.27711],..
 
130
              [346.50018;344.26375;338.17022;336.90341;326.16161;324.42226;
 
131
              324.42226;255.53024],' ',[0,0],[5,-1],[5,1,0],[2,1,1])
 
132
scs_m.objs(7)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
133
              [403.70773;127.95812;127.95812],[346.50018;346.50018;146.27862],..
 
134
              ' ',[0,0],[5,-1],[5,2,0],[4,1,1])
 
135
scs_m.objs(8)=mlist(['Link','xx','yy','id','thick','ct','from','to'],..
 
136
              [176.52954;245.6942;245.6942;410.70568],..
 
137
              [120.56433;120.56433;229.81595;229.81595],' ',[0,0],[1,1],[4,1,0],..
 
138
              [2,1,1])
 
139
scs_m.objs(9)=tlist(['Text','graphics','model','void','gui'],..
 
140
              mlist(..
 
141
              ['graphics','orig','sz','flip','exprs','pin','pout','pein','peout',..
 
142
              'gr_i','id'],[397.8836,415.79572],[136.50794,16.033254],%t,..
 
143
              ['Only for Unix systems';'2';'1'],[],[],[],[],[],emptystr()),..
 
144
              mlist(..
 
145
              ['model','sim','in','out','evtin','evtout','state','dstate','rpar',..
 
146
              'ipar','blocktype','firing','dep_ut','label'],'text',[],[],[],[],..
 
147
              [],[],'Only for Unix systems',[2;1],'c',[],[%f,%f],emptystr()),' ',..
 
148
              'TEXT_f')