�file
�

�check
($�#E%=0:� Total>OTOT �#E%,Total-1
2�#E%:�:*FX15,0
<�
F� �print
P�
Z�5,7);"X";�15);"Y"
d�0,10);
n� No=Presno-5 � Presno+5
x'� No<1 � No>Total � ��39," "):�tj@
��#E%=12*No-6
�
�#E%,X
�
�#E%,Y
��5);X;�20);Y;�32);No
��
��0,15);">"
��
�� �input
��0,15);�39," ")
�� �0,15);X
�� �19,15);Y
��#E%=12*Presno-6
�
�#E%,X


�#E%,Y

Presno=Presno+1

�

"� �check

,
flag=1

6�

@%� �(-58) � Presno=Presno-1:flag=1

J%� �(-42) � Presno=Presno+1:flag=1

T� �(-26) � �input:flag=1

^� Presno<1 Presno=1

hK� Presno>Total � �#E%=12*Presno-6:E=0:�#E%,E:�#E%,E:Total=Presno:flag=1

r� flag=1 flag=0:�print

|� �(-97)

��

�� �file

�Presno=0

��

��0,10)

��"FILENAME : ";nm$

�
E%=�(nm$)

�=� E%=0 �#E%:E%=�(nm$):�#E%:E%=�(nm$):Total=0:OTOT=0:�dtA

�� E%<>0 �#E%,Total

�OTOT=Total

�#�"STARTING AT RECORD : ";Presno

�� Presno>Total Presno=Total

��
�

