"� VidiEd magazines from CEEFAX

*TTXON
��DnE
(� space% 32,L% 4
2� p%(99),row$(34),file%(5)
<S%=&6000:R%=34:a%=0
F�7
P�heading
Z�0,3)" �Channel:�"ch%
d�oscli("CH"+�(ch%))
n�27,3)"�Page:�"pn%
x�1,0)"P";pn%;
��
�done%=�
��oscli("PAGE"+�(pn%))
��oscli("DATA "+�~(S%))
�)�page<a% � p%(�page)>0 done%=�:�tFA
�a%=�page
�Q%=�whichfile(a%,pn%)
�%tab%=(a%-1)�20+5:�tab%>24 tab%=24
�tab2%=((a%-1)�20)*8
�CRC$=�check_CRC
�&�tab2%,4)"�";�fname$,�(fname$)-2)
�'�a%=0 �1,6)"�Found - Static page "
�.�a%=0 p%(1)=1:done%=�:�allocate_page:�DJA

(�tab2%,tab%)"�s-p�";�"00"+�(a%),2);

�allocate_page

$page%=(a%-1)�20:�page%<0 page%=0

"�#Q%=(&400*page%)

,�p%(a%)=2 done%=�:�tFA

6�p%(a%)<>0 �tFA

@p%(a%)=p%(a%)+1

J
�row24

TFrow$(0)=":"+�(pn%)+"s"+�"0000"+�(a%),4)+":"+CRC$+v$+�TSDPtime_date

^�C%=0 � 23

h�putline(row$(C%))

r�

|�putline(�64," "))

�� done%

��completefiles

��end

��

���oscli(line$)

�!X%=space% �256:Y%=space% �256

�$space%=line$:�&FFF7

��

�
ݤpage

�sp%=((S%?3)*256)+(S%?4)

��sp%=&3F7F sp%=0

�sp$=�~(sp%)

�=�(sp$)
��putline(l$)
�F%=1� �(l$)
�#Q%,(�(�l$,F%,1))�&80)
&�
0�
:��allocate_page
D�"�GET PAGE FROM MEMORY:
N�s%,a%,end%,temp%,b%,row%
X �b%=1�R%:row$(b%)=�40," "):�
b	s%=S%
l�
vs%=s%+2
�end%=s%+40
�!�a%=s% � end%:?a%=(?a%)�&80:�
�temp%=?end%:?end%=13
�row%=?(s%-1)
��row%<=R% row$(row%)=$s%
�?end%=temp%
�s%=end%
��s%>=S%+(R%*42)
��"�Check for Double-Height:
��b%=1 � R%
�6� �row$(b%),�(&8D))<>0 row$(b%+1)=row$(b%):b%=b%+1
��
��
ݤcheck_CRC

A%=&7A
X%=L% �256:Y%=L% �256
 L%?0=23
