Show/Hide data with events

NEWGTS 'a' RENAME 'a' STORE
0 100 <% 'i' STORE $a NOW $i m - NaN NaN NaN RAND ADDVALUE DROP %> FOR
NEWGTS 'b' RENAME 'b' STORE
0 100 <% 'i' STORE $b NOW $i m - NaN NaN NaN RAND ADDVALUE DROP %> FOR
{
  'title' 'My Dashboard With events'
  'vars' {
    'selection' [ 'a' 'b' ]
    'data' [ $a $b ] WRAP
  }
  'tiles' [
    {
      'w' 2 'h' 1 'x' 0 'y' 0
      'type' 'input:multi-cb'
      'macro' <%
        {
            'data' [ 'a' 'b' ]
            'globalParams' { 'input' { 'value' [ 'a' 'b' ] } }
            'events' [ { 'type' 'variable' 'tags' [ 'selection' ] 'selector' 'selection' } ]
        }
      %>
    }
    {
      'type' 'line'
      'w' 12 'h' 1 'x' 2 'y' 0
      'options' { 'eventHandler' 'type=variable,tag=selection' }
      'macro' <%
        $data UNWRAP 'd' STORE
        [ $selection <% 's' STORE
          [ $d [] $s filter.byclass ] FILTER
        %> FOREACH ] FLATTEN
      %>
    }
  ]
}