00000000  0d 00 0a 09 f2 66 69 6c  65 0d 00 14 05 db 0d 00  |.....file.......|
00000010  1e 0a f2 63 68 65 63 6b  0d 00 28 24 cf 23 45 25  |...check..($.#E%|
00000020  3d 30 3a e7 20 54 6f 74  61 6c 3e 4f 54 4f 54 20  |=0:. Total>OTOT |
00000030  f1 23 45 25 2c 54 6f 74  61 6c 2d 31 0d 00 32 12  |.#E%,Total-1..2.|
00000040  d9 23 45 25 3a db 3a 2a  46 58 31 35 2c 30 0d 00  |.#E%:.:*FX15,0..|
00000050  3c 05 e0 0d 00 46 0c dd  20 f2 70 72 69 6e 74 0d  |<....F.. .print.|
00000060  00 50 05 db 0d 00 5a 17  f1 8a 35 2c 37 29 3b 22  |.P....Z...5,7);"|
00000070  58 22 3b 8a 31 35 29 3b  22 59 22 0d 00 64 0c f1  |X";.15);"Y"..d..|
00000080  8a 30 2c 31 30 29 3b 0d  00 6e 1c e3 20 4e 6f 3d  |.0,10);..n.. No=|
00000090  50 72 65 73 6e 6f 2d 35  20 b8 20 50 72 65 73 6e  |Presno-5 . Presn|
000000a0  6f 2b 35 0d 00 78 27 e7  20 4e 6f 3c 31 20 84 20  |o+5..x'. No<1 . |
000000b0  4e 6f 3e 54 6f 74 61 6c  20 8c 20 f1 c4 33 39 2c  |No>Total . ..39,|
000000c0  22 20 22 29 3a e5 8d 74  6a 40 0d 00 82 10 cf 23  |" "):..tj@.....#|
000000d0  45 25 3d 31 32 2a 4e 6f  2d 36 0d 00 8c 0a e8 23  |E%=12*No-6.....#|
000000e0  45 25 2c 58 0d 00 96 0a  e8 23 45 25 2c 59 0d 00  |E%,X.....#E%,Y..|
000000f0  a0 19 f1 8a 35 29 3b 58  3b 8a 32 30 29 3b 59 3b  |....5);X;.20);Y;|
00000100  8a 33 32 29 3b 4e 6f 0d  00 aa 05 ed 0d 00 b4 0f  |.32);No.........|
00000110  f1 8a 30 2c 31 35 29 3b  22 3e 22 0d 00 be 05 e1  |..0,15);">".....|
00000120  0d 00 c8 0c dd 20 f2 69  6e 70 75 74 0d 00 d2 14  |..... .input....|
00000130  f1 8a 30 2c 31 35 29 3b  c4 33 39 2c 22 20 22 29  |..0,15);.39," ")|
00000140  0d 00 dc 0e e8 20 8a 30  2c 31 35 29 3b 58 0d 00  |..... .0,15);X..|
00000150  e6 0f e8 20 8a 31 39 2c  31 35 29 3b 59 0d 00 f0  |... .19,15);Y...|
00000160  14 cf 23 45 25 3d 31 32  2a 50 72 65 73 6e 6f 2d  |..#E%=12*Presno-|
00000170  36 0d 00 fa 0a f1 23 45  25 2c 58 0d 01 04 0a f1  |6.....#E%,X.....|
00000180  23 45 25 2c 59 0d 01 0e  13 50 72 65 73 6e 6f 3d  |#E%,Y....Presno=|
00000190  50 72 65 73 6e 6f 2b 31  0d 01 18 05 e1 0d 01 22  |Presno+1......."|
000001a0  0c dd 20 f2 63 68 65 63  6b 0d 01 2c 0a 66 6c 61  |.. .check..,.fla|
000001b0  67 3d 31 0d 01 36 05 f5  0d 01 40 25 e7 20 a6 28  |g=1..6....@%. .(|
000001c0  2d 35 38 29 20 8c 20 50  72 65 73 6e 6f 3d 50 72  |-58) . Presno=Pr|
000001d0  65 73 6e 6f 2d 31 3a 66  6c 61 67 3d 31 0d 01 4a  |esno-1:flag=1..J|
000001e0  25 e7 20 a6 28 2d 34 32  29 20 8c 20 50 72 65 73  |%. .(-42) . Pres|
000001f0  6e 6f 3d 50 72 65 73 6e  6f 2b 31 3a 66 6c 61 67  |no=Presno+1:flag|
00000200  3d 31 0d 01 54 1c e7 20  a6 28 2d 32 36 29 20 8c  |=1..T.. .(-26) .|
00000210  20 f2 69 6e 70 75 74 3a  66 6c 61 67 3d 31 0d 01  | .input:flag=1..|
00000220  5e 17 e7 20 50 72 65 73  6e 6f 3c 31 20 50 72 65  |^.. Presno<1 Pre|
00000230  73 6e 6f 3d 31 0d 01 68  4b e7 20 50 72 65 73 6e  |sno=1..hK. Presn|
00000240  6f 3e 54 6f 74 61 6c 20  8c 20 cf 23 45 25 3d 31  |o>Total . .#E%=1|
00000250  32 2a 50 72 65 73 6e 6f  2d 36 3a 45 3d 30 3a f1  |2*Presno-6:E=0:.|
00000260  23 45 25 2c 45 3a f1 23  45 25 2c 45 3a 54 6f 74  |#E%,E:.#E%,E:Tot|
00000270  61 6c 3d 50 72 65 73 6e  6f 3a 66 6c 61 67 3d 31  |al=Presno:flag=1|
00000280  0d 01 72 1a e7 20 66 6c  61 67 3d 31 20 66 6c 61  |..r.. flag=1 fla|
00000290  67 3d 30 3a f2 70 72 69  6e 74 0d 01 7c 0c fd 20  |g=0:.print..|.. |
000002a0  a6 28 2d 39 37 29 0d 01  86 05 e1 0d 01 90 0b dd  |.(-97)..........|
000002b0  20 f2 66 69 6c 65 0d 01  9a 0c 50 72 65 73 6e 6f  | .file....Presno|
000002c0  3d 30 0d 01 a4 05 db 0d  01 ae 0b f1 8a 30 2c 31  |=0...........0,1|
000002d0  30 29 0d 01 b8 16 e8 22  46 49 4c 45 4e 41 4d 45  |0)....."FILENAME|
000002e0  20 3a 20 22 3b 6e 6d 24  0d 01 c2 0d 45 25 3d ad  | : ";nm$....E%=.|
000002f0  28 6e 6d 24 29 0d 01 cc  3d e7 20 45 25 3d 30 20  |(nm$)...=. E%=0 |
00000300  d9 23 45 25 3a 45 25 3d  ae 28 6e 6d 24 29 3a d9  |.#E%:E%=.(nm$):.|
00000310  23 45 25 3a 45 25 3d ad  28 6e 6d 24 29 3a 54 6f  |#E%:E%=.(nm$):To|
00000320  74 61 6c 3d 30 3a 4f 54  4f 54 3d 30 3a e5 8d 64  |tal=0:OTOT=0:..d|
00000330  74 41 0d 01 d6 16 e7 20  45 25 3c 3e 30 20 e8 23  |tA..... E%<>0 .#|
00000340  45 25 2c 54 6f 74 61 6c  0d 01 db 0e 4f 54 4f 54  |E%,Total....OTOT|
00000350  3d 54 6f 74 61 6c 0d 01  e0 23 e8 22 53 54 41 52  |=Total...#."STAR|
00000360  54 49 4e 47 20 41 54 20  52 45 43 4f 52 44 20 3a  |TING AT RECORD :|
00000370  20 22 3b 50 72 65 73 6e  6f 0d 01 ea 1f e7 20 50  | ";Presno..... P|
00000380  72 65 73 6e 6f 3e 54 6f  74 61 6c 20 50 72 65 73  |resno>Total Pres|
00000390  6e 6f 3d 54 6f 74 61 6c  0d 01 f4 05 e1 0d ff     |no=Total.......|
0000039f