%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:233
File Name:P073001
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\Prog "P073001A"
\Seq(0,A,1,255,1)\->\List 2
0\->A
\Lbl 0
A+1\->A
B\->\List 2[A]
\Lbl 1
\List 2[A]\->B
256\Frac (B/256)\->C
\List 1[C]\->D
D=0\=>\Goto2
\Int (B/256)\->B
\Int (D/256^B)\->D
D=0\=>\Goto3
256\Frac (D/256)\->E
E=0\=>\Goto4
E\->B
\Goto0
\Lbl 2
\Prog "P073001B"
\Lbl 3
A-1\->A
A=0\=>\Goto5
\Lbl 4
\List 2[A]+256\->\List 2[A]
\Goto1
\Lbl 5
\Prog "P073001C"
"\Done"
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:127
File Name:P073001A
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
{2*256+3,4*256+5,5*256+6,7*256+8,8*256+9,9*256+10,11,11*256+12,12*256+13,13*256,14,14*256+15,15*256,16,16*256,0}\->\List 1
1\->B
0\->K
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:62
File Name:P073001B
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
0\->D
\For 2\->B \To A-1
\List 2[B]\->C
C-256\Int (C/256)\->C
100D+C\->D
\Next 
D\DispK+1\->K
%End
%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:23
File Name:P073001C
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
"Number of paths"
K\Disp
%End