%Header Record
Format:MCS1
Type Number:1
File Name:SPL-MTN2
Option Name:
Communication SW:0
Capacity:621
Data Type:PG
%Data Record
Password:
BaseN:0
\ClrText
"\aster SIMPLE MORTION 2 \aster"
"   CASIO Education          Web Site        casio.co.jp/edu_e/"
\Locate 1,5,"   ARE YOU READY?"
\Locate 1,7,"    PRESS:[EXE]"
\Lbl 1
\Getkey
\If \Ans=31
\Then \Goto2
\IfEnd
\Goto1
\Lbl 2
\ClrText
"HOW MANY SECOND         DO YOU MEASURE?"
?\->A
\ClrText
"\aster SIMPLE MORTION 2 \aster"
\Locate 1,2,"LET'S DATA SAMPLING."
\Locate 1,3,"    PRESS:[TRIGGER]"\Disp{0}\->\List 6
\Send(\List 6)
{1,4,1}\->\List 6
\Send(\List 6)
{3,A,126,1}\->\List 6
\Send(\List 6)\Disp\Receive(\List 1)
\Receive(\List 2)
\S-WindAuto
\S-Gph1 \DrawOn,\Scatter,\List 1,\List 2,1,\Dot
\S-Gph2 \DrawOff
\S-Gph3 \DrawOff
\DrawStat\Disp"THE MEASUREMENT OF THE OTHER BEGINS"
""
""
"  PRESS:[TRIGGER] "
{1,4,1}\->\List 6
\Send(\List 6)
{3,A,126,1}\->\List 6
\Send(\List 6)\Disp\Receive(\List 3)
\Receive(\List 4)
\S-WindMan
\S-Gph1 \DrawOn,\Scatter,\List 1,\List 2,1,\Dot
\S-Gph2 \DrawOn,\Scatter,\List 3,\List 4,1,\Dot
\S-Gph3 \DrawOff
\DrawStat
\Text 1,1,"DIST"
\Text 45,100,"TIME"\@00
%End