%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:631
File Name:SWING2
Group Name:
Password:
Option1:
Option2:
Option3:
Option4:
%Data Record
\Cls
"\Expl\ore Mathematics"
" "
"Lesson to"
"Trigonometry by swing"
"Are you ready?"
"         Press:[EXE]"\Disp"How many Pitch?"
?\->A
"How many"
"measures data?"
"[1 to 255]"
?\->B
\S-WindMan
\ViewWindow 0,A*B,1,\(-).1,1.2,1
{0}\->\List 6
\Send(\List 6)
{1,4,2}\->\List 6
\Send(\List 6)
{3,A,B,1,1}\->\List 6
\Send(\List 6)\Disp\Receive(\List 1)
\Receive(\List 2)\Disp"2nd Epl\ore"
"Are you ready?"
"         Press:[EXE]"\Disp{0}\->\List 6
\Send(\List 6)
{1,4,2}\->\List 6
\Send(\List 6)
{3,A,B,1,1}\->\List 6
\Send(\List 6)\Disp\Receive(\List 3)
\Receive(\List 4)
\S-Gph1 \DrawOn,\Scatter,\List1,\List2,1,\Dot,\Blue 
\S-Gph2 \DrawOn,\Scatter,\List3,\List4,1,\Dot,\Orange 
\S-Gph3 \DrawOff
\DrawStat\Disp"3rd Epl\ore"
"Are you ready?"
"         Press:[EXE]"\Disp{0}\->\List 6
\Send(\List 6)
{1,4,2}\->\List 6
\Send(\List 6)
{3,A,B,1,1}\->\List 6
\Send(\List 6)\Disp\Receive(\List 5)
\Receive(\List 6)
\S-Gph1 \DrawOn,\Scatter,\List1,\List2,1,\Dot,\Blue 
\S-Gph2 \DrawOn,\Scatter,\List3,\List4,1,\Dot,\Orange 
\S-Gph3 \DrawOn,\Scatter,\List5,\List6,1,\Dot,\Green 
\DrawStat
%End