/ real-time feed (simulate)

\m i 12400
schema:{W::_w;.+(`t`sym`val;(!0;0#`;0#0.0))}                                / return schema to t
tick:{if[W>0;.[3:;(W;(`tick;,data`));:]]}                                   / send record to t
data:{(_t;`wilson`omega`larsen()_draw 3;100+(1 -1()_draw 2)*()_draw 0)}     / one record of t
start:{.t..t:".k.tick`";."\\t 1"}                                           / set timer
close:{W::0N}                                                               / close W
close`
start`