diff options
Diffstat (limited to 'combined.js')
| -rw-r--r-- | combined.js | 379 |
1 files changed, 378 insertions, 1 deletions
diff --git a/combined.js b/combined.js index 851ab9b0..4cafe115 100644 --- a/combined.js +++ b/combined.js @@ -668,6 +668,204 @@ CLKSOMV_f.prototype.set = function CLKSOMV_f() { x=arg1; } } +/* autogenerated from "macros/Events/freq_div.sci" */ +function freq_div() { +freq_div.prototype.define = function freq_div() { +scs_m_1=scicos_diagram(); +scs_m_1.objs[1-1]=Modulo_Count("define"); +scs_m_1.objs[2-1]=CLKINV_f("define"); +scs_m_1.objs[3-1]=CLKOUTV_f("define"); +scs_m_1.objs[4-1]=IFTHEL_f("define"); +scs_m_1.objs[5-1]=CLKSPLIT_f("define"); +scs_m_1.objs[6-1]=scicos_link(); +scs_m_1.objs[7-1]=scicos_link(); +scs_m_1.objs[8-1]=scicos_link(); +scs_m_1.objs[9-1]=scicos_link(); +scs_m_1.objs[10-1]=scicos_link(); +blk=scs_m_1.objs[1-1]; +graphics=blk.graphics; +model=blk.model; +graphics.orig=[0,-100]; +graphics.sz=[60,40]; +graphics.exprs=[["0"],["3"]]; +model.dstate=3; +model.ipar=3; +graphics.pout=7; +graphics.pein=10; +blk.graphics=graphics; +blk.model=model; +scs_m_1.objs[1-1]=blk; +blk=scs_m_1.objs[2-1]; +graphics=blk.graphics; +model=blk.model; +graphics.orig=[120,0]; +graphics.sz=[20,20]; +graphics.exprs=["1"]; +model.ipar=1; +graphics.peout=6; +blk.graphics=graphics; +blk.model=model; +scs_m_1.objs[2-1]=blk; +blk=scs_m_1.objs[3-1]; +graphics=blk.graphics; +model=blk.model; +graphics.orig=[130,-160]; +graphics.sz=[20,20]; +graphics.exprs=["1"]; +model.ipar=1; +graphics.pein=8; +blk.graphics=graphics; +blk.model=model; +scs_m_1.objs[3-1]=blk; +blk=scs_m_1.objs[4-1]; +graphics=blk.graphics; +model=blk.model; +graphics.orig=[100,-100]; +graphics.sz=[60,40]; +graphics.exprs=[["1"],["0"]]; +model.ipar=1; +graphics.pin=7; +graphics.pein=9; +graphics.peout=[[0],[8]]; +blk.graphics=graphics; +blk.model=model; +scs_m_1.objs[4-1]=blk; +blk=scs_m_1.objs[5-1]; +graphics=blk.graphics; +model=blk.model; +graphics.orig=[127,-33]; +graphics.sz=[7,7]; +graphics.pein=6; +graphics.peout=[[9],[10]]; +blk.graphics=graphics; +blk.model=model; +scs_m_1.objs[5-1]=blk; +lnk=scs_m_1.objs[6-1]; +lnk.ct=[5,-1]; +lnk.from=[2,1,0]; +lnk.to=[5,1,1]; +scs_m_1.objs[6-1]=lnk; +lnk=scs_m_1.objs[7-1]; +lnk.from=[1,1,0]; +lnk.to=[4,1,1]; +scs_m_1.objs[7-1]=lnk; +lnk=scs_m_1.objs[8-1]; +lnk.ct=[5,-1]; +lnk.from=[4,2,0]; +lnk.to=[3,1,1]; +scs_m_1.objs[8-1]=lnk; +lnk=scs_m_1.objs[9-1]; +lnk.ct=[5,-1]; +lnk.from=[5,1,0]; +lnk.to=[4,1,1]; +scs_m_1.objs[9-1]=lnk; +lnk=scs_m_1.objs[10-1]; +lnk.xx=[0,30,1]; +lnk.yy=[0,-30,1]; +lnk.ct=[5,-1]; +lnk.from=[5,2,0]; +lnk.to=[1,1,1]; +scs_m_1.objs[10-1]=lnk; +blk={}; +lnk={}; +model=scicos_model(); +model.sim="csuper"; +model.evtin=1; +model.evtout=1; +model.rpar=scs_m_1; +gr_i=[]; +x=standard_define([3,2],model,[],gr_i); +} +freq_div.prototype.details = function freq_div() { +} +freq_div.prototype.get = function freq_div() { +} +freq_div.prototype.set = function freq_div() { +for (i=1;i<=length(arg1.model.rpar.objs);i+=1) { +o=arg1.model.rpar.objs(i); +if (typeof(o)=="Block"&&o.gui=="Modulo_Count") { +path=i; +break; +} +} +newpar=list(); +y=0; +spath=list(); +spath[$+1-1]="model"; +spath[$+1-1]="rpar"; +spath[$+1-1]="objs"; +spath[$+1-1]=path; +xx=arg1(spath); +xxn=xx; +graphics=xx.graphics; +exprs=graphics.exprs; +model=xx.model; +while (true) { +[ok,%ph,%df,exprs]=scicos_getvalue("Set frequency division block parameters",[["Phase (0 to division factor -1)"],["Division factor"]],list("vec",1,"vec",1),exprs); +if (!ok) { +break; +} +if (ok) { +if (%df<1) { +%df=1; +} +%ph=abs(%ph); +if (%ph>%df-1) { +%ph=%df-1; +} +graphics.exprs=exprs; +model.ipar=%df; +model.dstate=%ph; +xxn.graphics=graphics; +xxn.model=model; +break; +} +} +if (diffobjs(xxn,xx)) { +model=xx.model; +model_n=xxn.model; +if (!is_modelica_block(xx)) { +modified=or(model.sim!=model_n.sim)||!isequal(model.state,model_n.state)||!isequal(model.dstate,model_n.dstate)||!isequal(model.rpar,model_n.rpar)||!isequal(model.ipar,model_n.ipar)||!isequal(model.label,model_n.label); +if (or(model.in1!=model_n.in1)||or(model.out!=model_n.out)) { +needcompile=1; +} +if (or(model.firing!=model_n.firing)) { +needcompile=2; +} +if (model.sim=="input"||model.sim=="output") { +if (model.ipar!=model_n.ipar) { +needcompile=4; +} +} +if (or(model.blocktype!=model_n.blocktype)||or(model.dep_ut!=model_n.dep_ut)) { +needcompile=4; +} +if ((model.nzcross!=model_n.nzcross)||(model.nmode!=model_n.nmode)) { +needcompile=4; +} +if (prod(size(model_n.sim))>1) { +if (model_n.sim(2)>1000) { +if (model.sim(1)!=model_n.sim(1)) { +needcompile=4; +} +} +} +} else { +modified=or(model_n!=model); +eq=model.equations; +eqn=model_n.equations; +if (or(eq.model!=eqn.model)||or(eq.inputs!=eqn.inputs)||or(eq.outputs!=eqn.outputs)) { +needcompile=4; +} +} +arg1[spath-1]=xxn; +newpar[size(newpar)+1-1]=1; +y=max(y,needcompile); +} +x=arg1; +typ=newpar; +} +} /* autogenerated from "macros/Events/EVTGEN_f.sci" */ function EVTGEN_f() { EVTGEN_f.prototype.define = function EVTGEN_f() { @@ -6440,6 +6638,97 @@ break; } } } +/* autogenerated from "macros/Sources/GEN_SQR.sci" */ +function GEN_SQR() { +GEN_SQR.prototype.define = function GEN_SQR() { +scs_m_1=scicos_diagram(version="scicos4.2",props=scicos_params(wpar=[-176.97473,421.18646,173.61587,524.41503,827,480,0,15,827,480,755,614,1.4],Title="SuperBlock",tol=[0.0001,0.000001,1.000e-10,100001,0,0],tf=100000,context=[["if typeof(Amin)<>typeof(Amax) then error(\'Minimum value and Maximum value must have the same type\');end"],["if and(rule<>[1;2]) then error(\'Initial Value must be 1 (for Min) or 2 (for Max)\');end"],["if Amin>Amax then error(\'Maximum value must be greater than the Minimum Value\');end"],["P=%pi/F"],[""]],void1=[],options=tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(true,33),[8,1],[1,5],list([5,1],[4,1]),[0.8,0.8,0.8]),void2=[],void3=[],doc=list())); +scs_m_1.objs[1-1]=scicos_block(gui="Counter",graphics=scicos_graphics(orig=[18.229901,339.5057],sz=[60,40],flip=true,theta=0,exprs=[["1"],["2"],["rule"]],pin=[],pout=8,pein=16,peout=[],gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("counter",4),in1=[],in2=[],intyp=1,out=1,out2=1,outtyp=1,evtin=1,evtout=[],state=[],dstate=0,odstate=list(),rpar=[],ipar=[[1],[2],[1]],opar=list(),blocktype="c",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[2-1]=scicos_block(gui="CONST_m",graphics=scicos_graphics(orig=[38.096074,293.82198],sz=[40,40],flip=true,theta=0,exprs="Amin",pin=[],pout=5,pein=[],peout=[],gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("cstblk4_m",4),in1=[],in2=[],intyp=1,out=1,out2=1,outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(-1),blocktype="d",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[3-1]=scicos_block(gui="CONST_m",graphics=scicos_graphics(orig=[37.378886,245.02389],sz=[40,40],flip=true,theta=0,exprs="Amax",pin=[],pout=6,pein=[],peout=[],gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("cstblk4_m",4),in1=[],in2=[],intyp=1,out=1,out2=1,outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(1),blocktype="d",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[4-1]=scicos_block(gui="SELECT_m",graphics=scicos_graphics(orig=[116.26954,269.42294],sz=[40,40],flip=true,theta=0,exprs=[["-1"],["2"],["1"]],pin=[[5],[6]],pout=14,pein=[[9],[10]],peout=[],gr_i=[],id="",in_implicit=[["E"],["E"]],out_implicit="E"),model=scicos_model(sim=list("selector_m",4),in1=[[-1],[-1]],in2=[[-2],[-2]],intyp=[[-1],[-1]],out=-1,out2=-2,outtyp=-1,evtin=[[1],[1]],evtout=[],state=[],dstate=1,odstate=list(),rpar=[],ipar=[],opar=list(),blocktype="c",firing=[],dep_ut=[true,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[5-1]=scicos_link(xx=[[86.667502],[107.69811],[107.69811]],yy=[[313.82198],[313.82198],[296.0896]],id="drawlink",thick=[0,0],ct=[1,1],from=[2,1,0],to=[4,1,1]); +scs_m_1.objs[6-1]=scicos_link(xx=[[85.950315],[107.69811],[107.69811]],yy=[[265.02389],[265.02389],[282.75627]],id="drawlink",thick=[0,0],ct=[1,1],from=[3,1,0],to=[4,2,1]); +scs_m_1.objs[7-1]=scicos_block(gui="ESELECT_f",graphics=scicos_graphics(orig=[106.9461,339.7496],sz=[60,40],flip=true,theta=0,exprs=[["2"],["0"],["0"]],pin=8,pout=[],pein=[],peout=[[9],[10]],gr_i=[],id="",in_implicit="E",out_implicit=[]),model=scicos_model(sim=list("eselect",-2),in1=1,in2=1,intyp=-1,out=[],out2=[],outtyp=1,evtin=[],evtout=[[1],[1]],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(),blocktype="l",firing=[[-1],[-1]],dep_ut=[true,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[8-1]=scicos_link(xx=[[86.80133],[98.374671]],yy=[[359.5057],[359.7496]],id="drawlink",thick=[0,0],ct=[1,1],from=[1,1,0],to=[7,1,1]); +scs_m_1.objs[9-1]=scicos_link(xx=[[126.9461],[129.60287]],yy=[[334.03532],[315.13722]],id="drawlink",thick=[0,0],ct=[5,-1],from=[7,1,0],to=[4,1,1]); +scs_m_1.objs[10-1]=scicos_link(xx=[[146.9461],[142.93621]],yy=[[334.03532],[315.13722]],id="drawlink",thick=[0,0],ct=[5,-1],from=[7,2,0],to=[4,2,1]); +scs_m_1.objs[11-1]=mlist("Deleted"); +scs_m_1.objs[12-1]=mlist("Deleted"); +scs_m_1.objs[13-1]=scicos_block(gui="OUT_f",graphics=scicos_graphics(orig=[184.40238,278.75198],sz=[20,20],flip=true,theta=0,exprs="1",pin=14,pout=[],pein=[],peout=[],gr_i=[],id="",in_implicit="E",out_implicit=[]),model=scicos_model(sim="output",in1=-1,in2=-2,intyp=-1,out=[],out2=[],outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=1,opar=list(),blocktype="c",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[14-1]=scicos_link(xx=[[164.84097],[184.40238]],yy=[[289.42294],[288.75198]],id="drawlink",thick=[0,0],ct=[1,1],from=[4,1,0],to=[13,1,1]); +scs_m_1.objs[15-1]=scicos_block(gui="SampleCLK",graphics=scicos_graphics(orig=[18.313686,403.57431],sz=[60,40],flip=true,theta=0,exprs=[["F/2"],["0"]],pin=[],pout=[],pein=[],peout=16,gr_i=[],id="",in_implicit=[],out_implicit=[]),model=scicos_model(sim="sampleclk",in1=[],in2=[],intyp=1,out=[],out2=[],outtyp=1,evtin=[],evtout=1,state=[],dstate=[],odstate=list(),rpar=[[1/2],[0]],ipar=[],opar=list(),blocktype="d",firing=-1,dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[16-1]=scicos_link(xx=[[48.313686],[48.229901]],yy=[[403.57431],[385.21998]],id="drawlink",thick=[0,0],ct=[5,-1],from=[15,1,0],to=[1,1,1]); +model=scicos_model(); +model.sim="csuper"; +model.in1=[]; +model.in2=[]; +model.intyp=1; +model.out=-1; +model.out2=-2; +model.outtyp=-1; +model.evtin=[]; +model.evtout=[]; +model.state=[]; +model.dstate=[]; +model.odstate=list(); +model.rpar=scs_m_1; +model.ipar=1; +model.opar=list(); +model.blocktype="h"; +model.firing=[]; +model.dep_ut=[false,false]; +model.label=""; +model.nzcross=0; +model.nmode=0; +model.equations=list(); +Amin=-1; +Amax=1; +rule=1; +F=1; +exprs=[sci2exp(Amin),sci2exp(Amax),sci2exp(rule),sci2exp(F)]; +gr_i=[]; +x=standard_define([3,2],model,exprs,gr_i); +} +GEN_SQR.prototype.details = function GEN_SQR() { +} +GEN_SQR.prototype.get = function GEN_SQR() { +} +GEN_SQR.prototype.set = function GEN_SQR() { +y=needcompile; +arg1.model.ipar=1; +typ=list(); +graphics=arg1.graphics; +exprs=graphics.exprs; +Btitre="Set GEN_SQR parameters"; +Exprs0=[["Amin"],["Amax"],["rule"],["F"]]; +Bitems=[["Minimum Value"],["Maximum Value"],["Initial Value( 1= Minimum Value 2= Maximum Value)"],["Period (sec)"]]; +Ss=list("mat",[-1,-1],"mat",[-1,-1],"pol",-1,"pol",-1); +scicos_context=struct(); +x=arg1; +ok=false; +while (!ok) { +[ok,scicos_context.Amin,scicos_context.Amax,scicos_context.rule,scicos_context.F,exprs]=scicos_getvalue(Btitre,Bitems,Ss,exprs); +if (!ok) { +return; +} +%scicos_context=scicos_context; +sblock=x.model.rpar; +[%scicos_context,ierr]=script2var(sblock.props.context,%scicos_context); +if (ierr==0) { +[sblock,%w,needcompile2,ok]=do_eval(sblock,list()); +if (ok) { +y=max(2,needcompile,needcompile2); +x.graphics.exprs=exprs; +x.model.rpar=sblock; +break; +} +} else { +message(lasterror()); +ok=false; +} +} +} +} /* autogenerated from "macros/Sources/GENSQR_f.sci" */ function GENSQR_f() { GENSQR_f.prototype.define = function GENSQR_f() { @@ -7074,6 +7363,94 @@ break; } } } +/* autogenerated from "macros/Sources/PULSE_SC.sci" */ +function PULSE_SC() { +PULSE_SC.prototype.define = function PULSE_SC() { +scs_m_1=scicos_diagram(version="scicos4.2",props=scicos_params(wpar=[-162.7581,435.54369,67.607292,416.67644,827,479,0,15,827,480,715,167,1.4],Title=["SuperBlock","/home/fady/Scicos_examples/"],tol=[[0.0001],[0.000001],[1.000e-10],[100001],[0],[0],[0]],tf=10,context=[["E2=E+W/100*F"],["if (W<0 | W>100) then error(\'Width must be between 0 and 100\');end"],["if (E2 >= F) then error (\'Offset must be lower than (frequency*(1-Width/100))\'); end"]],void1=[],options=tlist(["scsopt","3D","Background","Link","ID","Cmap"],list(true,33),[8,1],[1,5],list([5,1],[4,1]),[0.8,0.8,0.8]),void2=[],void3=[],doc=list())); +scs_m_1.objs[1-1]=scicos_block(gui="CONST_m",graphics=scicos_graphics(orig=[30.801202,158.91733],sz=[40,40],flip=true,theta=0,exprs="A",pin=[],pout=5,pein=[],peout=[],gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("cstblk4_m",4),in1=[],in2=[],intyp=1,out=1,out2=1,outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(1),blocktype="d",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[2-1]=scicos_block(gui="Ground_g",graphics=scicos_graphics(orig=[31.534535,215.384],sz=[40,40],flip=true,theta=0,exprs=[],pin=[],pout=4,pein=[],peout=[],gr_i=[],id="",in_implicit=[],out_implicit="E"),model=scicos_model(sim=list("cstblk4_m",4),in1=[],in2=[],intyp=1,out=1,out2=1,outtyp=-1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=[],opar=list(0),blocktype="d",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[3-1]=scicos_block(gui="SELECT_m",graphics=scicos_graphics(orig=[106.00652,186.09381],sz=[40,40],flip=true,theta=0,exprs=[["-1"],["2"],["1"]],pin=[[4],[5]],pout=11,pein=[[9],[8]],peout=[],gr_i=[],id="",in_implicit=[["E"],["E"]],out_implicit="E"),model=scicos_model(sim=list("selector_m",4),in1=[[-1],[-1]],in2=[[-2],[-2]],intyp=[[-1],[-1]],out=-1,out2=-2,outtyp=-1,evtin=[[1],[1]],evtout=[],state=[],dstate=1,odstate=list(),rpar=[],ipar=[],opar=list(),blocktype="c",firing=[],dep_ut=[true,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[4-1]=scicos_link(xx=[[80.105964],[97.43509],[97.43509]],yy=[[235.384],[235.384],[212.76048]],id="drawlink",thick=[0,0],ct=[1,1],from=[2,1,0],to=[3,1,1]); +scs_m_1.objs[5-1]=scicos_link(xx=[[79.372631],[97.43509],[97.43509]],yy=[[178.91733],[178.91733],[199.42714]],id="drawlink",thick=[0,0],ct=[1,1],from=[1,1,0],to=[3,2,1]); +scs_m_1.objs[6-1]=scicos_block(gui="SampleCLK",graphics=scicos_graphics(orig=[82.349744,274.21741],sz=[60,40],flip=true,theta=0,exprs=[["F"],["E2"]],pin=[],pout=[],pein=[],peout=9,gr_i=[],id="",in_implicit=[],out_implicit=[]),model=scicos_model(sim="sampleclk",in1=[],in2=[],intyp=1,out=[],out2=[],outtyp=1,evtin=[],evtout=1,state=[],dstate=[],odstate=list(),rpar=[[1],[0.4]],ipar=[],opar=list(),blocktype="d",firing=-1,dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[7-1]=scicos_block(gui="SampleCLK",graphics=scicos_graphics(orig=[160.48879,274.21741],sz=[60,40],flip=true,theta=0,exprs=[["F"],["E"]],pin=[],pout=[],pein=[],peout=8,gr_i=[],id="",in_implicit=[],out_implicit=[]),model=scicos_model(sim="sampleclk",in1=[],in2=[],intyp=1,out=[],out2=[],outtyp=1,evtin=[],evtout=1,state=[],dstate=[],odstate=list(),rpar=[[1],[0.1]],ipar=[],opar=list(),blocktype="d",firing=-1,dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[8-1]=scicos_link(xx=[[190.48879],[190.48879],[132.67318],[132.67318]],yy=[[274.21741],[240.99048],[240.99048],[231.80809]],id="drawlink",thick=[0,0],ct=[5,-1],from=[7,1,0],to=[3,2,1]); +scs_m_1.objs[9-1]=scicos_link(xx=[[112.34974],[112.34974],[119.33985],[119.33985]],yy=[[274.21741],[248.21372],[248.21372],[231.80809]],id="drawlink",thick=[0,0],ct=[5,-1],from=[6,1,0],to=[3,1,1]); +scs_m_1.objs[10-1]=scicos_block(gui="OUT_f",graphics=scicos_graphics(orig=[174.57795,196.09381],sz=[20,20],flip=true,theta=0,exprs="1",pin=11,pout=[],pein=[],peout=[],gr_i=[],id="",in_implicit="E",out_implicit=[]),model=scicos_model(sim="output",in1=-1,in2=-2,intyp=-1,out=[],out2=[],outtyp=1,evtin=[],evtout=[],state=[],dstate=[],odstate=list(),rpar=[],ipar=1,opar=list(),blocktype="c",firing=[],dep_ut=[false,false],label="",nzcross=0,nmode=0,equations=list()),doc=list()); +scs_m_1.objs[11-1]=scicos_link(xx=[[154.57795],[174.57795]],yy=[[206.09381],[206.09381]],id="drawlink",thick=[0,0],ct=[1,1],from=[3,1,0],to=[10,1,1]); +model=scicos_model(); +model.sim="csuper"; +model.in1=[]; +model.in2=[]; +model.intyp=1; +model.out=-1; +model.out2=-2; +model.outtyp=-1; +model.evtin=[]; +model.evtout=[]; +model.state=[]; +model.dstate=[]; +model.odstate=list(); +model.rpar=scs_m_1; +model.ipar=1; +model.opar=list(); +model.blocktype="h"; +model.firing=[]; +model.dep_ut=[false,false]; +model.label=""; +model.nzcross=0; +model.nmode=0; +model.equations=list(); +E=0.1; +W=30; +F=1; +A=1; +exprs=[sci2exp(E),sci2exp(W),sci2exp(F),sci2exp(A)]; +gr_i=[]; +x=standard_define([3,2],model,exprs,gr_i); +} +PULSE_SC.prototype.details = function PULSE_SC() { +} +PULSE_SC.prototype.get = function PULSE_SC() { +} +PULSE_SC.prototype.set = function PULSE_SC() { +y=needcompile; +arg1.model.ipar=1; +typ=list(); +graphics=arg1.graphics; +exprs=graphics.exprs; +Btitre="Set Pulse Generator parameters"; +Exprs0=[["E"],["W"],["F"],["A"]]; +Bitems=[["Phase delay (secs):"],["Pulse Width (% of period):"],["Period (secs):"],["Amplitude:"]]; +Ss=list("pol",-1,"pol",-1,"pol",-1,"mat",[-1,-1]); +scicos_context=struct(); +x=arg1; +ok=false; +while (!ok) { +[ok,scicos_context.E,scicos_context.W,scicos_context.F,scicos_context.A,exprs]=scicos_getvalue(Btitre,Bitems,Ss,exprs); +if (!ok) { +return; +} +%scicos_context=scicos_context; +sblock=x.model.rpar; +[%scicos_context,ierr]=script2var(sblock.props.context,%scicos_context); +if (ierr==0) { +[sblock,%w,needcompile2,ok]=do_eval(sblock,list()); +if (ok) { +y=max(2,needcompile,needcompile2); +x.graphics.exprs=exprs; +x.model.rpar=sblock; +break; +} +} else { +if ((lasterror()!=[])) { +messagebox(lasterror()); +} +ok=false; +} +} +} +} /* autogenerated from "macros/Sources/FROMWS_c.sci" */ function FROMWS_c() { FROMWS_c.prototype.define = function FROMWS_c() { @@ -16719,4 +17096,4 @@ x=arg1; } } -/* made from 256/274 files */ +/* made from 259/274 files */ |