$�"�*****************************
$�"�*�POOLS  PREDICTOR  PROGRAM�*
$�"�*�MATCH    DATA    COMPILER�*
($�"�*�by�J.J.Brayshaw�Oct. 1985�*
2$�"�*****************************
<$�"�*�February 1988 (6)        �*
F$�"�*****************************
P�7
Z
*TTXON
d�23;8202;0;0;0;
n�"�No of matches on coupon:
xmax%=58
�
�setup
�$� � �adapter �"No Ttx adapter":�
�
*TELESOFT
�	*BBC2
�*HON
��setlength(24)
�\�:�'logo$'''�141;"�Looking for fixture lists ..."'�141;"�Looking for fixture lists ...";
�D�W%=1�12:�setgrabber(W%,3,&31,�("&"+�(W%)),loc%+((W%-1)*&3C0)):�
�got%=�waitforgrabber
�AL%=0:v%=(loc%+((got%-1)*&3C0)):�A%=v% � (v%+&3C0) �40:L%=L%+1
�(�L%=4 ?(A%+80)=&D:A$=$A%:�check($A%)
��
�$SPS=�howmany(got%):�SPS>12 SPS=8

6�:�'logo$'''"�Pages required:";�20);"Pages found:"

2�X%=1�SPS:�7,10+X%);"�331s00";�"0"+�(X%),2):�

�wait_for_pages(SPS)

"�reset_grabbers

,	*HOFF

6�putdata

@
�go_on

J�

T
�"�***

^��process(loc%)

h�F%,L%,T%,M%

r5�F%=loc% � loc%+&398:?F%=(?F%�&7F):�?F%<32 ?F%=32

|�

�L%=1

�<�0,23)"�Processing data for match "'"�Please wait ...";

��F%=loc% � loc%+&398 �40

�L%=L%+1

��L%<6 �d`A

�T%=?(F%+40)

�?(F%+40)=&D:A$=$F%

�?(F%+40)=T%

�@M%=�(A$):�M%<>0 � M%<=max% �27,23);M%;"  ";:�find_teams(M%)

��

��0,23)�(70);

��

�
�"�***
��find_teams(M%)
	��t@B
'HOME$=�A$,18)+" ":AWAY$=�A$,18)+" "
&W%=0:h%=�:a%=�
0
�:W%=W%+1
:�T$
DI�(h%=�) �(�HOME$,�T$,�(T$)-1))<>0) �(�HOME$,�T$,1))<>0):m(M%)=W%:h%=�
NI�(a%=�) �(�AWAY$,�T$,�(T$)-1))<>0) �(�AWAY$,�T$,1))<>0):n(M%)=W%:a%=�
X�(h%=� �a%=�)�(T$="END")
b�T$="END" m(M%)=999
l�
v
�"�***
�o� Ars ,Cov ,Cha ,Chea,Der ,Eve ,Liv ,Lut ,ManU,NotF,Norw ,Newc ,Ox ,Porm,QR,SheW,Soua,Tot ,Wim ,WesH,"Wat "
�v� Ast ,Blab,Bou ,Bra ,Bar ,Bir ,CP,Hud ,Hul ,Ips ,Lee ,Lei ,ManC,Mid ,Mil ,Ol ,Ply ,Rea ,Sto ,SheU,Shr ,Swi ,"WB "
��� Ald ,Brig ,Bury ,BriR,Bren ,Blap,BriC,Chef,CheC,Don ,Ful ,Gill ,Gri ,Mans ,Nort ,NotC,PorV,Pres ,Roth ,Soud,Sun ,Wals ,Wig ,"Yor "
��� Boln,Burn,Carl ,Col ,Camb ,Card ,Crew ,Dar ,Ex ,Hart ,Hal ,Here ,LO,Newp ,Pete ,Roc ,Scar ,Sto ,SwaC,Scu ,Tor ,Tran ,Wol ,"Wrex "
�F� Abe ,Cel ,DunU,Dundee  ,Dunf ,Fal ,Hea ,Hib ,Mort ,Mot ,Ran ,StM
�D� Air ,Clyde  ,Clyk,Dum ,EasF,For ,Hamn,Kil ,Mea ,ParT,QS,"Rai "
�G� AyrU,All ,Alb ,Arb ,Ber ,Brec ,Cow ,ES,Mont ,QP,SJ,SA,Str ,"Ste "
�	� END
�
�"�***
�
��putdata
�M%=�"MDATA"
��A%=1�max%
��m(A%)=999 �#M%,255:�T`C
�m(A%)=0 �#M%,255:�T`C
�#M%,m(A%)
�#M%,n(A%)
 �
