%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:157
File Name:P061801
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
0\->G
0\->I
\For 10\->A \To 99
\Int (A/10)\->B
A-10B\->C
B+C\->D
\If A=7D
\Then 10C+B\->E
E/D\->F
\If G=0
\Then F\->H
\IfEnd
G+1\->G
\If \Abs (F-H)/F>1\EE\(-)5
\Then 1\->I
\IfEnd
\IfEnd
\Next 
\If G\<>0\ And I=0
\Then "Common W:"
H
\Else "No"
\IfEnd
%End