"�"�***************************
"�"�*�CEEFAX   INDEX  PRINTER�*
"�"�*�Designed  for  use with�*
("�"�*�EPSON MX80 III  printer�*
2"�"�*�(c)J.J.Brayshaw�July 87�*
<"�"�***************************
F:
P�7
Z
*TELESOFT
d�23;8202;0;0;0;
n	*BBC1
x*HON
���DpC
��=&5F00
�
�title
�
�C% 14
�*loc%=&6000:store%=loc%:page_length%=24
��setpages(page_length%)
��N%=0�5:�choose_page
�.�setgrabber(N%,m%,p%,sp%,loc%+(N%*&400)):�
��wait_for_pages
�!�stop_updates:�reset_grabbers
�Q笤printer �report(�136+"Set printer & press SPACE"):���=32:�report(""):�df@
��
�!�"�No. of lines not required:

btm=2:top=7

�15


� C 25

"�2

,"�"�Set double width title, and

6�"�perforation skip-over:

@�1,14,1,27,1,78,1,3

J�"   CEEFAX INDEX"'

TU�convert_line(&6000):�3+$&5F08':�convert_line(&6000+(6*40)):�$&5F00'" ";�38,"=")

^�pp%=0�5

h'�line=(40*top) �(&400-(40*btm)) �40

r(�convert_line(&6000+(pp%*&400)+line)

|7�$&5F00=�41," ") ��$&5F00,"SUBJECT INDEX")<>0 �tPA

��$&5F00

��

��

�$�"�Form-feed, cancel perf. skip,

��"�& dis-able printer:

��1,27,1,79,1,12,3

�	*HOFF

�	*DISC

� �:�report("Index complete.")

�	�3,26

��

���os(C$)

�	$C=C$
X%=C �256:Y%=C �256:�&FFF7
�
��convert_line(start%)
&�chr%=0�40
0.�?(start%+chr%)<160 ?(&5F00+chr%)=32:�DNB
:/�?(start%+chr%)=255 ?(start%+chr%)=32:�DNB
D&?(&5F00+chr%)=(?(start%+chr%))�&7F
N�
X
?&5F29=&D
b�
l��title
v*HON
�%�5,0);�132;�157;�135;�20,0);�156
�4�148;"<,,4  (l,,4  (l,,4     pppppppppppppppp";
�@�148;"5j�57c{j {57c{j 157k`�"�132;�157;�131;"INDEX PRINTER"
�>�148;"-,,%5(o*,,%5h�*,-%7h��"�132;�157;�131;"  (c)J.J.B."
�"�148;"   ````   ````   `````"
��0,24);�132;�157;�131;
��28,0,23,39,5
��
���report(A$)
�
L%=�:D%=�
��3
��26:�5,24)�33," ");
��5,24)A$;
�28,0,23,39,5

�L%,D%);
�2
 �
*
ݤprinter
4*FX21,3
>�2,1,0,1,0,1,0,3
H�Q=1�100:�
R�(-4)<>63 =� �=�
\�"�Page & sub-page nos:
f5� 1990001,1990002,1990003,1990004,1990005,1990006
p�"�ERROR TRAP
z�1,27,1,79,3
�	*HOFF
�3�report(�136+"Sorry, Error "+�(�)+" detected.")
��3
��
��26
��
�:
���setpages(no%)
�C%?0=7:C%?1=no%
�%A%=&7A:X%=C%�256:Y%=C%�256:�&FFF1
��
�:
���choose_page
�p$
m%=�("&"+�p$,1))
p%=�("&"+�p$,2,2))
$*�(p$)>3 sp%=�("&"+�p$,4)) � sp%=&3F7F
.�
8:
B,��setgrabber(no%,mag%,page%,sub%,store%)
L%A%=&7A:C%?0=5:X%=C%�256:Y%=C%�256
V]C%?1=no%:C%?2=mag%:C%?3=page%:C%?4=sub%�256:C%?5=sub%�256:C%?6=store%�256:C%?7=store%�256
`
�&FFF1
jO�0,(1+no%))"�      Page ";~mag%;�"00"+�~(page%),2);"s";�"0000"+�~(sub%),4)
t�
~:
�ݤcheck_got(no%)
�%A%=&7A:C%?0=2:X%=C%�256:Y%=C%�256
�C%?1=no%:�&FFF1
��(C%?2)�2=2 =� � =�
���stop_updates
�#�"�Check no updates being done:
�%A%=&7A:C%?0=2:X%=C%�256:Y%=C%�256
��J%=0�5
��
�C%?1=J%:�&FFF1
��((C%?2)�4)=0
��"�then hold page:
�set_hold(J%)