*�#M%
4�
>
�"�***
H��setup
R&�M%(max%),n(max%),m(max%),done(12)
\� loc% 12*&3C0
f� C% 20
p�logo$=" ���h��������� �� �������𰴴"+�10+�13+"��� j����������  ������꠵�����"+�10+�13+"��� j���������  ���������������"+�10+�13+"� � *�``````��  ��Pools predictor"+�10+�13
z�
�
�"�***
���oscli(n$)
�%$C%=n$:X%=C%�256:Y%=C%�256:�&FFF7
��
�
�"�***
���go_on
��:�logo$
�b�'''''�141;�131;"Run Pools Predictor now?�(Y/N) "'�141;�131;"Run Pools Predictor now?�(Y/N) ";
��:Q=� �&DF:�Q=78 �Q=89
�&�Q=89 �oscli("FX138,0,89"):�"FOOT"
��:�logo$
��

�"�***
��check(A$)
 �A$,"��������")=0 �error(1)
$�
.
�"�***
8��error(n)
B
�:�'logo$
L5�0,6)�141;"�Sorry, error:"'�141;"�Sorry, error:"
Va�n=1 �''�141;"�Fixture list not being transmitted"'�141;"�Fixture list not being transmitted"
`U�n=1 �''�141;"�Try again later in the week."'�141;"�Try again later in the week."
jA�n=2 �''�141;"�Adapter not on."'�141;"�Adapter not on.":�D~D
t	*HOFF
~�
�
�"�***
�ݤhowmany(got%)
��A%
�G�A%=loc%+((got%-1)*&3C0) � loc%+&50+((got%-1)*&3C0):?A%=(?A%)�&7F:�
�
?A%=&D
��:A%=A%-1:�?A%=�"/"
�=�($(A%+1))
�
�"�***
�ݤadapter:� work% 2
�HA%=&7A:X%=work%�256:Y%=work%�256:?work%=17:�&FFF1:�work%?1=0 =� � =�
�
�"�***
�,��setgrabber(no%,mag%,page%,sub%,store%)
%A%=&7A:C%?0=5:X%=C%�256:Y%=C%�256

]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
�
(
�"�***
2ݤcheck_got(no%)
<%A%=&7A:C%?0=2:X%=C%�256:Y%=C%�256
FC%?1=no%:�&FFF1
P�((C%?2)�2)=2 =� � =�
Z
�"�***
d��stop_updates
n%A%=&7A:C%?0=2:X%=C%�256:Y%=C%�256
x�J%=0�grabbers
��
�C%?1=J%:�&FFF1
��((C%?2)�4)=0
��set_hold(J%)
��
��
�
�"�***
���set_hold(no%)
�%A%=&7A:C%?0=3:X%=C%�256:Y%=C%�256
�C%?1=no%:C%?2=3:�&FFF1
��
�
�"�***
���reset_grabbers
A%=&7A:X%=C%�256:Y%=C%�256
C%?0=14

�&FFF1
"�
,
�"�***
6��wait_for_pages(grabbers)
@
�:S%=�
JE�G%=1�grabbers:I%=�check_got(G%):�I%=� �20,10+G%);"Found":� S%=�
T>�I%=� � done(G%)=�:done(G%)=�:�process(loc%+((G%-1)*&3C0))
^�
h	�S%=�
r�
|
�"�***
�ݤwaitforgrabber
�G%=1
�-I%=�check_got(G%):�I%=� �set_hold(G%):=G%
�G%=(G% �10)+1
�	�tZF
�
�"�***
���setlength(no%)
�5A%=&7A:X%=C%�256:Y%=C%�256:C%?0=7:C%?1=no%:�&FFF1
��
�

00000000  0d 00 0a 24 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 2a 2a 0d 00 14 24  f4 22 81 2a 83 50 4f 4f  |****...$.".*.POO|
00000030  4c 53 20 20 50 52 45 44  49 43 54 4f 52 20 20 50  |LS  PREDICTOR  P|
00000040  52 4f 47 52 41 4d 81 2a  0d 00 1e 24 f4 22 81 2a  |ROGRAM.*...$.".*|
00000050  83 4d 41 54 43 48 20 20  20 20 44 41 54 41 20 20  |.MATCH    DATA  |
00000060  20 20 43 4f 4d 50 49 4c  45 52 81 2a 0d 00 28 24  |  COMPILER.*..($|
00000070  f4 22 81 2a 85 62 79 86  4a 2e 4a 2e 42 72 61 79  |.".*.by.J.J.Bray|
00000080  73 68 61 77 82 4f 63 74  2e 20 31 39 38 35 81 2a  |shaw.Oct. 1985.*|
00000090  0d 00 32 24 f4 22 81 2a  2a 2a 2a 2a 2a 2a 2a 2a  |..2$.".*********|
000000a0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000000b0  2a 2a 2a 2a 0d 00 3c 24  f4 22 81 2a 86 46 65 62  |****..<$.".*.Feb|
000000c0  72 75 61 72 79 20 31 39  38 38 20 28 36 29 20 20  |ruary 1988 (6)  |
000000d0  20 20 20 20 20 20 81 2a  0d 00 46 24 f4 22 81 2a  |      .*..F$.".*|
000000e0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000000f0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 0d 00 50 06  |************..P.|
00000100  eb 37 0d 00 5a 0a 2a 54  54 58 4f 4e 0d 00 64 13  |.7..Z.*TTXON..d.|
00000110  ef 32 33 3b 38 32 30 32  3b 30 3b 30 3b 30 3b 0d  |.23;8202;0;0;0;.|
00000120  00 6e 1f f4 22 82 4e 6f  20 6f 66 20 6d 61 74 63  |.n..".No of matc|
00000130  68 65 73 20 6f 6e 20 63  6f 75 70 6f 6e 3a 0d 00  |hes on coupon:..|
00000140  78 0b 6d 61 78 25 3d 35  38 0d 00 82 0a f2 73 65  |x.max%=58.....se|
00000150  74 75 70 0d 00 8c 24 e7  20 ac 20 a4 61 64 61 70  |tup...$. . .adap|
00000160  74 65 72 20 f1 22 4e 6f  20 54 74 78 20 61 64 61  |ter ."No Ttx ada|
00000170  70 74 65 72 22 3a e0 0d  00 96 0d 2a 54 45 4c 45  |pter":.....*TELE|
00000180  53 4f 46 54 0d 00 a0 09  2a 42 42 43 32 0d 00 aa  |SOFT....*BBC2...|
00000190  08 2a 48 4f 4e 0d 00 b4  12 f2 73 65 74 6c 65 6e  |.*HON.....setlen|
000001a0  67 74 68 28 32 34 29 0d  00 be 5c db 3a f1 27 6c  |gth(24)...\.:.'l|
000001b0  6f 67 6f 24 27 27 27 bd  31 34 31 3b 22 86 4c 6f  |ogo$'''.141;".Lo|
000001c0  6f 6b 69 6e 67 20 66 6f  72 20 66 69 78 74 75 72  |oking for fixtur|
000001d0  65 20 6c 69 73 74 73 20  2e 2e 2e 22 27 bd 31 34  |e lists ..."'.14|
000001e0  31 3b 22 86 4c 6f 6f 6b  69 6e 67 20 66 6f 72 20  |1;".Looking for |
000001f0  66 69 78 74 75 72 65 20  6c 69 73 74 73 20 2e 2e  |fixture lists ..|
00000200  2e 22 3b 0d 00 c8 44 e3  57 25 3d 31 b8 31 32 3a  |.";...D.W%=1.12:|
00000210  f2 73 65 74 67 72 61 62  62 65 72 28 57 25 2c 33  |.setgrabber(W%,3|
00000220  2c 26 33 31 2c a0 28 22  26 22 2b c3 28 57 25 29  |,&31,.("&"+.(W%)|
00000230  29 2c 6c 6f 63 25 2b 28  28 57 25 2d 31 29 2a 26  |),loc%+((W%-1)*&|
00000240  33 43 30 29 29 3a ed 0d  00 d2 18 67 6f 74 25 3d  |3C0)):.....got%=|
00000250  a4 77 61 69 74 66 6f 72  67 72 61 62 62 65 72 0d  |.waitforgrabber.|
00000260  00 dc 41 4c 25 3d 30 3a  76 25 3d 28 6c 6f 63 25  |..AL%=0:v%=(loc%|
00000270  2b 28 28 67 6f 74 25 2d  31 29 2a 26 33 43 30 29  |+((got%-1)*&3C0)|
00000280  29 3a e3 41 25 3d 76 25  20 b8 20 28 76 25 2b 26  |):.A%=v% . (v%+&|
00000290  33 43 30 29 20 88 34 30  3a 4c 25 3d 4c 25 2b 31  |3C0) .40:L%=L%+1|
000002a0  0d 00 e6 28 e7 4c 25 3d  34 20 3f 28 41 25 2b 38  |...(.L%=4 ?(A%+8|
000002b0  30 29 3d 26 44 3a 41 24  3d 24 41 25 3a f2 63 68  |0)=&D:A$=$A%:.ch|
000002c0  65 63 6b 28 24 41 25 29  0d 00 f0 05 ed 0d 00 fa  |eck($A%)........|
000002d0  24 53 50 53 3d a4 68 6f  77 6d 61 6e 79 28 67 6f  |$SPS=.howmany(go|
000002e0  74 25 29 3a e7 53 50 53  3e 31 32 20 53 50 53 3d  |t%):.SPS>12 SPS=|
000002f0  38 0d 01 04 36 db 3a f1  27 6c 6f 67 6f 24 27 27  |8...6.:.'logo$''|
00000300  27 22 83 50 61 67 65 73  20 72 65 71 75 69 72 65  |'".Pages require|
00000310  64 3a 22 3b 8a 32 30 29  3b 22 50 61 67 65 73 20  |d:";.20);"Pages |
00000320  66 6f 75 6e 64 3a 22 0d  01 0e 32 e3 58 25 3d 31  |found:"...2.X%=1|
00000330  b8 53 50 53 3a f1 8a 37  2c 31 30 2b 58 25 29 3b  |.SPS:..7,10+X%);|
00000340  22 86 33 33 31 73 30 30  22 3b c2 22 30 22 2b c3  |".331s00";."0"+.|
00000350  28 58 25 29 2c 32 29 3a  ed 0d 01 18 18 f2 77 61  |(X%),2):......wa|
00000360  69 74 5f 66 6f 72 5f 70  61 67 65 73 28 53 50 53  |it_for_pages(SPS|
00000370  29 0d 01 22 13 f2 72 65  73 65 74 5f 67 72 61 62  |).."..reset_grab|
00000380  62 65 72 73 0d 01 2c 09  2a 48 4f 46 46 0d 01 36  |bers..,.*HOFF..6|
00000390  0c f2 70 75 74 64 61 74  61 0d 01 40 0a f2 67 6f  |..putdata..@..go|
000003a0  5f 6f 6e 0d 01 4a 05 e0  0d 01 54 0a f4 22 81 2a  |_on..J....T..".*|
000003b0  2a 2a 0d 01 5e 13 dd f2  70 72 6f 63 65 73 73 28  |**..^...process(|
000003c0  6c 6f 63 25 29 0d 01 68  10 ea 46 25 2c 4c 25 2c  |loc%)..h..F%,L%,|
000003d0  54 25 2c 4d 25 0d 01 72  35 e3 46 25 3d 6c 6f 63  |T%,M%..r5.F%=loc|
000003e0  25 20 b8 20 6c 6f 63 25  2b 26 33 39 38 3a 3f 46  |% . loc%+&398:?F|
000003f0  25 3d 28 3f 46 25 80 26  37 46 29 3a e7 3f 46 25  |%=(?F%.&7F):.?F%|
00000400  3c 33 32 20 3f 46 25 3d  33 32 0d 01 7c 05 ed 0d  |<32 ?F%=32..|...|
00000410  01 86 08 4c 25 3d 31 0d  01 90 3c f1 8a 30 2c 32  |...L%=1...<..0,2|
00000420  33 29 22 81 50 72 6f 63  65 73 73 69 6e 67 20 64  |3)".Processing d|
00000430  61 74 61 20 66 6f 72 20  6d 61 74 63 68 20 22 27  |ata for match "'|
00000440  22 81 50 6c 65 61 73 65  20 77 61 69 74 20 2e 2e  |".Please wait ..|
00000450  2e 22 3b 0d 01 9a 1c e3  46 25 3d 6c 6f 63 25 20  |.";.....F%=loc% |
00000460  b8 20 6c 6f 63 25 2b 26  33 39 38 20 88 34 30 0d  |. loc%+&398 .40.|
00000470  01 a4 0b 4c 25 3d 4c 25  2b 31 0d 01 ae 0f e7 4c  |...L%=L%+1.....L|
00000480  25 3c 36 20 e5 8d 64 60  41 0d 01 b8 0f 54 25 3d  |%<6 ..d`A....T%=|
00000490  3f 28 46 25 2b 34 30 29  0d 01 c2 16 3f 28 46 25  |?(F%+40)....?(F%|
000004a0  2b 34 30 29 3d 26 44 3a  41 24 3d 24 46 25 0d 01  |+40)=&D:A$=$F%..|
000004b0  cc 0f 3f 28 46 25 2b 34  30 29 3d 54 25 0d 01 d6  |..?(F%+40)=T%...|
000004c0  40 4d 25 3d bb 28 41 24  29 3a e7 4d 25 3c 3e 30  |@M%=.(A$):.M%<>0|
000004d0  20 80 20 4d 25 3c 3d 6d  61 78 25 20 f1 8a 32 37  | . M%<=max% ..27|
000004e0  2c 32 33 29 3b 4d 25 3b  22 20 20 22 3b 3a f2 66  |,23);M%;"  ";:.f|
000004f0  69 6e 64 5f 74 65 61 6d  73 28 4d 25 29 0d 01 e0  |ind_teams(M%)...|
00000500  05 ed 0d 01 ea 11 f1 8a  30 2c 32 33 29 89 28 37  |........0,23).(7|
00000510  30 29 3b 0d 01 f4 05 e1  0d 01 fe 0a f4 22 81 2a  |0);..........".*|
00000520  2a 2a 0d 02 08 14 dd f2  66 69 6e 64 5f 74 65 61  |**......find_tea|
00000530  6d 73 28 4d 25 29 0d 02  12 09 f7 8d 74 40 42 0d  |ms(M%)......t@B.|
00000540  02 1c 27 48 4f 4d 45 24  3d c0 41 24 2c 31 38 29  |..'HOME$=.A$,18)|
00000550  2b 22 20 22 3a 41 57 41  59 24 3d c2 41 24 2c 31  |+" ":AWAY$=.A$,1|
00000560  38 29 2b 22 20 22 0d 02  26 12 57 25 3d 30 3a 68  |8)+" "..&.W%=0:h|
00000570  25 3d a3 3a 61 25 3d a3  0d 02 30 0d f5 3a 57 25  |%=.:a%=...0..:W%|
00000580  3d 57 25 2b 31 0d 02 3a  07 f3 54 24 0d 02 44 49  |=W%+1..:..T$..DI|
00000590  e7 28 68 25 3d a3 29 20  80 28 a7 48 4f 4d 45 24  |.(h%=.) .(.HOME$|
000005a0  2c c0 54 24 2c a9 28 54  24 29 2d 31 29 29 3c 3e  |,.T$,.(T$)-1))<>|
000005b0  30 29 20 80 28 a7 48 4f  4d 45 24 2c c2 54 24 2c  |0) .(.HOME$,.T$,|
000005c0  31 29 29 3c 3e 30 29 3a  6d 28 4d 25 29 3d 57 25  |1))<>0):m(M%)=W%|
000005d0  3a 68 25 3d b9 0d 02 4e  49 e7 28 61 25 3d a3 29  |:h%=...NI.(a%=.)|
000005e0  20 80 28 a7 41 57 41 59  24 2c c0 54 24 2c a9 28  | .(.AWAY$,.T$,.(|
000005f0  54 24 29 2d 31 29 29 3c  3e 30 29 20 80 28 a7 41  |T$)-1))<>0) .(.A|
00000600  57 41 59 24 2c c2 54 24  2c 31 29 29 3c 3e 30 29  |WAY$,.T$,1))<>0)|
00000610  3a 6e 28 4d 25 29 3d 57  25 3a 61 25 3d b9 0d 02  |:n(M%)=W%:a%=...|
00000620  58 1c fd 28 68 25 3d b9  20 80 61 25 3d b9 29 84  |X..(h%=. .a%=.).|
00000630  28 54 24 3d 22 45 4e 44  22 29 0d 02 62 17 e7 54  |(T$="END")..b..T|
00000640  24 3d 22 45 4e 44 22 20  6d 28 4d 25 29 3d 39 39  |$="END" m(M%)=99|
00000650  39 0d 02 6c 05 e1 0d 02  76 0a f4 22 81 2a 2a 2a  |9..l....v..".***|
00000660  0d 02 80 6f dc 20 41 72  73 20 2c 43 6f 76 20 2c  |...o. Ars ,Cov ,|
00000670  43 68 61 20 2c 43 68 65  61 2c 44 65 72 20 2c 45  |Cha ,Chea,Der ,E|
00000680  76 65 20 2c 4c 69 76 20  2c 4c 75 74 20 2c 4d 61  |ve ,Liv ,Lut ,Ma|
00000690  6e 55 2c 4e 6f 74 46 2c  4e 6f 72 77 20 2c 4e 65  |nU,NotF,Norw ,Ne|
000006a0  77 63 20 2c 4f 78 20 2c  50 6f 72 6d 2c 51 52 2c  |wc ,Ox ,Porm,QR,|
000006b0  53 68 65 57 2c 53 6f 75  61 2c 54 6f 74 20 2c 57  |SheW,Soua,Tot ,W|
000006c0  69 6d 20 2c 57 65 73 48  2c 22 57 61 74 20 22 0d  |im ,WesH,"Wat ".|
000006d0  02 8a 76 dc 20 41 73 74  20 2c 42 6c 61 62 2c 42  |..v. Ast ,Blab,B|
000006e0  6f 75 20 2c 42 72 61 20  2c 42 61 72 20 2c 42 69  |ou ,Bra ,Bar ,Bi|
000006f0  72 20 2c 43 50 2c 48 75  64 20 2c 48 75 6c 20 2c  |r ,CP,Hud ,Hul ,|
00000700  49 70 73 20 2c 4c 65 65  20 2c 4c 65 69 20 2c 4d  |Ips ,Lee ,Lei ,M|
00000710  61 6e 43 2c 4d 69 64 20  2c 4d 69 6c 20 2c 4f 6c  |anC,Mid ,Mil ,Ol|
00000720  20 2c 50 6c 79 20 2c 52  65 61 20 2c 53 74 6f 20  | ,Ply ,Rea ,Sto |
00000730  2c 53 68 65 55 2c 53 68  72 20 2c 53 77 69 20 2c  |,SheU,Shr ,Swi ,|
00000740  22 57 42 20 22 0d 02 94  88 dc 20 41 6c 64 20 2c  |"WB "..... Ald ,|
00000750  42 72 69 67 20 2c 42 75  72 79 20 2c 42 72 69 52  |Brig ,Bury ,BriR|
00000760  2c 42 72 65 6e 20 2c 42  6c 61 70 2c 42 72 69 43  |,Bren ,Blap,BriC|
00000770  2c 43 68 65 66 2c 43 68  65 43 2c 44 6f 6e 20 2c  |,Chef,CheC,Don ,|
00000780  46 75 6c 20 2c 47 69 6c  6c 20 2c 47 72 69 20 2c  |Ful ,Gill ,Gri ,|
00000790  4d 61 6e 73 20 2c 4e 6f  72 74 20 2c 4e 6f 74 43  |Mans ,Nort ,NotC|
000007a0  2c 50 6f 72 56 2c 50 72  65 73 20 2c 52 6f 74 68  |,PorV,Pres ,Roth|
000007b0  20 2c 53 6f 75 64 2c 53  75 6e 20 2c 57 61 6c 73  | ,Soud,Sun ,Wals|
000007c0  20 2c 57 69 67 20 2c 22  59 6f 72 20 22 0d 02 9e  | ,Wig ,"Yor "...|
000007d0  87 dc 20 42 6f 6c 6e 2c  42 75 72 6e 2c 43 61 72  |.. Boln,Burn,Car|
000007e0  6c 20 2c 43 6f 6c 20 2c  43 61 6d 62 20 2c 43 61  |l ,Col ,Camb ,Ca|
000007f0  72 64 20 2c 43 72 65 77  20 2c 44 61 72 20 2c 45  |rd ,Crew ,Dar ,E|
00000800  78 20 2c 48 61 72 74 20  2c 48 61 6c 20 2c 48 65  |x ,Hart ,Hal ,He|
00000810  72 65 20 2c 4c 4f 2c 4e  65 77 70 20 2c 50 65 74  |re ,LO,Newp ,Pet|
00000820  65 20 2c 52 6f 63 20 2c  53 63 61 72 20 2c 53 74  |e ,Roc ,Scar ,St|
00000830  6f 20 2c 53 77 61 43 2c  53 63 75 20 2c 54 6f 72  |o ,SwaC,Scu ,Tor|
00000840  20 2c 54 72 61 6e 20 2c  57 6f 6c 20 2c 22 57 72  | ,Tran ,Wol ,"Wr|
00000850  65 78 20 22 0d 02 a8 46  dc 20 41 62 65 20 2c 43  |ex "...F. Abe ,C|
00000860  65 6c 20 2c 44 75 6e 55  2c 44 75 6e 64 65 65 20  |el ,DunU,Dundee |
00000870  20 2c 44 75 6e 66 20 2c  46 61 6c 20 2c 48 65 61  | ,Dunf ,Fal ,Hea|
00000880  20 2c 48 69 62 20 2c 4d  6f 72 74 20 2c 4d 6f 74  | ,Hib ,Mort ,Mot|
00000890  20 2c 52 61 6e 20 2c 53  74 4d 0d 02 b2 44 dc 20  | ,Ran ,StM...D. |
000008a0  41 69 72 20 2c 43 6c 79  64 65 20 20 2c 43 6c 79  |Air ,Clyde  ,Cly|
000008b0  6b 2c 44 75 6d 20 2c 45  61 73 46 2c 46 6f 72 20  |k,Dum ,EasF,For |
000008c0  2c 48 61 6d 6e 2c 4b 69  6c 20 2c 4d 65 61 20 2c  |,Hamn,Kil ,Mea ,|
000008d0  50 61 72 54 2c 51 53 2c  22 52 61 69 20 22 0d 02  |ParT,QS,"Rai "..|
000008e0  bc 47 dc 20 41 79 72 55  2c 41 6c 6c 20 2c 41 6c  |.G. AyrU,All ,Al|
000008f0  62 20 2c 41 72 62 20 2c  42 65 72 20 2c 42 72 65  |b ,Arb ,Ber ,Bre|
00000900  63 20 2c 43 6f 77 20 2c  45 53 2c 4d 6f 6e 74 20  |c ,Cow ,ES,Mont |
00000910  2c 51 50 2c 53 4a 2c 53  41 2c 53 74 72 20 2c 22  |,QP,SJ,SA,Str ,"|
00000920  53 74 65 20 22 0d 02 c6  09 dc 20 45 4e 44 0d 02  |Ste "..... END..|
00000930  d0 0a f4 22 81 2a 2a 2a  0d 02 da 0d dd f2 70 75  |...".***......pu|
00000940  74 64 61 74 61 0d 02 e4  0f 4d 25 3d ae 22 4d 44  |tdata....M%=."MD|
00000950  41 54 41 22 0d 02 ee 0e  e3 41 25 3d 31 b8 6d 61  |ATA".....A%=1.ma|
00000960  78 25 0d 02 f8 1d e7 6d  28 41 25 29 3d 39 39 39  |x%.....m(A%)=999|
00000970  20 d5 23 4d 25 2c 32 35  35 3a e5 8d 54 60 43 0d  | .#M%,255:..T`C.|
00000980  03 02 1b e7 6d 28 41 25  29 3d 30 20 d5 23 4d 25  |....m(A%)=0 .#M%|
00000990  2c 32 35 35 3a e5 8d 54  60 43 0d 03 0c 0e d5 23  |,255:..T`C.....#|
000009a0  4d 25 2c 6d 28 41 25 29  0d 03 16 0e d5 23 4d 25  |M%,m(A%).....#M%|
000009b0  2c 6e 28 41 25 29 0d 03  20 05 ed 0d 03 2a 08 d9  |,n(A%).. ....*..|
000009c0  23 4d 25 0d 03 34 05 e1  0d 03 3e 0a f4 22 81 2a  |#M%..4....>..".*|
000009d0  2a 2a 0d 03 48 0b dd f2  73 65 74 75 70 0d 03 52  |**..H...setup..R|
000009e0  26 de 4d 25 28 6d 61 78  25 29 2c 6e 28 6d 61 78  |&.M%(max%),n(max|
000009f0  25 29 2c 6d 28 6d 61 78  25 29 2c 64 6f 6e 65 28  |%),m(max%),done(|
00000a00  31 32 29 0d 03 5c 12 de  20 6c 6f 63 25 20 31 32  |12)..\.. loc% 12|
00000a10  2a 26 33 43 30 0d 03 66  0b de 20 43 25 20 32 30  |*&3C0..f.. C% 20|
00000a20  0d 03 70 b3 6c 6f 67 6f  24 3d 22 20 97 a0 a0 68  |..p.logo$=" ...h|
00000a30  ac ac ac ac ac ac ac ac  b4 20 93 a0 20 bc e0 f0  |......... .. ...|
00000a40  e0 f0 e8 b0 f4 b0 f0 b0  b4 b4 22 2b bd 31 30 2b  |.........."+.10+|
00000a50  bd 31 33 2b 22 94 9d 97  20 6a 9a ff ff ff ff ff  |.13+"... j......|
00000a60  ff 99 b5 93 20 20 a3 b7  ea ea ea ea ea a0 b5 b5  |....  ..........|
00000a70  bc b5 b5 b5 22 2b bd 31  30 2b bd 31 33 2b 22 94  |...."+.10+.13+".|
00000a80  9d 97 20 6a 9a ff ff ff  ff ff ff 99 b5 20 20 93  |.. j.........  .|
00000a90  a0 a5 a2 a3 a2 a3 a2 a1  a3 a1 a3 a1 a1 a1 22 2b  |.............."+|
00000aa0  bd 31 30 2b bd 31 33 2b  22 97 20 a0 20 2a 9a 60  |.10+.13+". . *.`|
00000ab0  60 60 60 60 60 99 a5 20  20 a0 87 50 6f 6f 6c 73  |`````..  ..Pools|
00000ac0  20 70 72 65 64 69 63 74  6f 72 22 2b bd 31 30 2b  | predictor"+.10+|
00000ad0  bd 31 33 0d 03 7a 05 e1  0d 03 84 0a f4 22 81 2a  |.13..z.......".*|
00000ae0  2a 2a 0d 03 8e 0f dd f2  6f 73 63 6c 69 28 6e 24  |**......oscli(n$|
00000af0  29 0d 03 98 25 24 43 25  3d 6e 24 3a 58 25 3d 43  |)...%$C%=n$:X%=C|
00000b00  25 83 32 35 36 3a 59 25  3d 43 25 81 32 35 36 3a  |%.256:Y%=C%.256:|
00000b10  d6 26 46 46 46 37 0d 03  ac 05 e1 0d 03 b6 0a f4  |.&FFF7..........|
00000b20  22 81 2a 2a 2a 0d 03 c0  0b dd f2 67 6f 5f 6f 6e  |".***......go_on|
00000b30  0d 03 ca 0c db 3a f1 6c  6f 67 6f 24 0d 03 d4 62  |.....:.logo$...b|
00000b40  f1 27 27 27 27 27 bd 31  34 31 3b bd 31 33 31 3b  |.'''''.141;.131;|
00000b50  22 52 75 6e 20 50 6f 6f  6c 73 20 50 72 65 64 69  |"Run Pools Predi|
00000b60  63 74 6f 72 20 6e 6f 77  3f 86 28 59 2f 4e 29 20  |ctor now?.(Y/N) |
00000b70  22 27 bd 31 34 31 3b bd  31 33 31 3b 22 52 75 6e  |"'.141;.131;"Run|
00000b80  20 50 6f 6f 6c 73 20 50  72 65 64 69 63 74 6f 72  | Pools Predictor|
00000b90  20 6e 6f 77 3f 86 28 59  2f 4e 29 20 22 3b 0d 03  | now?.(Y/N) ";..|
00000ba0  de 1a f5 3a 51 3d a5 20  80 26 44 46 3a fd 51 3d  |...:Q=. .&DF:.Q=|
00000bb0  37 38 20 84 51 3d 38 39  0d 03 e8 26 e7 51 3d 38  |78 .Q=89...&.Q=8|
00000bc0  39 20 f2 6f 73 63 6c 69  28 22 46 58 31 33 38 2c  |9 .oscli("FX138,|
00000bd0  30 2c 38 39 22 29 3a d7  22 46 4f 4f 54 22 0d 03  |0,89"):."FOOT"..|
00000be0  f2 0c db 3a f1 6c 6f 67  6f 24 0d 03 fc 05 e1 0d  |...:.logo$......|
00000bf0  04 06 0a f4 22 81 2a 2a  2a 0d 04 10 0f dd f2 63  |....".***......c|
00000c00  68 65 63 6b 28 41 24 29  0d 04 1a 20 e7 a7 41 24  |heck(A$)... ..A$|
00000c10  2c 22 c6 c9 d8 d4 d5 d2  c5 d3 22 29 3d 30 20 f2  |,"........")=0 .|
00000c20  65 72 72 6f 72 28 31 29  0d 04 24 05 e1 0d 04 2e  |error(1)..$.....|
00000c30  0a f4 22 81 2a 2a 2a 0d  04 38 0e dd f2 65 72 72  |..".***..8...err|
00000c40  6f 72 28 6e 29 0d 04 42  0d db 3a f1 27 6c 6f 67  |or(n)..B..:.'log|
00000c50  6f 24 0d 04 4c 35 f1 8a  30 2c 36 29 bd 31 34 31  |o$..L5..0,6).141|
00000c60  3b 22 86 53 6f 72 72 79  2c 20 65 72 72 6f 72 3a  |;".Sorry, error:|
00000c70  22 27 bd 31 34 31 3b 22  86 53 6f 72 72 79 2c 20  |"'.141;".Sorry, |
00000c80  65 72 72 6f 72 3a 22 0d  04 56 61 e7 6e 3d 31 20  |error:"..Va.n=1 |
00000c90  f1 27 27 bd 31 34 31 3b  22 86 46 69 78 74 75 72  |.''.141;".Fixtur|
00000ca0  65 20 6c 69 73 74 20 6e  6f 74 20 62 65 69 6e 67  |e list not being|
00000cb0  20 74 72 61 6e 73 6d 69  74 74 65 64 22 27 bd 31  | transmitted"'.1|
00000cc0  34 31 3b 22 86 46 69 78  74 75 72 65 20 6c 69 73  |41;".Fixture lis|
00000cd0  74 20 6e 6f 74 20 62 65  69 6e 67 20 74 72 61 6e  |t not being tran|
00000ce0  73 6d 69 74 74 65 64 22  0d 04 60 55 e7 6e 3d 31  |smitted"..`U.n=1|
00000cf0  20 f1 27 27 bd 31 34 31  3b 22 83 54 72 79 20 61  | .''.141;".Try a|
00000d00  67 61 69 6e 20 6c 61 74  65 72 20 69 6e 20 74 68  |gain later in th|
00000d10  65 20 77 65 65 6b 2e 22  27 bd 31 34 31 3b 22 83  |e week."'.141;".|
00000d20  54 72 79 20 61 67 61 69  6e 20 6c 61 74 65 72 20  |Try again later |
00000d30  69 6e 20 74 68 65 20 77  65 65 6b 2e 22 0d 04 6a  |in the week."..j|
00000d40  41 e7 6e 3d 32 20 f1 27  27 bd 31 34 31 3b 22 86  |A.n=2 .''.141;".|
00000d50  41 64 61 70 74 65 72 20  6e 6f 74 20 6f 6e 2e 22  |Adapter not on."|
00000d60  27 bd 31 34 31 3b 22 86  41 64 61 70 74 65 72 20  |'.141;".Adapter |
00000d70  6e 6f 74 20 6f 6e 2e 22  3a e5 8d 44 7e 44 0d 04  |not on.":..D~D..|
00000d80  74 09 2a 48 4f 46 46 0d  04 7e 05 e0 0d 04 88 0a  |t.*HOFF..~......|
00000d90  f4 22 81 2a 2a 2a 0d 04  92 13 dd a4 68 6f 77 6d  |.".***......howm|
00000da0  61 6e 79 28 67 6f 74 25  29 0d 04 9c 07 ea 41 25  |any(got%).....A%|
00000db0  0d 04 a6 47 e3 41 25 3d  6c 6f 63 25 2b 28 28 67  |...G.A%=loc%+((g|
00000dc0  6f 74 25 2d 31 29 2a 26  33 43 30 29 20 b8 20 6c  |ot%-1)*&3C0) . l|
00000dd0  6f 63 25 2b 26 35 30 2b  28 28 67 6f 74 25 2d 31  |oc%+&50+((got%-1|
00000de0  29 2a 26 33 43 30 29 3a  3f 41 25 3d 28 3f 41 25  |)*&3C0):?A%=(?A%|
00000df0  29 80 26 37 46 3a ed 0d  04 b0 0a 3f 41 25 3d 26  |).&7F:.....?A%=&|
00000e00  44 0d 04 ba 17 f5 3a 41  25 3d 41 25 2d 31 3a fd  |D.....:A%=A%-1:.|
00000e10  3f 41 25 3d 97 22 2f 22  0d 04 c4 0f 3d bb 28 24  |?A%=."/"....=.($|
00000e20  28 41 25 2b 31 29 29 0d  04 ce 0a f4 22 81 2a 2a  |(A%+1)).....".**|
00000e30  2a 0d 04 d8 17 dd a4 61  64 61 70 74 65 72 3a de  |*......adapter:.|
00000e40  20 77 6f 72 6b 25 20 32  0d 04 e2 48 41 25 3d 26  | work% 2...HA%=&|
00000e50  37 41 3a 58 25 3d 77 6f  72 6b 25 83 32 35 36 3a  |7A:X%=work%.256:|
00000e60  59 25 3d 77 6f 72 6b 25  81 32 35 36 3a 3f 77 6f  |Y%=work%.256:?wo|
00000e70  72 6b 25 3d 31 37 3a d6  26 46 46 46 31 3a e7 77  |rk%=17:.&FFF1:.w|
00000e80  6f 72 6b 25 3f 31 3d 30  20 3d b9 20 8b 20 3d a3  |ork%?1=0 =. . =.|
00000e90  0d 04 ec 0a f4 22 81 2a  2a 2a 0d 04 f6 2c dd f2  |.....".***...,..|
00000ea0  73 65 74 67 72 61 62 62  65 72 28 6e 6f 25 2c 6d  |setgrabber(no%,m|
00000eb0  61 67 25 2c 70 61 67 65  25 2c 73 75 62 25 2c 73  |ag%,page%,sub%,s|
00000ec0  74 6f 72 65 25 29 0d 05  00 25 41 25 3d 26 37 41  |tore%)...%A%=&7A|
00000ed0  3a 43 25 3f 30 3d 35 3a  58 25 3d 43 25 83 32 35  |:C%?0=5:X%=C%.25|
00000ee0  36 3a 59 25 3d 43 25 81  32 35 36 0d 05 0a 5d 43  |6:Y%=C%.256...]C|
00000ef0  25 3f 31 3d 6e 6f 25 3a  43 25 3f 32 3d 6d 61 67  |%?1=no%:C%?2=mag|
00000f00  25 3a 43 25 3f 33 3d 70  61 67 65 25 3a 43 25 3f  |%:C%?3=page%:C%?|
00000f10  34 3d 73 75 62 25 81 32  35 36 3a 43 25 3f 35 3d  |4=sub%.256:C%?5=|
00000f20  73 75 62 25 83 32 35 36  3a 43 25 3f 36 3d 73 74  |sub%.256:C%?6=st|
00000f30  6f 72 65 25 83 32 35 36  3a 43 25 3f 37 3d 73 74  |ore%.256:C%?7=st|
00000f40  6f 72 65 25 81 32 35 36  0d 05 14 0a d6 26 46 46  |ore%.256.....&FF|
00000f50  46 31 0d 05 1e 05 e1 0d  05 28 0a f4 22 81 2a 2a  |F1.......(..".**|
00000f60  2a 0d 05 32 14 dd a4 63  68 65 63 6b 5f 67 6f 74  |*..2...check_got|
00000f70  28 6e 6f 25 29 0d 05 3c  25 41 25 3d 26 37 41 3a  |(no%)..<%A%=&7A:|
00000f80  43 25 3f 30 3d 32 3a 58  25 3d 43 25 83 32 35 36  |C%?0=2:X%=C%.256|
00000f90  3a 59 25 3d 43 25 81 32  35 36 0d 05 46 13 43 25  |:Y%=C%.256..F.C%|
00000fa0  3f 31 3d 6e 6f 25 3a d6  26 46 46 46 31 0d 05 50  |?1=no%:.&FFF1..P|
00000fb0  19 e7 28 28 43 25 3f 32  29 80 32 29 3d 32 20 3d  |..((C%?2).2)=2 =|
00000fc0  b9 20 8b 20 3d a3 0d 05  5a 0a f4 22 81 2a 2a 2a  |. . =...Z..".***|
00000fd0  0d 05 64 12 dd f2 73 74  6f 70 5f 75 70 64 61 74  |..d...stop_updat|
00000fe0  65 73 0d 05 6e 25 41 25  3d 26 37 41 3a 43 25 3f  |es..n%A%=&7A:C%?|
00000ff0  30 3d 32 3a 58 25 3d 43  25 83 32 35 36 3a 59 25  |0=2:X%=C%.256:Y%|
00001000  3d 43 25 81 32 35 36 0d  05 78 12 e3 4a 25 3d 30  |=C%.256..x..J%=0|
00001010  b8 67 72 61 62 62 65 72  73 0d 05 82 05 f5 0d 05  |.grabbers.......|
00001020  8c 12 43 25 3f 31 3d 4a  25 3a d6 26 46 46 46 31  |..C%?1=J%:.&FFF1|
00001030  0d 05 96 11 fd 28 28 43  25 3f 32 29 80 34 29 3d  |.....((C%?2).4)=|
00001040  30 0d 05 a0 11 f2 73 65  74 5f 68 6f 6c 64 28 4a  |0.....set_hold(J|
00001050  25 29 0d 05 aa 05 ed 0d  05 b4 05 e1 0d 05 be 0a  |%)..............|
00001060  f4 22 81 2a 2a 2a 0d 05  c8 13 dd f2 73 65 74 5f  |.".***......set_|
00001070  68 6f 6c 64 28 6e 6f 25  29 0d 05 d2 25 41 25 3d  |hold(no%)...%A%=|
00001080  26 37 41 3a 43 25 3f 30  3d 33 3a 58 25 3d 43 25  |&7A:C%?0=3:X%=C%|
00001090  83 32 35 36 3a 59 25 3d  43 25 81 32 35 36 0d 05  |.256:Y%=C%.256..|
000010a0  dc 1a 43 25 3f 31 3d 6e  6f 25 3a 43 25 3f 32 3d  |..C%?1=no%:C%?2=|
000010b0  33 3a d6 26 46 46 46 31  0d 05 e6 05 e1 0d 05 f0  |3:.&FFF1........|
000010c0  0a f4 22 81 2a 2a 2a 0d  05 fa 14 dd f2 72 65 73  |..".***......res|
000010d0  65 74 5f 67 72 61 62 62  65 72 73 0d 06 04 1e 41  |et_grabbers....A|
000010e0  25 3d 26 37 41 3a 58 25  3d 43 25 83 32 35 36 3a  |%=&7A:X%=C%.256:|
000010f0  59 25 3d 43 25 81 32 35  36 0d 06 0e 0b 43 25 3f  |Y%=C%.256....C%?|
00001100  30 3d 31 34 0d 06 18 0a  d6 26 46 46 46 31 0d 06  |0=14.....&FFF1..|
00001110  22 05 e1 0d 06 2c 0a f4  22 81 2a 2a 2a 0d 06 36  |"....,..".***..6|
00001120  1e dd f2 77 61 69 74 5f  66 6f 72 5f 70 61 67 65  |...wait_for_page|
00001130  73 28 67 72 61 62 62 65  72 73 29 0d 06 40 0a f5  |s(grabbers)..@..|
00001140  3a 53 25 3d b9 0d 06 4a  45 e3 47 25 3d 31 b8 67  |:S%=...JE.G%=1.g|
00001150  72 61 62 62 65 72 73 3a  49 25 3d a4 63 68 65 63  |rabbers:I%=.chec|
00001160  6b 5f 67 6f 74 28 47 25  29 3a e7 49 25 3d b9 20  |k_got(G%):.I%=. |
00001170  f1 8a 32 30 2c 31 30 2b  47 25 29 3b 22 46 6f 75  |..20,10+G%);"Fou|
00001180  6e 64 22 3a 8b 20 53 25  3d a3 0d 06 54 3e e7 49  |nd":. S%=...T>.I|
00001190  25 3d b9 20 80 20 64 6f  6e 65 28 47 25 29 3d a3  |%=. . done(G%)=.|
000011a0  3a 64 6f 6e 65 28 47 25  29 3d b9 3a f2 70 72 6f  |:done(G%)=.:.pro|
000011b0  63 65 73 73 28 6c 6f 63  25 2b 28 28 47 25 2d 31  |cess(loc%+((G%-1|
000011c0  29 2a 26 33 43 30 29 29  0d 06 5e 05 ed 0d 06 68  |)*&3C0))..^....h|
000011d0  09 fd 53 25 3d b9 0d 06  72 05 e1 0d 06 7c 0a f4  |..S%=...r....|..|
000011e0  22 81 2a 2a 2a 0d 06 86  14 dd a4 77 61 69 74 66  |".***......waitf|
000011f0  6f 72 67 72 61 62 62 65  72 0d 06 90 08 47 25 3d  |orgrabber....G%=|
00001200  31 0d 06 9a 2d 49 25 3d  a4 63 68 65 63 6b 5f 67  |1...-I%=.check_g|
00001210  6f 74 28 47 25 29 3a e7  49 25 3d b9 20 f2 73 65  |ot(G%):.I%=. .se|
00001220  74 5f 68 6f 6c 64 28 47  25 29 3a 3d 47 25 0d 06  |t_hold(G%):=G%..|
00001230  a4 11 47 25 3d 28 47 25  20 83 31 30 29 2b 31 0d  |..G%=(G% .10)+1.|
00001240  06 ae 09 e5 8d 74 5a 46  0d 06 b8 0a f4 22 81 2a  |.....tZF.....".*|
00001250  2a 2a 0d 06 c2 14 dd f2  73 65 74 6c 65 6e 67 74  |**......setlengt|
00001260  68 28 6e 6f 25 29 0d 06  cc 35 41 25 3d 26 37 41  |h(no%)...5A%=&7A|
00001270  3a 58 25 3d 43 25 83 32  35 36 3a 59 25 3d 43 25  |:X%=C%.256:Y%=C%|
00001280  81 32 35 36 3a 43 25 3f  30 3d 37 3a 43 25 3f 31  |.256:C%?0=7:C%?1|
00001290  3d 6e 6f 25 3a d6 26 46  46 46 31 0d 06 d6 05 e1  |=no%:.&FFF1.....|
000012a0  0d ff                                             |..|
000012a2