%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:403
File Name:DTMATCH
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\Cls
\Lbl 4
(\Ran#*1.8+.5)\->P
(\Ran#*1.8+.6)\->Q
(\Ran#*2+.5)\->R
\Lbl 0
\ClrGraph
\ClrList
\ClrText
0\->\Xmin
99\->\Xmax
10\->\Xscl
0\->\Ymin
2.5\->\Ymax
.5\->\Yscl
{1,0}\->\List 1:\Send(\List 1)
{1,4,2}\->\List 1:\Send(\List 1)
\Text 5,2,"DIST(M)"
\Text 52,100,"TIME(S)"
\F-Line 0,P,35,Q
\F-Line 35,Q,60,Q
\F-Line 60,Q,99,R
{3,0.001,\(-)1,0}\->\List 1:\Send(\List 1)
\Seq(0,X,1,99,1)\->\List 4
'
\For 1\->I \To 99 \Step 1
\Receive(A)
A\->\List 4[I]
\PlotOn I,\List 4[I]
\Next 
"MENU"
"1:SAME CURVE"
"2:NEW CURVE"
"3:QUIT"
?\->M
M=1\=>\Goto0
M=2\=>\Goto4
\S-Gph2 \DrawOff
\S-Gph3 \DrawOff
\Seq(.1*N,N,0,98,1)\->\List 2
\S-Gph1 \DrawOn,\xyLine,\List2,\List4,1,\Dot,\Orange 
\DrawStat
%End