�
�
��set_hold(no%)
(%A%=&7A:C%?0=3:X%=C%�256:Y%=C%�256
2C%?1=no%:C%?2=3:�&FFF1
<�
F:
P��reset_grabbers
ZA%=&7A:X%=C%�256:Y%=C%�256
dC%?0=14
n
�&FFF1
x�
���wait_for_pages
�
�:S%=�
�9�G%=0�5:� � �check_got(G%) S%=� � �0,(1+G%))"�Found"
��
�	�S%=�
��
�

00000000  0d 00 0a 22 f4 22 81 2a  2a 2a 2a 2a 2a 2a 2a 2a  |...".".*********|
00000010  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000020  2a 2a 0d 00 14 22 f4 22  81 2a 83 43 45 45 46 41  |**...".".*.CEEFA|
00000030  58 20 20 20 49 4e 44 45  58 20 20 50 52 49 4e 54  |X   INDEX  PRINT|
00000040  45 52 81 2a 0d 00 1e 22  f4 22 81 2a 86 44 65 73  |ER.*...".".*.Des|
00000050  69 67 6e 65 64 20 20 66  6f 72 20 20 75 73 65 20  |igned  for  use |
00000060  77 69 74 68 81 2a 0d 00  28 22 f4 22 81 2a 86 45  |with.*..(".".*.E|
00000070  50 53 4f 4e 20 4d 58 38  30 20 49 49 49 20 20 70  |PSON MX80 III  p|
00000080  72 69 6e 74 65 72 81 2a  0d 00 32 22 f4 22 81 2a  |rinter.*..2".".*|
00000090  82 28 63 29 4a 2e 4a 2e  42 72 61 79 73 68 61 77  |.(c)J.J.Brayshaw|
000000a0  85 4a 75 6c 79 20 38 37  81 2a 0d 00 3c 22 f4 22  |.July 87.*..<"."|
000000b0  81 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |.***************|
000000c0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 0d 00 46 05  |************..F.|
000000d0  3a 0d 00 50 06 eb 37 0d  00 5a 0d 2a 54 45 4c 45  |:..P..7..Z.*TELE|
000000e0  53 4f 46 54 0d 00 64 13  ef 32 33 3b 38 32 30 32  |SOFT..d..23;8202|
000000f0  3b 30 3b 30 3b 30 3b 0d  00 6e 09 2a 42 42 43 31  |;0;0;0;..n.*BBC1|
00000100  0d 00 78 08 2a 48 4f 4e  0d 00 82 0b ee 85 e5 8d  |..x.*HON........|
00000110  44 70 43 0d 00 8c 0b d3  3d 26 35 46 30 30 0d 00  |DpC.....=&5F00..|
00000120  96 0a f2 74 69 74 6c 65  0d 00 a0 0a de 43 25 20  |...title.....C% |
00000130  31 34 0d 00 aa 2a 6c 6f  63 25 3d 26 36 30 30 30  |14...*loc%=&6000|
00000140  3a 73 74 6f 72 65 25 3d  6c 6f 63 25 3a 70 61 67  |:store%=loc%:pag|
00000150  65 5f 6c 65 6e 67 74 68  25 3d 32 34 0d 00 b4 1b  |e_length%=24....|
00000160  f2 73 65 74 70 61 67 65  73 28 70 61 67 65 5f 6c  |.setpages(page_l|
00000170  65 6e 67 74 68 25 29 0d  00 be 18 e3 4e 25 3d 30  |ength%).....N%=0|
00000180  b8 35 3a f2 63 68 6f 6f  73 65 5f 70 61 67 65 0d  |.5:.choose_page.|
00000190  00 c8 2e f2 73 65 74 67  72 61 62 62 65 72 28 4e  |....setgrabber(N|
000001a0  25 2c 6d 25 2c 70 25 2c  73 70 25 2c 6c 6f 63 25  |%,m%,p%,sp%,loc%|
000001b0  2b 28 4e 25 2a 26 34 30  30 29 29 3a ed 0d 00 d2  |+(N%*&400)):....|
000001c0  13 f2 77 61 69 74 5f 66  6f 72 5f 70 61 67 65 73  |..wait_for_pages|
000001d0  0d 00 dc 21 f2 73 74 6f  70 5f 75 70 64 61 74 65  |...!.stop_update|
000001e0  73 3a f2 72 65 73 65 74  5f 67 72 61 62 62 65 72  |s:.reset_grabber|
000001f0  73 0d 00 e6 51 e7 ac a4  70 72 69 6e 74 65 72 20  |s...Q...printer |
00000200  f2 72 65 70 6f 72 74 28  bd 31 33 36 2b 22 53 65  |.report(.136+"Se|
00000210  74 20 70 72 69 6e 74 65  72 20 26 20 70 72 65 73  |t printer & pres|
00000220  73 20 53 50 41 43 45 22  29 3a f5 fd a5 3d 33 32  |s SPACE"):...=32|
00000230  3a f2 72 65 70 6f 72 74  28 22 22 29 3a e5 8d 64  |:.report(""):..d|
00000240  66 40 0d 00 f0 05 db 0d  00 fa 21 f4 22 82 4e 6f  |f@........!.".No|
00000250  2e 20 6f 66 20 6c 69 6e  65 73 20 6e 6f 74 20 72  |. of lines not r|
00000260  65 71 75 69 72 65 64 3a  0d 01 04 0f 62 74 6d 3d  |equired:....btm=|
00000270  32 3a 74 6f 70 3d 37 0d  01 0e 07 ef 31 35 0d 01  |2:top=7.....15..|
00000280  18 0a de 20 43 20 32 35  0d 01 22 06 ef 32 0d 01  |... C 25.."..2..|
00000290  2c 22 f4 22 82 53 65 74  20 64 6f 75 62 6c 65 20  |,".".Set double |
000002a0  77 69 64 74 68 20 74 69  74 6c 65 2c 20 61 6e 64  |width title, and|
000002b0  0d 01 36 1d f4 22 82 70  65 72 66 6f 72 61 74 69  |..6..".perforati|
000002c0  6f 6e 20 73 6b 69 70 2d  6f 76 65 72 3a 0d 01 40  |on skip-over:..@|
000002d0  17 ef 31 2c 31 34 2c 31  2c 32 37 2c 31 2c 37 38  |..1,14,1,27,1,78|
000002e0  2c 31 2c 33 0d 01 4a 17  f1 22 20 20 20 43 45 45  |,1,3..J.."   CEE|
000002f0  46 41 58 20 49 4e 44 45  58 22 27 0d 01 54 55 f2  |FAX INDEX"'..TU.|
00000300  63 6f 6e 76 65 72 74 5f  6c 69 6e 65 28 26 36 30  |convert_line(&60|
00000310  30 30 29 3a f1 89 33 2b  24 26 35 46 30 38 27 3a  |00):..3+$&5F08':|
00000320  f2 63 6f 6e 76 65 72 74  5f 6c 69 6e 65 28 26 36  |.convert_line(&6|
00000330  30 30 30 2b 28 36 2a 34  30 29 29 3a f1 24 26 35  |000+(6*40)):.$&5|
00000340  46 30 30 27 22 20 22 3b  c4 33 38 2c 22 3d 22 29  |F00'" ";.38,"=")|
00000350  0d 01 5e 0c e3 70 70 25  3d 30 b8 35 0d 01 68 27  |..^..pp%=0.5..h'|
00000360  e3 6c 69 6e 65 3d 28 34  30 2a 74 6f 70 29 20 b8  |.line=(40*top) .|
00000370  28 26 34 30 30 2d 28 34  30 2a 62 74 6d 29 29 20  |(&400-(40*btm)) |
00000380  88 34 30 0d 01 72 28 f2  63 6f 6e 76 65 72 74 5f  |.40..r(.convert_|
00000390  6c 69 6e 65 28 26 36 30  30 30 2b 28 70 70 25 2a  |line(&6000+(pp%*|
000003a0  26 34 30 30 29 2b 6c 69  6e 65 29 0d 01 7c 37 e7  |&400)+line)..|7.|
000003b0  24 26 35 46 30 30 3d c4  34 31 2c 22 20 22 29 20  |$&5F00=.41," ") |
000003c0  84 a7 24 26 35 46 30 30  2c 22 53 55 42 4a 45 43  |..$&5F00,"SUBJEC|
000003d0  54 20 49 4e 44 45 58 22  29 3c 3e 30 20 e5 8d 74  |T INDEX")<>0 ..t|
000003e0  50 41 0d 01 86 0b f1 24  26 35 46 30 30 0d 01 90  |PA.....$&5F00...|
000003f0  05 ed 0d 01 9a 05 ed 0d  01 a4 24 f4 22 82 46 6f  |..........$.".Fo|
00000400  72 6d 2d 66 65 65 64 2c  20 63 61 6e 63 65 6c 20  |rm-feed, cancel |
00000410  70 65 72 66 2e 20 73 6b  69 70 2c 0d 01 ae 1a f4  |perf. skip,.....|
00000420  22 82 26 20 64 69 73 2d  61 62 6c 65 20 70 72 69  |".& dis-able pri|
00000430  6e 74 65 72 3a 0d 01 b8  15 ef 31 2c 32 37 2c 31  |nter:.....1,27,1|
00000440  2c 37 39 2c 31 2c 31 32  2c 33 0d 01 c2 09 2a 48  |,79,1,12,3....*H|
00000450  4f 46 46 0d 01 cc 09 2a  44 49 53 43 0d 01 d6 20  |OFF....*DISC... |
00000460  db 3a f2 72 65 70 6f 72  74 28 22 49 6e 64 65 78  |.:.report("Index|
00000470  20 63 6f 6d 70 6c 65 74  65 2e 22 29 0d 01 e0 09  | complete.")....|
00000480  ef 33 2c 32 36 0d 01 ea  05 e0 0d 01 f4 0c dd f2  |.3,26...........|
00000490  6f 73 28 43 24 29 0d 01  fe 09 24 43 3d 43 24 0d  |os(C$)....$C=C$.|
000004a0  02 08 1e 58 25 3d 43 20  83 32 35 36 3a 59 25 3d  |...X%=C .256:Y%=|
000004b0  43 20 81 32 35 36 3a d6  26 46 46 46 37 0d 02 12  |C .256:.&FFF7...|
000004c0  05 e1 0d 02 1c 1a dd f2  63 6f 6e 76 65 72 74 5f  |........convert_|
000004d0  6c 69 6e 65 28 73 74 61  72 74 25 29 0d 02 26 0e  |line(start%)..&.|
000004e0  e3 63 68 72 25 3d 30 b8  34 30 0d 02 30 2e e7 3f  |.chr%=0.40..0..?|
000004f0  28 73 74 61 72 74 25 2b  63 68 72 25 29 3c 31 36  |(start%+chr%)<16|
00000500  30 20 3f 28 26 35 46 30  30 2b 63 68 72 25 29 3d  |0 ?(&5F00+chr%)=|
00000510  33 32 3a e5 8d 44 4e 42  0d 02 3a 2f e7 3f 28 73  |32:..DNB..:/.?(s|
00000520  74 61 72 74 25 2b 63 68  72 25 29 3d 32 35 35 20  |tart%+chr%)=255 |
00000530  3f 28 73 74 61 72 74 25  2b 63 68 72 25 29 3d 33  |?(start%+chr%)=3|
00000540  32 3a e5 8d 44 4e 42 0d  02 44 26 3f 28 26 35 46  |2:..DNB..D&?(&5F|
00000550  30 30 2b 63 68 72 25 29  3d 28 3f 28 73 74 61 72  |00+chr%)=(?(star|
00000560  74 25 2b 63 68 72 25 29  29 80 26 37 46 0d 02 4e  |t%+chr%)).&7F..N|
00000570  05 ed 0d 02 58 0d 3f 26  35 46 32 39 3d 26 44 0d  |....X.?&5F29=&D.|
00000580  02 62 05 e1 0d 02 6c 0b  dd f2 74 69 74 6c 65 0d  |.b....l...title.|
00000590  02 76 08 2a 48 4f 4e 0d  02 80 25 f1 8a 35 2c 30  |.v.*HON...%..5,0|
000005a0  29 3b bd 31 33 32 3b bd  31 35 37 3b bd 31 33 35  |);.132;.157;.135|
000005b0  3b 8a 32 30 2c 30 29 3b  bd 31 35 36 0d 02 8a 34  |;.20,0);.156...4|
000005c0  f1 bd 31 34 38 3b 22 3c  2c 2c 34 20 20 28 6c 2c  |..148;"<,,4  (l,|
000005d0  2c 34 20 20 28 6c 2c 2c  34 20 20 20 20 20 70 70  |,4  (l,,4     pp|
000005e0  70 70 70 70 70 70 70 70  70 70 70 70 70 70 22 3b  |pppppppppppppp";|
000005f0  0d 02 94 40 f1 bd 31 34  38 3b 22 35 6a ff 35 37  |...@..148;"5j.57|
00000600  63 7b 6a 20 7b 35 37 63  7b 6a 20 31 35 37 6b 60  |c{j {57c{j 157k`|
00000610  ff 22 bd 31 33 32 3b bd  31 35 37 3b bd 31 33 31  |.".132;.157;.131|
00000620  3b 22 49 4e 44 45 58 20  50 52 49 4e 54 45 52 22  |;"INDEX PRINTER"|
00000630  0d 02 9e 3e f1 bd 31 34  38 3b 22 2d 2c 2c 25 35  |...>..148;"-,,%5|
00000640  28 6f 2a 2c 2c 25 35 68  ff 2a 2c 2d 25 37 68 a2  |(o*,,%5h.*,-%7h.|
00000650  ff 22 bd 31 33 32 3b bd  31 35 37 3b bd 31 33 31  |.".132;.157;.131|
00000660  3b 22 20 20 28 63 29 4a  2e 4a 2e 42 2e 22 0d 02  |;"  (c)J.J.B."..|
00000670  a8 22 f1 bd 31 34 38 3b  22 20 20 20 60 60 60 60  |."..148;"   ````|
00000680  20 20 20 60 60 60 60 20  20 20 60 60 60 60 60 22  |   ````   `````"|
00000690  0d 02 b2 1b f1 8a 30 2c  32 34 29 3b bd 31 33 32  |......0,24);.132|
000006a0  3b bd 31 35 37 3b bd 31  33 31 3b 0d 02 bc 11 ef  |;.157;.131;.....|
000006b0  32 38 2c 30 2c 32 33 2c  33 39 2c 35 0d 02 c6 05  |28,0,23,39,5....|
000006c0  e1 0d 02 d0 10 dd f2 72  65 70 6f 72 74 28 41 24  |.......report(A$|
000006d0  29 0d 02 da 0d 4c 25 3d  b1 3a 44 25 3d bc 0d 02  |)....L%=.:D%=...|
000006e0  e4 06 ef 33 0d 02 ee 18  ef 32 36 3a f1 8a 35 2c  |...3.....26:..5,|
000006f0  32 34 29 c4 33 33 2c 22  20 22 29 3b 0d 02 f8 0e  |24).33," ");....|
00000700  f1 8a 35 2c 32 34 29 41  24 3b 0d 03 02 11 ef 32  |..5,24)A$;.....2|
00000710  38 2c 30 2c 32 33 2c 33  39 2c 35 0d 03 0c 0d f1  |8,0,23,39,5.....|
00000720  8a 4c 25 2c 44 25 29 3b  0d 03 16 06 ef 32 0d 03  |.L%,D%);.....2..|
00000730  20 05 e1 0d 03 2a 0d dd  a4 70 72 69 6e 74 65 72  | ....*...printer|
00000740  0d 03 34 0b 2a 46 58 32  31 2c 33 0d 03 3e 14 ef  |..4.*FX21,3..>..|
00000750  32 2c 31 2c 30 2c 31 2c  30 2c 31 2c 30 2c 33 0d  |2,1,0,1,0,1,0,3.|
00000760  03 48 0e e3 51 3d 31 b8  31 30 30 3a ed 0d 03 52  |.H..Q=1.100:...R|
00000770  15 e7 96 28 2d 34 29 3c  3e 36 33 20 3d a3 20 8b  |...(-4)<>63 =. .|
00000780  3d b9 0d 03 5c 1b f4 22  82 50 61 67 65 20 26 20  |=...\..".Page & |
00000790  73 75 62 2d 70 61 67 65  20 6e 6f 73 3a 0d 03 66  |sub-page nos:..f|
000007a0  35 dc 20 31 39 39 30 30  30 31 2c 31 39 39 30 30  |5. 1990001,19900|
000007b0  30 32 2c 31 39 39 30 30  30 33 2c 31 39 39 30 30  |02,1990003,19900|
000007c0  30 34 2c 31 39 39 30 30  30 35 2c 31 39 39 30 30  |04,1990005,19900|
000007d0  30 36 0d 03 70 11 f4 22  81 45 52 52 4f 52 20 54  |06..p..".ERROR T|
000007e0  52 41 50 0d 03 7a 10 ef  31 2c 32 37 2c 31 2c 37  |RAP..z..1,27,1,7|
000007f0  39 2c 33 0d 03 84 09 2a  48 4f 46 46 0d 03 8e 33  |9,3....*HOFF...3|
00000800  f2 72 65 70 6f 72 74 28  bd 31 33 36 2b 22 53 6f  |.report(.136+"So|
00000810  72 72 79 2c 20 45 72 72  6f 72 20 22 2b c3 28 9f  |rry, Error "+.(.|
00000820  29 2b 22 20 64 65 74 65  63 74 65 64 2e 22 29 0d  |)+" detected.").|
00000830  03 98 06 ef 33 0d 03 a2  05 db 0d 03 ac 07 ef 32  |....3..........2|
00000840  36 0d 03 b6 05 e0 0d 03  c0 05 3a 0d 03 ca 13 dd  |6.........:.....|
00000850  f2 73 65 74 70 61 67 65  73 28 6e 6f 25 29 0d 03  |.setpages(no%)..|
00000860  d4 13 43 25 3f 30 3d 37  3a 43 25 3f 31 3d 6e 6f  |..C%?0=7:C%?1=no|
00000870  25 0d 03 de 25 41 25 3d  26 37 41 3a 58 25 3d 43  |%...%A%=&7A:X%=C|
00000880  25 83 32 35 36 3a 59 25  3d 43 25 81 32 35 36 3a  |%.256:Y%=C%.256:|
00000890  d6 26 46 46 46 31 0d 03  e8 05 e1 0d 03 f2 05 3a  |.&FFF1.........:|
000008a0  0d 03 fc 11 dd f2 63 68  6f 6f 73 65 5f 70 61 67  |......choose_pag|
000008b0  65 0d 04 06 07 f3 70 24  0d 04 10 14 6d 25 3d a0  |e.....p$....m%=.|
000008c0  28 22 26 22 2b c0 70 24  2c 31 29 29 0d 04 1a 16  |("&"+.p$,1))....|
000008d0  70 25 3d a0 28 22 26 22  2b c1 70 24 2c 32 2c 32  |p%=.("&"+.p$,2,2|
000008e0  29 29 0d 04 24 2a e7 a9  28 70 24 29 3e 33 20 73  |))..$*..(p$)>3 s|
000008f0  70 25 3d a0 28 22 26 22  2b c2 70 24 2c 34 29 29  |p%=.("&"+.p$,4))|
00000900  20 8b 20 73 70 25 3d 26  33 46 37 46 0d 04 2e 05  | . sp%=&3F7F....|
00000910  e1 0d 04 38 05 3a 0d 04  42 2c dd f2 73 65 74 67  |...8.:..B,..setg|
00000920  72 61 62 62 65 72 28 6e  6f 25 2c 6d 61 67 25 2c  |rabber(no%,mag%,|
00000930  70 61 67 65 25 2c 73 75  62 25 2c 73 74 6f 72 65  |page%,sub%,store|
00000940  25 29 0d 04 4c 25 41 25  3d 26 37 41 3a 43 25 3f  |%)..L%A%=&7A:C%?|
00000950  30 3d 35 3a 58 25 3d 43  25 83 32 35 36 3a 59 25  |0=5:X%=C%.256:Y%|
00000960  3d 43 25 81 32 35 36 0d  04 56 5d 43 25 3f 31 3d  |=C%.256..V]C%?1=|
00000970  6e 6f 25 3a 43 25 3f 32  3d 6d 61 67 25 3a 43 25  |no%:C%?2=mag%:C%|
00000980  3f 33 3d 70 61 67 65 25  3a 43 25 3f 34 3d 73 75  |?3=page%:C%?4=su|
00000990  62 25 81 32 35 36 3a 43  25 3f 35 3d 73 75 62 25  |b%.256:C%?5=sub%|
000009a0  83 32 35 36 3a 43 25 3f  36 3d 73 74 6f 72 65 25  |.256:C%?6=store%|
000009b0  83 32 35 36 3a 43 25 3f  37 3d 73 74 6f 72 65 25  |.256:C%?7=store%|
000009c0  81 32 35 36 0d 04 60 0a  d6 26 46 46 46 31 0d 04  |.256..`..&FFF1..|
000009d0  6a 4f f1 8a 30 2c 28 31  2b 6e 6f 25 29 29 22 81  |jO..0,(1+no%))".|
000009e0  20 20 20 20 20 20 50 61  67 65 20 22 3b 7e 6d 61  |      Page ";~ma|
000009f0  67 25 3b c2 22 30 30 22  2b c3 7e 28 70 61 67 65  |g%;."00"+.~(page|
00000a00  25 29 2c 32 29 3b 22 73  22 3b c2 22 30 30 30 30  |%),2);"s";."0000|
00000a10  22 2b c3 7e 28 73 75 62  25 29 2c 34 29 0d 04 74  |"+.~(sub%),4)..t|
00000a20  05 e1 0d 04 7e 05 3a 0d  04 88 14 dd a4 63 68 65  |....~.:......che|
00000a30  63 6b 5f 67 6f 74 28 6e  6f 25 29 0d 04 92 25 41  |ck_got(no%)...%A|
00000a40  25 3d 26 37 41 3a 43 25  3f 30 3d 32 3a 58 25 3d  |%=&7A:C%?0=2:X%=|
00000a50  43 25 83 32 35 36 3a 59  25 3d 43 25 81 32 35 36  |C%.256:Y%=C%.256|
00000a60  0d 04 9c 13 43 25 3f 31  3d 6e 6f 25 3a d6 26 46  |....C%?1=no%:.&F|
00000a70  46 46 31 0d 04 a6 17 e7  28 43 25 3f 32 29 80 32  |FF1.....(C%?2).2|
00000a80  3d 32 20 3d b9 20 8b 20  3d a3 0d 04 b0 12 dd f2  |=2 =. . =.......|
00000a90  73 74 6f 70 5f 75 70 64  61 74 65 73 0d 04 ba 23  |stop_updates...#|
00000aa0  f4 22 83 43 68 65 63 6b  20 6e 6f 20 75 70 64 61  |.".Check no upda|
00000ab0  74 65 73 20 62 65 69 6e  67 20 64 6f 6e 65 3a 0d  |tes being done:.|
00000ac0  04 c4 25 41 25 3d 26 37  41 3a 43 25 3f 30 3d 32  |..%A%=&7A:C%?0=2|
00000ad0  3a 58 25 3d 43 25 83 32  35 36 3a 59 25 3d 43 25  |:X%=C%.256:Y%=C%|
00000ae0  81 32 35 36 0d 04 ce 0b  e3 4a 25 3d 30 b8 35 0d  |.256.....J%=0.5.|
00000af0  04 d8 05 f5 0d 04 e2 12  43 25 3f 31 3d 4a 25 3a  |........C%?1=J%:|
00000b00  d6 26 46 46 46 31 0d 04  ec 11 fd 28 28 43 25 3f  |.&FFF1.....((C%?|
00000b10  32 29 80 34 29 3d 30 0d  04 f6 16 f4 22 83 74 68  |2).4)=0.....".th|
00000b20  65 6e 20 68 6f 6c 64 20  70 61 67 65 3a 0d 05 00  |en hold page:...|
00000b30  11 f2 73 65 74 5f 68 6f  6c 64 28 4a 25 29 0d 05  |..set_hold(J%)..|
00000b40  0a 05 ed 0d 05 14 05 e1  0d 05 1e 13 dd f2 73 65  |..............se|
00000b50  74 5f 68 6f 6c 64 28 6e  6f 25 29 0d 05 28 25 41  |t_hold(no%)..(%A|
00000b60  25 3d 26 37 41 3a 43 25  3f 30 3d 33 3a 58 25 3d  |%=&7A:C%?0=3:X%=|
00000b70  43 25 83 32 35 36 3a 59  25 3d 43 25 81 32 35 36  |C%.256:Y%=C%.256|
00000b80  0d 05 32 1a 43 25 3f 31  3d 6e 6f 25 3a 43 25 3f  |..2.C%?1=no%:C%?|
00000b90  32 3d 33 3a d6 26 46 46  46 31 0d 05 3c 05 e1 0d  |2=3:.&FFF1..<...|
00000ba0  05 46 05 3a 0d 05 50 14  dd f2 72 65 73 65 74 5f  |.F.:..P...reset_|
00000bb0  67 72 61 62 62 65 72 73  0d 05 5a 1e 41 25 3d 26  |grabbers..Z.A%=&|
00000bc0  37 41 3a 58 25 3d 43 25  83 32 35 36 3a 59 25 3d  |7A:X%=C%.256:Y%=|
00000bd0  43 25 81 32 35 36 0d 05  64 0b 43 25 3f 30 3d 31  |C%.256..d.C%?0=1|
00000be0  34 0d 05 6e 0a d6 26 46  46 46 31 0d 05 78 05 e1  |4..n..&FFF1..x..|
00000bf0  0d 05 82 14 dd f2 77 61  69 74 5f 66 6f 72 5f 70  |......wait_for_p|
00000c00  61 67 65 73 0d 05 8c 0a  f5 3a 53 25 3d b9 0d 05  |ages.....:S%=...|
00000c10  96 39 e3 47 25 3d 30 b8  35 3a e7 20 ac 20 a4 63  |.9.G%=0.5:. . .c|
00000c20  68 65 63 6b 5f 67 6f 74  28 47 25 29 20 53 25 3d  |heck_got(G%) S%=|
00000c30  a3 20 8b 20 f1 8a 30 2c  28 31 2b 47 25 29 29 22  |. . ..0,(1+G%))"|
00000c40  82 46 6f 75 6e 64 22 0d  05 a0 05 ed 0d 05 aa 09  |.Found".........|
00000c50  fd 53 25 3d b9 0d 05 b4  05 e1 0d ff              |.S%=........|
00000c5c