summaryrefslogtreecommitdiff
path: root/js/Sources/FROMWS_c.js
blob: 89e1212c966c841fd0294dd02859eec97cbaf630 (plain)
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
/* autogenerated from "macros/Sources/FROMWS_c.sci" */
function FROMWS_c() {
    FROMWS_c.prototype.define = function FROMWS_c() {
        varnam = "V";
        Method = 1;
        ZC = 1;
        OutEnd = 0;
        model = scicos_model();
        model.sim = list("fromws_c",4);
        model.out = -1;
        model.out2 = -2;
        model.outtyp = -1;
        model.ipar = [[length(varnam)],[this._str2code[varnam-1]],[Method],[ZC],[OutEnd]];
        model.evtin = [1];
        model.evtout = [1];
        model.firing = [0];
        model.blocktype = "d";
        model.dep_ut = [false,true];
        gr_i = [];
        exprs = [[string(varnam)],[string(Method)],[string(ZC)],[string(OutEnd)]];
        this.x = standard_define([3.5,2],model,exprs,gr_i);
        return new BasicBlock(this.x);
    }
    FROMWS_c.prototype.details = function FROMWS_c() {
        return this.x;
    }
    FROMWS_c.prototype.get = function FROMWS_c() {
    }
    FROMWS_c.prototype.set = function FROMWS_c() {
        this.x = arg1;
        graphics = arg1.graphics;
        exprs = graphics.exprs;
        model = arg1.model;
        while (true) {
            [ok,varnam,Method,ZC,OutEnd,exprs] = scicos_getvalue("Set From_Workspace block parameters",[["Variable name"],["Interpolation Method"],["Enable zero crossing(0:No, 1:Yes)?"],["Output at end(0:Zero, 1:Hold, 2:Repeat)"]],list("str",1,"vec",1,"vec",1,"vec",1),exprs);
            if (!ok) {
                break;
            }
            if (!(Method==0||Method==1||Method==2||Method==3)) {
                message("Interpolation method should be chosen in [0,1,2,3]");
                ok = false;
            }
            if (!(ZC==0||ZC==1)) {
                message("Zero crossing should be either 0 or 1");
                ok = false;
            }
            if (!(OutEnd==0||OutEnd==1||OutEnd==2)) {
                message("Output at end option should be either 0 or 1");
                ok = false;
            }
            r = false;
            ierr = execstr("r=validvar(varnam)","errcatch");
            if (!r) {
                message([["Invalid variable name."],["Please choose another variable name."]]);
                ok = false;
            }
            if (ok) {
                model.ipar = [[length(varnam)],[this._str2code[varnam-1]],[Method],[ZC],[OutEnd]];
                [model,graphics,ok] = set_io(model,graphics,list(),list([-1,-2],-1),1,1);
                if (ok) {
                    graphics.exprs = exprs;
                    this.x.graphics = graphics;
                    this.x.model = model;
                    break;
                }
            }
        }
        return new BasicBlock(this.x);
    }
}