<%
SAVE 'context' STORE
[ 'gts' 'modulo' ] STORE
0 'add_val' STORE
[
$gts
<%
'mw' STORE
$mw 0 GET // Tick
$mw 4 GET -1 GET // Lat
$mw 5 GET -1 GET // Lon
$mw 6 GET -1 GET // Elev
$mw 7 GET -1 GET
$mw 7 GET 0 GET - 'diff' STORE
$diff ABS $modulo 2.0 / >
<%
$diff 0 <
<% $add_val $modulo + 'add_val' STORE %>
<% $add_val $modulo - 'add_val' STORE %>
IFTE
%>
IFT
$mw 7 GET -1 GET $add_val + // Value
%>
1 SNAPSHOTN EVAL
{ 'modulo' $modulo } DEREF
MACROMAPPER
1 0 0
]
MAP
$gts TYPEOF 'LIST' !=
<% 0 GET %>
IFT
$context RESTORE
%>