execstr _Trak.Lat hex2asc !Trak.Lat _Trak.Lon hex2asc !Trak.Lon _Trak.Lat _Trak.Lon rot execstr _Trak.Lat hex2asc !Trak.Lat _Trak.Lon hex2asc !Trak.Lon _Trak.Lon sub abs exch _Trak.Lat sub abs add dup logs _Sim.Choke gt