*L%?1=(S%) �256
4L%?2=(S%) �256
>
�&FFF1
Hanswer%=L%?3
R� answer%=&FF ="�Bad CRC"
\� answer%=&0 ="�No CRC�"
f� answer%=&1 ="�CRC OK�"
p="�bad CRC"
z��row24
�)�row$(24)<>�40," ") v$="R24"�v$="   "
�2�row$(25)<>�40," ") v$=v$+"�R25" �v$=v$+"    "
��
�
��heading
��
�*HON
�y�141,132,157,131:�"VidiEditor files from broadcast  ";�156:�141,132,157,131:�"VidiEditor files from broadcast  ";�156
��
�	��end
�	*HOFF
�+�1,3)"�File(s) complete:";�(20);�0,0);
��
�ݤwhichfile(a%,pn%)
�T%
"mag%=(a%-1) �20:�mag%<0 mag%=0
�file%(mag%)<>0 �DVD
$6fname$="D."+�(pn%)+"s"+�"00"+�(((a% �20)*20)+1),2)
.�a%=0 fname$=�fname$,5)
8'�oscli("SAVE "+fname$+" 2C00+5000")
BT%=�(fname$)
Lfile%(mag%)=T%
V=file%(mag%)
`��completefiles
j"�1,3)"�Completing files ...";
t�A%=0�4
~�file%(A%)=0 � �dDD
��B%=1�20
�Q%=file%(A%)
��p%((A%*20)+B%)<>0 �tzD
��#Q%=(B%-1)*&400
��C%=1�&400:�#Q%,&A0:�
��
��
��#0
��
�ݤTSDPtime_date
��info%,A%,X%,Y%,date$
�� info% 15

A%=&7A

X%=info% �256:Y%=info% �256
?(info%)=22

�&FFF1
(info%?&B=&D
2Ldate$="�"+�$(info%+1),6)+�$(info%+1),2):�date$,"/")=0 date$="�No date "
<?(info%)=21
F
�&FFF1
Pinfo%?&6=&D
Z1�info%?12=&FF time$="**:**" �time$=$(info%+1)
d=date$+"�"+time$
n
x	*HOFF
��completefiles:�end
��
�

00000000  0d 00 0a 22 f4 20 56 69  64 69 45 64 20 6d 61 67  |...". VidiEd mag|
00000010  61 7a 69 6e 65 73 20 66  72 6f 6d 20 43 45 45 46  |azines from CEEF|
00000020  41 58 0d 00 14 0a 2a 54  54 58 4f 4e 0d 00 1e 0b  |AX....*TTXON....|
00000030  ee 85 e5 8d 44 6e 45 0d  00 28 14 de 20 73 70 61  |....DnE..(.. spa|
00000040  63 65 25 20 33 32 2c 4c  25 20 34 0d 00 32 1e de  |ce% 32,L% 4..2..|
00000050  20 70 25 28 39 39 29 2c  72 6f 77 24 28 33 34 29  | p%(99),row$(34)|
00000060  2c 66 69 6c 65 25 28 35  29 0d 00 3c 17 53 25 3d  |,file%(5)..<.S%=|
00000070  26 36 30 30 30 3a 52 25  3d 33 34 3a 61 25 3d 30  |&6000:R%=34:a%=0|
00000080  0d 00 46 06 eb 37 0d 00  50 0c f2 68 65 61 64 69  |..F..7..P..headi|
00000090  6e 67 0d 00 5a 1a e8 8a  30 2c 33 29 22 20 86 43  |ng..Z...0,3)" .C|
000000a0  68 61 6e 6e 65 6c 3a 83  22 63 68 25 0d 00 64 17  |hannel:."ch%..d.|
000000b0  f2 6f 73 63 6c 69 28 22  43 48 22 2b c3 28 63 68  |.oscli("CH"+.(ch|
000000c0  25 29 29 0d 00 6e 17 e8  8a 32 37 2c 33 29 22 86  |%))..n...27,3)".|
000000d0  50 61 67 65 3a 83 22 70  6e 25 0d 00 78 12 f1 8a  |Page:."pn%..x...|
000000e0  31 2c 30 29 22 50 22 3b  70 6e 25 3b 0d 00 82 05  |1,0)"P";pn%;....|
000000f0  f5 0d 00 8c 0b 64 6f 6e  65 25 3d a3 0d 00 96 19  |.....done%=.....|
00000100  f2 6f 73 63 6c 69 28 22  50 41 47 45 22 2b c3 28  |.oscli("PAGE"+.(|
00000110  70 6e 25 29 29 0d 00 a0  1a f2 6f 73 63 6c 69 28  |pn%)).....oscli(|
00000120  22 44 41 54 41 20 22 2b  c3 7e 28 53 25 29 29 0d  |"DATA "+.~(S%)).|
00000130  00 aa 29 e7 a4 70 61 67  65 3c 61 25 20 80 20 70  |..)..page<a% . p|
00000140  25 28 a4 70 61 67 65 29  3e 30 20 64 6f 6e 65 25  |%(.page)>0 done%|
00000150  3d b9 3a e5 8d 74 46 41  0d 00 b4 0c 61 25 3d a4  |=.:..tFA....a%=.|
00000160  70 61 67 65 0d 00 be 19  51 25 3d a4 77 68 69 63  |page....Q%=.whic|
00000170  68 66 69 6c 65 28 61 25  2c 70 6e 25 29 0d 00 c8  |hfile(a%,pn%)...|
00000180  25 74 61 62 25 3d 28 61  25 2d 31 29 83 32 30 2b  |%tab%=(a%-1).20+|
00000190  35 3a e7 74 61 62 25 3e  32 34 20 74 61 62 25 3d  |5:.tab%>24 tab%=|
000001a0  32 34 0d 00 d2 17 74 61  62 32 25 3d 28 28 61 25  |24....tab2%=((a%|
000001b0  2d 31 29 81 32 30 29 2a  38 0d 00 dc 13 43 52 43  |-1).20)*8....CRC|
000001c0  24 3d a4 63 68 65 63 6b  5f 43 52 43 0d 00 e6 26  |$=.check_CRC...&|
000001d0  f1 8a 74 61 62 32 25 2c  34 29 22 81 22 3b c2 66  |..tab2%,4)".";.f|
000001e0  6e 61 6d 65 24 2c a9 28  66 6e 61 6d 65 24 29 2d  |name$,.(fname$)-|
000001f0  32 29 0d 00 f0 27 e7 61  25 3d 30 20 f1 8a 31 2c  |2)...'.a%=0 ..1,|
00000200  36 29 22 86 46 6f 75 6e  64 20 2d 20 53 74 61 74  |6)".Found - Stat|
00000210  69 63 20 70 61 67 65 20  22 0d 00 fa 2e e7 61 25  |ic page ".....a%|
00000220  3d 30 20 70 25 28 31 29  3d 31 3a 64 6f 6e 65 25  |=0 p%(1)=1:done%|
00000230  3d b9 3a f2 61 6c 6c 6f  63 61 74 65 5f 70 61 67  |=.:.allocate_pag|
00000240  65 3a e5 8d 44 4a 41 0d  01 04 28 f1 8a 74 61 62  |e:..DJA...(..tab|
00000250  32 25 2c 74 61 62 25 29  22 86 73 2d 70 83 22 3b  |2%,tab%)".s-p.";|
00000260  c2 22 30 30 22 2b c3 28  61 25 29 2c 32 29 3b 0d  |."00"+.(a%),2);.|
00000270  01 0e 12 f2 61 6c 6c 6f  63 61 74 65 5f 70 61 67  |....allocate_pag|
00000280  65 0d 01 18 24 70 61 67  65 25 3d 28 61 25 2d 31  |e...$page%=(a%-1|
00000290  29 83 32 30 3a e7 70 61  67 65 25 3c 30 20 70 61  |).20:.page%<0 pa|
000002a0  67 65 25 3d 30 0d 01 22  15 cf 23 51 25 3d 28 26  |ge%=0.."..#Q%=(&|
000002b0  34 30 30 2a 70 61 67 65  25 29 0d 01 2c 1b e7 70  |400*page%)..,..p|
000002c0  25 28 61 25 29 3d 32 20  64 6f 6e 65 25 3d b9 3a  |%(a%)=2 done%=.:|
000002d0  e5 8d 74 46 41 0d 01 36  14 e7 70 25 28 61 25 29  |..tFA..6..p%(a%)|
000002e0  3c 3e 30 20 e5 8d 74 46  41 0d 01 40 13 70 25 28  |<>0 ..tFA..@.p%(|
000002f0  61 25 29 3d 70 25 28 61  25 29 2b 31 0d 01 4a 0a  |a%)=p%(a%)+1..J.|
00000300  f2 72 6f 77 32 34 0d 01  54 46 72 6f 77 24 28 30  |.row24..TFrow$(0|
00000310  29 3d 22 3a 22 2b c3 28  70 6e 25 29 2b 22 73 22  |)=":"+.(pn%)+"s"|
00000320  2b c2 22 30 30 30 30 22  2b c3 28 61 25 29 2c 34  |+."0000"+.(a%),4|
00000330  29 2b 22 3a 22 2b 43 52  43 24 2b 76 24 2b a4 54  |)+":"+CRC$+v$+.T|
00000340  53 44 50 74 69 6d 65 5f  64 61 74 65 0d 01 5e 0e  |SDPtime_date..^.|
00000350  e3 43 25 3d 30 20 b8 20  32 33 0d 01 68 16 f2 70  |.C%=0 . 23..h..p|
00000360  75 74 6c 69 6e 65 28 72  6f 77 24 28 43 25 29 29  |utline(row$(C%))|
00000370  0d 01 72 05 ed 0d 01 7c  16 f2 70 75 74 6c 69 6e  |..r....|..putlin|
00000380  65 28 c4 36 34 2c 22 20  22 29 29 0d 01 86 0b fd  |e(.64," ")).....|
00000390  20 64 6f 6e 65 25 0d 01  90 12 f2 63 6f 6d 70 6c  | done%.....compl|
000003a0  65 74 65 66 69 6c 65 73  0d 01 9a 08 f2 65 6e 64  |etefiles.....end|
000003b0  0d 01 a4 05 e0 0d 01 ae  12 dd f2 6f 73 63 6c 69  |...........oscli|
000003c0  28 6c 69 6e 65 24 29 0d  01 b8 21 58 25 3d 73 70  |(line$)...!X%=sp|
000003d0  61 63 65 25 20 83 32 35  36 3a 59 25 3d 73 70 61  |ace% .256:Y%=spa|
000003e0  63 65 25 20 81 32 35 36  0d 01 c2 18 24 73 70 61  |ce% .256....$spa|
000003f0  63 65 25 3d 6c 69 6e 65  24 3a d6 26 46 46 46 37  |ce%=line$:.&FFF7|
00000400  0d 01 cc 05 e1 0d 01 d6  0a dd a4 70 61 67 65 0d  |...........page.|
00000410  01 e0 1b 73 70 25 3d 28  28 53 25 3f 33 29 2a 32  |...sp%=((S%?3)*2|
00000420  35 36 29 2b 28 53 25 3f  34 29 0d 01 ea 14 e7 73  |56)+(S%?4).....s|
00000430  70 25 3d 26 33 46 37 46  20 73 70 25 3d 30 0d 01  |p%=&3F7F sp%=0..|
00000440  f4 0f 73 70 24 3d c3 7e  28 73 70 25 29 0d 01 fe  |..sp$=.~(sp%)...|
00000450  0b 3d bb 28 73 70 24 29  0d 02 08 11 dd f2 70 75  |.=.(sp$)......pu|
00000460  74 6c 69 6e 65 28 6c 24  29 0d 02 12 10 e3 46 25  |tline(l$).....F%|
00000470  3d 31 b8 20 a9 28 6c 24  29 0d 02 1c 1b d5 23 51  |=1. .(l$).....#Q|
00000480  25 2c 28 97 28 c1 6c 24  2c 46 25 2c 31 29 29 84  |%,(.(.l$,F%,1)).|
00000490  26 38 30 29 0d 02 26 05  ed 0d 02 30 05 e1 0d 02  |&80)..&....0....|
000004a0  3a 13 dd f2 61 6c 6c 6f  63 61 74 65 5f 70 61 67  |:...allocate_pag|
000004b0  65 0d 02 44 1c f4 22 81  47 45 54 20 50 41 47 45  |e..D..".GET PAGE|
000004c0  20 46 52 4f 4d 20 4d 45  4d 4f 52 59 3a 0d 02 4e  | FROM MEMORY:..N|
000004d0  1d ea 73 25 2c 61 25 2c  65 6e 64 25 2c 74 65 6d  |..s%,a%,end%,tem|
000004e0  70 25 2c 62 25 2c 72 6f  77 25 0d 02 58 20 e3 62  |p%,b%,row%..X .b|
000004f0  25 3d 31 b8 52 25 3a 72  6f 77 24 28 62 25 29 3d  |%=1.R%:row$(b%)=|
00000500  c4 34 30 2c 22 20 22 29  3a ed 0d 02 62 09 73 25  |.40," "):...b.s%|
00000510  3d 53 25 0d 02 6c 05 f5  0d 02 76 0b 73 25 3d 73  |=S%..l....v.s%=s|
00000520  25 2b 32 0d 02 80 0e 65  6e 64 25 3d 73 25 2b 34  |%+2....end%=s%+4|
00000530  30 0d 02 8a 21 e3 61 25  3d 73 25 20 b8 20 65 6e  |0...!.a%=s% . en|
00000540  64 25 3a 3f 61 25 3d 28  3f 61 25 29 84 26 38 30  |d%:?a%=(?a%).&80|
00000550  3a ed 0d 02 94 18 74 65  6d 70 25 3d 3f 65 6e 64  |:.....temp%=?end|
00000560  25 3a 3f 65 6e 64 25 3d  31 33 0d 02 9e 10 72 6f  |%:?end%=13....ro|
00000570  77 25 3d 3f 28 73 25 2d  31 29 0d 02 a8 1c e7 72  |w%=?(s%-1).....r|
00000580  6f 77 25 3c 3d 52 25 20  72 6f 77 24 28 72 6f 77  |ow%<=R% row$(row|
00000590  25 29 3d 24 73 25 0d 02  b2 0f 3f 65 6e 64 25 3d  |%)=$s%....?end%=|
000005a0  74 65 6d 70 25 0d 02 bc  0b 73 25 3d 65 6e 64 25  |temp%....s%=end%|
000005b0  0d 02 c6 13 fd 73 25 3e  3d 53 25 2b 28 52 25 2a  |.....s%>=S%+(R%*|
000005c0  34 32 29 0d 02 d0 1f f4  22 83 43 68 65 63 6b 20  |42).....".Check |
000005d0  66 6f 72 20 44 6f 75 62  6c 65 2d 48 65 69 67 68  |for Double-Heigh|
000005e0  74 3a 0d 02 da 0e e3 62  25 3d 31 20 b8 20 52 25  |t:.....b%=1 . R%|
000005f0  0d 02 e4 36 e7 20 a7 72  6f 77 24 28 62 25 29 2c  |...6. .row$(b%),|
00000600  bd 28 26 38 44 29 29 3c  3e 30 20 72 6f 77 24 28  |.(&8D))<>0 row$(|
00000610  62 25 2b 31 29 3d 72 6f  77 24 28 62 25 29 3a 62  |b%+1)=row$(b%):b|
00000620  25 3d 62 25 2b 31 0d 02  ee 05 ed 0d 02 f8 05 e1  |%=b%+1..........|
00000630  0d 03 02 0f dd a4 63 68  65 63 6b 5f 43 52 43 0d  |......check_CRC.|
00000640  03 0c 0a 41 25 3d 26 37  41 0d 03 16 19 58 25 3d  |...A%=&7A....X%=|
00000650  4c 25 20 83 32 35 36 3a  59 25 3d 4c 25 20 81 32  |L% .256:Y%=L% .2|
00000660  35 36 0d 03 20 0b 4c 25  3f 30 3d 32 33 0d 03 2a  |56.. .L%?0=23..*|
00000670  12 4c 25 3f 31 3d 28 53  25 29 20 83 32 35 36 0d  |.L%?1=(S%) .256.|
00000680  03 34 12 4c 25 3f 32 3d  28 53 25 29 20 81 32 35  |.4.L%?2=(S%) .25|
00000690  36 0d 03 3e 0a d6 26 46  46 46 31 0d 03 48 10 61  |6..>..&FFF1..H.a|
000006a0  6e 73 77 65 72 25 3d 4c  25 3f 33 0d 03 52 1d e7  |nswer%=L%?3..R..|
000006b0  20 61 6e 73 77 65 72 25  3d 26 46 46 20 3d 22 81  | answer%=&FF =".|
000006c0  42 61 64 20 43 52 43 22  0d 03 5c 1c e7 20 61 6e  |Bad CRC"..\.. an|
000006d0  73 77 65 72 25 3d 26 30  20 3d 22 83 4e 6f 20 43  |swer%=&0 =".No C|
000006e0  52 43 81 22 0d 03 66 1c  e7 20 61 6e 73 77 65 72  |RC."..f.. answer|
000006f0  25 3d 26 31 20 3d 22 82  43 52 43 20 4f 4b 81 22  |%=&1 =".CRC OK."|
00000700  0d 03 70 0f 3d 22 81 62  61 64 20 43 52 43 22 0d  |..p.=".bad CRC".|
00000710  03 7a 0b dd f2 72 6f 77  32 34 0d 03 84 29 e7 72  |.z...row24...).r|
00000720  6f 77 24 28 32 34 29 3c  3e c4 34 30 2c 22 20 22  |ow$(24)<>.40," "|
00000730  29 20 76 24 3d 22 52 32  34 22 8b 76 24 3d 22 20  |) v$="R24".v$=" |
00000740  20 20 22 0d 03 8e 32 e7  72 6f 77 24 28 32 35 29  |  "...2.row$(25)|
00000750  3c 3e c4 34 30 2c 22 20  22 29 20 76 24 3d 76 24  |<>.40," ") v$=v$|
00000760  2b 22 81 52 32 35 22 20  8b 76 24 3d 76 24 2b 22  |+".R25" .v$=v$+"|
00000770  20 20 20 20 22 0d 03 98  05 e1 0d 03 a2 0d dd f2  |    "...........|
00000780  68 65 61 64 69 6e 67 0d  03 ac 05 f1 0d 03 b6 08  |heading.........|
00000790  2a 48 4f 4e 0d 03 c0 79  ef 31 34 31 2c 31 33 32  |*HON...y.141,132|
000007a0  2c 31 35 37 2c 31 33 31  3a f1 22 56 69 64 69 45  |,157,131:."VidiE|
000007b0  64 69 74 6f 72 20 66 69  6c 65 73 20 66 72 6f 6d  |ditor files from|
000007c0  20 62 72 6f 61 64 63 61  73 74 20 20 22 3b bd 31  | broadcast  ";.1|
000007d0  35 36 3a ef 31 34 31 2c  31 33 32 2c 31 35 37 2c  |56:.141,132,157,|
000007e0  31 33 31 3a f1 22 56 69  64 69 45 64 69 74 6f 72  |131:."VidiEditor|
000007f0  20 66 69 6c 65 73 20 66  72 6f 6d 20 62 72 6f 61  | files from broa|
00000800  64 63 61 73 74 20 20 22  3b bd 31 35 36 0d 03 ca  |dcast  ";.156...|
00000810  05 e1 0d 03 d4 09 dd f2  65 6e 64 0d 03 de 09 2a  |........end....*|
00000820  48 4f 46 46 0d 03 e8 2b  f1 8a 31 2c 33 29 22 81  |HOFF...+..1,3)".|
00000830  46 69 6c 65 28 73 29 20  63 6f 6d 70 6c 65 74 65  |File(s) complete|
00000840  3a 22 3b 89 28 32 30 29  3b 8a 30 2c 30 29 3b 0d  |:";.(20);.0,0);.|
00000850  03 f2 05 e1 0d 03 fc 17  dd a4 77 68 69 63 68 66  |..........whichf|
00000860  69 6c 65 28 61 25 2c 70  6e 25 29 0d 04 06 07 ea  |ile(a%,pn%).....|
00000870  54 25 0d 04 10 22 6d 61  67 25 3d 28 61 25 2d 31  |T%..."mag%=(a%-1|
00000880  29 20 81 32 30 3a e7 6d  61 67 25 3c 30 20 6d 61  |) .20:.mag%<0 ma|
00000890  67 25 3d 30 0d 04 1a 19  e7 66 69 6c 65 25 28 6d  |g%=0.....file%(m|
000008a0  61 67 25 29 3c 3e 30 20  e5 8d 44 56 44 0d 04 24  |ag%)<>0 ..DVD..$|
000008b0  36 66 6e 61 6d 65 24 3d  22 44 2e 22 2b c3 28 70  |6fname$="D."+.(p|
000008c0  6e 25 29 2b 22 73 22 2b  c2 22 30 30 22 2b c3 28  |n%)+"s"+."00"+.(|
000008d0  28 28 61 25 20 81 32 30  29 2a 32 30 29 2b 31 29  |((a% .20)*20)+1)|
000008e0  2c 32 29 0d 04 2e 1b e7  61 25 3d 30 20 66 6e 61  |,2).....a%=0 fna|
000008f0  6d 65 24 3d c0 66 6e 61  6d 65 24 2c 35 29 0d 04  |me$=.fname$,5)..|
00000900  38 27 f2 6f 73 63 6c 69  28 22 53 41 56 45 20 22  |8'.oscli("SAVE "|
00000910  2b 66 6e 61 6d 65 24 2b  22 20 32 43 30 30 2b 35  |+fname$+" 2C00+5|
00000920  30 30 30 22 29 0d 04 42  10 54 25 3d ad 28 66 6e  |000")..B.T%=.(fn|
00000930  61 6d 65 24 29 0d 04 4c  12 66 69 6c 65 25 28 6d  |ame$)..L.file%(m|
00000940  61 67 25 29 3d 54 25 0d  04 56 10 3d 66 69 6c 65  |ag%)=T%..V.=file|
00000950  25 28 6d 61 67 25 29 0d  04 60 13 dd f2 63 6f 6d  |%(mag%)..`...com|
00000960  70 6c 65 74 65 66 69 6c  65 73 0d 04 6a 22 f1 8a  |pletefiles..j"..|
00000970  31 2c 33 29 22 81 43 6f  6d 70 6c 65 74 69 6e 67  |1,3)".Completing|
00000980  20 66 69 6c 65 73 20 2e  2e 2e 22 3b 0d 04 74 0b  | files ...";..t.|
00000990  e3 41 25 3d 30 b8 34 0d  04 7e 17 e7 66 69 6c 65  |.A%=0.4..~..file|
000009a0  25 28 41 25 29 3d 30 20  e5 20 8d 64 44 44 0d 04  |%(A%)=0 . .dDD..|
000009b0  88 0c e3 42 25 3d 31 b8  32 30 0d 04 92 10 51 25  |...B%=1.20....Q%|
000009c0  3d 66 69 6c 65 25 28 41  25 29 0d 04 9c 1c e7 70  |=file%(A%).....p|
000009d0  25 28 28 41 25 2a 32 30  29 2b 42 25 29 3c 3e 30  |%((A%*20)+B%)<>0|
000009e0  20 e5 8d 74 7a 44 0d 04  a6 14 cf 23 51 25 3d 28  | ..tzD.....#Q%=(|
000009f0  42 25 2d 31 29 2a 26 34  30 30 0d 04 b0 19 e3 43  |B%-1)*&400.....C|
00000a00  25 3d 31 b8 26 34 30 30  3a d5 23 51 25 2c 26 41  |%=1.&400:.#Q%,&A|
00000a10  30 3a ed 0d 04 ba 05 ed  0d 04 c4 05 ed 0d 04 ce  |0:..............|
00000a20  07 d9 23 30 0d 04 d8 05  e1 0d 04 e2 13 dd a4 54  |..#0...........T|
00000a30  53 44 50 74 69 6d 65 5f  64 61 74 65 0d 04 ec 19  |SDPtime_date....|
00000a40  ea 69 6e 66 6f 25 2c 41  25 2c 58 25 2c 59 25 2c  |.info%,A%,X%,Y%,|
00000a50  64 61 74 65 24 0d 04 f6  0e de 20 69 6e 66 6f 25  |date$..... info%|
00000a60  20 31 35 0d 05 00 0a 41  25 3d 26 37 41 0d 05 0a  | 15....A%=&7A...|
00000a70  1f 58 25 3d 69 6e 66 6f  25 20 83 32 35 36 3a 59  |.X%=info% .256:Y|
00000a80  25 3d 69 6e 66 6f 25 20  81 32 35 36 0d 05 14 0f  |%=info% .256....|
00000a90  3f 28 69 6e 66 6f 25 29  3d 32 32 0d 05 1e 0a d6  |?(info%)=22.....|
00000aa0  26 46 46 46 31 0d 05 28  0f 69 6e 66 6f 25 3f 26  |&FFF1..(.info%?&|
00000ab0  42 3d 26 44 0d 05 32 4c  64 61 74 65 24 3d 22 86  |B=&D..2Ldate$=".|
00000ac0  22 2b c0 24 28 69 6e 66  6f 25 2b 31 29 2c 36 29  |"+.$(info%+1),6)|
00000ad0  2b c2 24 28 69 6e 66 6f  25 2b 31 29 2c 32 29 3a  |+.$(info%+1),2):|
00000ae0  e7 a7 64 61 74 65 24 2c  22 2f 22 29 3d 30 20 64  |..date$,"/")=0 d|
00000af0  61 74 65 24 3d 22 86 4e  6f 20 64 61 74 65 20 22  |ate$=".No date "|
00000b00  0d 05 3c 0f 3f 28 69 6e  66 6f 25 29 3d 32 31 0d  |..<.?(info%)=21.|
00000b10  05 46 0a d6 26 46 46 46  31 0d 05 50 0f 69 6e 66  |.F..&FFF1..P.inf|
00000b20  6f 25 3f 26 36 3d 26 44  0d 05 5a 31 e7 69 6e 66  |o%?&6=&D..Z1.inf|
00000b30  6f 25 3f 31 32 3d 26 46  46 20 74 69 6d 65 24 3d  |o%?12=&FF time$=|
00000b40  22 2a 2a 3a 2a 2a 22 20  8b 74 69 6d 65 24 3d 24  |"**:**" .time$=$|
00000b50  28 69 6e 66 6f 25 2b 31  29 0d 05 64 14 3d 64 61  |(info%+1)..d.=da|
00000b60  74 65 24 2b 22 83 22 2b  74 69 6d 65 24 0d 05 6e  |te$+"."+time$..n|
00000b70  07 ee 85 87 0d 05 78 09  2a 48 4f 46 46 0d 05 82  |......x.*HOFF...|
00000b80  17 f2 63 6f 6d 70 6c 65  74 65 66 69 6c 65 73 3a  |..completefiles:|
00000b90  f2 65 6e 64 0d 05 8c 05  e0 0d ff                 |.end.......|
00000b9b