1

// widget_switch.ysl2

     2

     3

widget_desc("Switch") {

     4

    longdesc

     5

    ||

     6

    Switch widget hides all subelements whose label do not match given

     7

    variable current value representation. For exemple if given variable type

     8

    is HMI_INT and value is 1, then elements with label '1' will be displayed.

     9

    Label can have comments, so '1#some comment' would also match. If matching

    10

    variable of type HMI_STRING, then double quotes must be used. For exemple,

    11

    '"hello"' or '"hello"#another comment' match HMI_STRING 'hello'.

    12

    ||

    13

    14

    shortdesc > Show elements whose label match value.

    15

    16

    // TODO: add optional format/precision argument to support floating points

    17

    // TODO: support (in)equations and ranges

    18

    19

    path name="value" accepts="HMI_INT,HMI_STRING" > value to compare to labels

    20

    21

}

    22

    23

widget_class("Switch")

    24

    ||

    25

        frequency = 5;

    26

        dispatch(value) {

    27

            for(let choice of this.choices){

    28

                if(value != choice.value){

    29

                    choice.elt.setAttribute("style", "display:none");

    30

                } else {

    31

                    choice.elt.setAttribute("style", choice.style);

    32

                }

    33

            }

    34

        }

    35

    ||

    36

    37

widget_defs("Switch") {

    38

    |     choices: [

    39

    const "regex",!"'^(\"[^\"].*\"|\-?[0-9]+|false|true)(#.*)?$'"!;

    40

    41

    const "subelts", "$result_widgets[@id = $hmi_element/@id]//*";

    42

    const "subwidgets", "$subelts//*[@id = $hmi_widgets/@id]";

    43

    const "accepted", "$subelts[not(ancestor-or-self::*/@id = $subwidgets/@id)]";

    44

    45

    foreach "$accepted[regexp:test(@inkscape:label,$regex)]" {

    46

        const "literal", "regexp:match(@inkscape:label,$regex)[2]";

    47

    |         {

    48

    |             elt:id("«@id»"),

    49

                  // TODO : use style.display = "none" to hide element

    50

    |             style:"«@style»",

    51

    |             value:«$literal»

    52

    |         }`if "position()!=last()" > ,`

    53

    }

    54

    |     ],

    55

}